problemer med do loop i excel vba
jeg har et problem med en do loop i excel...når jeg kører koden giver den Runtime error 1004 - application defined or object-defined error
min kode ser sådan ud:
Sub histogram()
Dim NoRows As Integer
NoRows = 0
Do Until IsEmpty(ActiveCell)
Do While (ActiveCell.Text = ActiveCell.Offset(-1, 0).Text)
NoRows = NoRows + 1
Loop
ActiveCell.Offset(0, 2).Value = NoRows
ActiveCell.Offset(1, 0).Select
Loop
End Sub
det er denne linje der er fejl ved:
Do While (ActiveCell.Text = ActiveCell.Offset(-1, 0).Text)
jeg har også prøvet med .Value i stedet for .Text men uden held... hvad er det jeg gør forkert?