Hei, minulla on kysely, joka tulostaa tulokset exceliin. Ensin tulee otsikko ja sen alapuolelle lukuja x-määrälle rivejä. Eli lukujen määrä riippuu siitä kuinka moni on vastannut.
Haluaisin tehdä makron, joka mm. laskee nuo luvut yhteen lukujen alapuolelle. Mitenhän tämä onnistuisi? Eli jos lukuja on 15 riviä, tulisi summa-funktio riville 17 (1 otsikkorivi 15 lukua). Mutta tosiaan kun tuota solua, mihin summan pitäisi tulla, ei tiedetä, onko se rivillä 5, 7, 9 tms. Sarake kyllä tiedetään.
Makro joka laskee summan x-luvuista
Katjuska1234
1
155
Vastaukset
Sub Summa()
Dim Vika As Long
Vika = Range("A65536").End(xlUp).Row
'muuta sarake oikeaksi
Range("A" & Vika 1) = Application.WorksheetFunction.Sum(Range("A2:A" & Vika))
End Sub
Keep EXCELing
@Kunde
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Saako kaunis ihminen parempaa kohtelua?
Onko kauniin ihmisen elämä "helpompaa" kuin tavallisen näköisen ihmisen? Olen kuullut väittämän, että kaunis ihminen saa1233500- 122316
En rehellisesti usko et oisit
Sekuntiakaan oikeasti mua kaivannut. Tai edes miettinyt miten mulla menee. Jotenkin todennäköisesti hyödyt tästäkin jos371945Suomennettua: professori Jeffrey Sachs avaa Ukrainan sodan taustat luennollaan EU parlamentissa
Jeffrey Sachs on yhdysvaltalainen ekonomisti. Sachs toimii Columbian yliopiston The Earth Instituten johtajana. Aiemmin4141899Näin sinusta taas unta!
Unessa olin pakahtuneesti rakastunut sinuun. Olimme vanhassa talossa jossa oli yläkerran huoneissa pyöreät ikkunat. Pöly211701Nainen, olet jotenkin lumoava
Katselen kauneuttasi kuin kuuta, sen loistoa pimeässä. Sen kaunis valo on kaunista sekä herkkää ja lumoavaa. Olet naisel681527Paljonko aikaa on kulunut siitä kun viimeksi tapasit hänet?
Päiviä? Viikkoja? Kuukausia? Vuosia?301463- 1241418
En muuttaisi sinusta mitään
Ensin olit etäinen ja yritin pysyä tutkan alapuolella. Mutta ei silmiltäsi jää mitään huomaamatta, kuten minulla ei kuul101291- 141236