Hei!
Löydän makrolla sarakkeen viimeisen solun jossa on tietoa, mutta miten löydän rivin viimeisen solun jossa on tietoa.
Elikä jos mulla on ajat rivillä 10 ja arvot rivillä 11 ja haluaisin aina uudet arvo jatkoksi samalle riville.
Rivin viimeinen
kavi
3
377
Vastaukset
- -Pasi-
Alla oleva koodi etsii viimeisen käytössä olevan rivin sarakkeen "A" perusteella ja sen jälkeen tältä riviltä ensimmäisen vapaan solun:
Sub VapaaSolu()
Dim ViimeinenRivi As Integer, VapaaSarake As Integer
Application.ScreenUpdating = False
ViimeinenRivi = Range("A65536").End(xlUp).Row
Cells(ViimeinenRivi, 1).Activate
While ActiveCell.Value Empty
ActiveCell.Offset(0, 1).Activate
VapaaSarake = ActiveCell.Column
Wend
Application.ScreenUpdating = True
End Sub Sub Vika()
Range("A65536").End(xlUp).End(xlToRight).Select ' vika tietoa sisältävä rivillä
'Range("A65536").End(xlUp).End(xlToRight).Offset(0, 1).Select' eka tyhjä rivillä
End Sub- kavi
Molemmille.
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Hetken jo luulin, että en ikävöi sinua koko aikaa
Mutta nyt on sitten taas ihan hirveä ikävä jotenkin. Tiedätköhän sinä edes, kuinka peruuttamattomasti minä olen sinuun r345368Outoa että Trump ekana sanoutui irti ilmastosopimuksesta
kun Kaliforniaa riepottelee siitä johtuvat tuhoisat maastopalot. Hirmumyrskytkin ovat USA:ssa olleet tuhoisia.4842484Eli jos toisen hiki haisee ns. omaan nenään siedettävältä
Se kertoo hyvästä yhteensopivuudesta. Selvä! Olet mies minun. 🫵🥳271259JOKO OLETTE KUULLET, MITÄ KIURUVEDELLÄ ON SATTUNUT!
Oletteko jo kuulleet, mitä Kiuruvedellä on sattunut, voi hyvänen aika? Aivan viime tuntien aikana olisi sattunut, jos t51075En tiedä miksi kerroin sinusta täällä
Siksi kai, kun meidän juttu on niin alkuvaiheessa, etten voi vielä puhua siitä kenellekään.16957Oho! Queen of Fucking Everything villitsee - Ikean sininen luottotuote nappasi hervottoman idean!
Ikea on ajan hermoilla! Aika hauska idea ja Queen of Fucking Everything -ajatus toimii hyvin tässäkin. Lue lisää: http7934Nainen, tunnetko saman kuin minä
Syvän yhteyden välillämme, silloin kun se tunne tulee. Niinä hetkinä minulla on niin järjettömän suuri ikävä sinua. Ikäv41812HS - Yllätyskäänne Eagle S -tutkinnassa, Supo pitää onnettomuutena
HS:n mukaan esitutkinta joudutaan todennäköisesti keskeyttämään syyttäjän päätöksellä mikäli näyttöä tahallisuudesta ei193784Ei ois kyllä kivaa
Jos miestä ei kiinnostais ollenkaan minun seura. Aina huitelis ties missä tai olis omassa seurassaan. Kaikki muu ois kiv3764- 53747