Güncel olmayan bir tarayıcı kullanıyorsunuz. Bunu veya diğer web sitelerini doğru şekilde göstermeyebilir. Yükseltmeli veya bir alternatif kullanmalısınız. tarayıcı.
Private Sub CommandButton8_Click()
ActiveSheet.PageSetup.PrintArea = "$A$1:$L$47"
ActiveSheet.PrintOut Copies:=TextBox1.Value * 1
End Sub
İyi akşamlar arkadaşlar. Bir sayfayı kaş adet yazdırmak istediğimi USERFORM üstünde bulunan TEXTBOX'a yazarak çıktı almak istiyorum. Yazdığım kodda type...