Laatste rij (nummer) van werkblad in getalnotitie

[Manke]

Ik wil graag een Macro die bij activering “kijkt” wat de laatst gebruikte rij in Kolom A van het Excel blad is (bijvoorbeeld “Rij 34) en de waarde “34” in getalnotitie plaatst in cel A1. Het kan dus zijn dat de gegevens in Kolom B de laatste rij 40 of zo is.
Wie kan mij helpen?

Alvast bedankt
Manke

 

[Roncancio]

Private Sub Worksheet_Activate()
Range("A1").Value = Range("A:A").SpecialCells(xlCellTypeLastCell).Row

End Sub

Met vriendelijke groet,


Roncancio

 

[Warme bakkertje]

Sub laatste_rij()
[A1].Value = [A65536].End(xlUp).Row
End Sub

Mvg

Rudi

 

[bandito bob]

Blijft voor mij wel de vraag staan waarom dit speciaal met VBA (een macro) moet?
Of gaat het erom dat de waarde bij activeren blijft staan tot een volgende keer activeren?

 

[Manke]

Hallo Roncancio en Warme Bakkertje, bedankt voor jullie hulp… enne het werkt.

Ik heb zojuist een nog vervolgvraag op het forum geplaatst.

Groet,
Manke

 

[Wigi]

Zet deze vraag alsnog op opgelost.