Variablen Druckbereich im Makro definieren
14.12.2004 08:29:44
Variabler
ich habe ein Makro das eine Seite ausdruckt, der Druckbereich ist aber variabel. Die Anzahl der Spalten ist immer gleich, die Zeilen variieren.
Ich habe diesen Tip im Forum gefunden:
Sub drucken()
von = InputBox("VON Seite", "Druckabfrage", "1")
bis = InputBox("BIS Seite", "Druckabfrage", "10")
ActiveWindow.SelectedSheets.PrintOut From:=von, To:=bis, Copies:=1, Collate _
:=True
End Sub
Wie definiere ich die Spaltenanzahl?
Die Startzeile ist fix, der Druckbereich beginnt immer bei A1.
Endpunkt muss Gx sein, wobei x die Zeile angibt.
Die Zeile selber kann ich über die Funtion Zählen bestimmen, aber wie weiter?
Merci für eure Hilfe
Gruss
BORIS
Anzeige