BUTON NEDEN KAYAR???

[turkanet]

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

 

[turkanet]

BU KODLARDA BİR HATA MI VAR Kİ BUTON, HER BASTIÐIMDA SOLA KAYIYOR??

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

 

[isakarakus]

ingilizce sürüme göre ...

butonun üzerinde farenin sağına tıkla,
Format Control>Properties>Dont move or size whit cells
işaretle okeyle..

bu ayarla nesneler formda kaymıyor.

 

[turkanet]

Sn. isakarakus, çok ilginç ama, dediğinizi yaptığımda yine kaydı. fakat "hücrelerle taşı ve boyutlandır"ı (move or size with cells) seçtiğimde kaymadı. yine de yolu öğrettiğiniz için teşekkürler.