Mit dem folgenden Makro können Sie die Anzahl der verwendeten Spalten in einem Tabellenblatt ermitteln und per Dialogfeld ausgeben lasen.
Sub AnzahlVerwendeteSpalten()
a = ActiveSheet.UsedRange.Columns.Count
MsgBox a
End Sub
Weiterführende Links:
Kennen Sie weiterführende Links zu diesem Thema? Schreiben Sie doch Ihre Linkempfehlung als Kommentar unten zu dieser Seite. Ich freue mich auf Ihr Feedback.