Excel VBA letzte Zeile Variable nicht berechnet

Ich benutze die Linien:

Dim lastrowmonth as Integer, PMARow As Integer lastRowMonth = Cells(1 & "," & Rows.Count).End(xlUp).Row Do While PMARow < lastRowMonth + 1 

Allerdings sagt es mir immer, dass lastRowMonth = 1 und lasse mich daher nicht auf meinen Code zugreifen. Irgendein Rat hier, da es 1400 gefüllte Zellen in der Spalte A gibt, und idealerweise möchte ich weitergehen, um 1 zu einer Variable zu ändern, um sich durch andere Spalten zu bewegen.

Jede Hilfe wäre großartig!

Solutions Collecting From Web of "Excel VBA letzte Zeile Variable nicht berechnet"

Versuche dies:

 lastRowMonth = Cells(Rows.Count,1).End(xlUp).Row 

Und vielleicht wäre es eine gute Idee, lastRowMonth als Long zu deklarieren, denn in Excel gibt es mehr Zeilen, als ein Integer kann

Sie müssen die zweite Zeile ändern zu:

 lastRowMonth = Cells(Rows.Count, 1).End(xlUp).Row