Grüß Euch zusammen,
ich habe mit folgendem Code den Tabellenbereich schon einmal eingegrenzt:
Monat = Range("B4").Select
Windows("A_Rechnungen.xlsm").Activate
LetzteZeile = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
ActiveSheet.Range("A381:J" & LetzteZeile).Select
Nun soll dieser Bereich über die Spalte 10 über den Wert B4 weiter eingegrenzt werden. Gleichzeitig müßte gezählt werden, wieviele Spalten es in dem soeben erstellten Bereich gibt, damit ich eine Schleife programmieren kann.
Danke für die Unterstützung
Stefan