BU KODLARA ATADIÃIM YAZDIR BUTONLARI, HER YAZDIRMA İÃLEMİNDEN SONRA SOL TARAFA DOÃRU KAYIYOR. KODDA BİR YANLIÃLIK MI YAPTIM? BUTON NEDEN KAYAR?
Private Sub CommandButton1_Click()
Application.ActivePrinter = "LPT1: üzerindeki Panasonic KX-P1150 "
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"LPT1: üzerindeki Panasonic KX-P1150 ", Collate:=True
End Sub
Private Sub CommandButton1_Click()
Application.ActivePrinter = "Ne00: üzerindeki \\CEM\KONICA "
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"Ne00: üzerindeki \\CEM\KONICA ", Collate:=True
End Sub
Private Sub CommandButton1_Click()
Application.ActivePrinter = "LPT1: üzerindeki Panasonic KX-P1150 "
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"LPT1: üzerindeki Panasonic KX-P1150 ", Collate:=True
End Sub
Private Sub CommandButton1_Click()
Application.ActivePrinter = "Ne00: üzerindeki \\CEM\KONICA "
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"Ne00: üzerindeki \\CEM\KONICA ", Collate:=True
End Sub