Çok eski bir web tarayıcısı kullanıyorsunuz. Bu veya diğer siteleri görüntülemekte sorunlar yaşayabilirsiniz.. Tarayıcınızı güncellemeli veya alternatif bir tarayıcı kullanmalısınız.
Private Sub CommandButton10_Click()
Dim recete As Worksheet
Set recete = ThisWorkbook.Sheets("recete")
With ActiveSheet.PageSetup
.PrintArea = "$B$2:$H$36"
.FitToPagesWide = 1
.Orientation = xlPortrait
.PaperSize = xlPaperA5
End With...
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.