columns.count zählt zuviele Spalten
21.04.2003 14:58:15
andreas
Folgendes Mini-Makro ergibt immer mindestens die Zahl 5 - auch wenn das besagte Sheet weniger Spalten hat. Woran kann das liegen?
durch die falsche ermittlung von Spalten ist natürlich das Ergebnis falsch!
Danke für Eure Hilfe
Sub Spaltenermitteln()
Dim a As Integer
Sheets("Tabelle3").Activate
a = ActiveSheet.UsedRange.Columns.Count
MsgBox a
End Sub
Anzeige