Drucken
28.03.2003 12:14:12
Lucien
Ich hqbe folgenden Code
If Me.Textbox1.Value = "1" Then go to a:
A:Sheets("Stock").select
Range ("B4").Select
ActiveCell.FormulaR1C1 ="1"
ActiveWindow.SelectedSheets.printOut Copies:=1,Collate:=True
End Sub
Meine Frage
Ich moechte ,dass wenn der Textboxeintrag 5 lautet er die Ziffer 5 ausdruckt u.s.w.
Es sollte auch moeglich sein z.b. 1-5 zu drucken
geht das
vielen Dank
Anzeige