- Katılım
- 20 Ocak 2005
- Mesajlar
- 526
- Excel Vers. ve Dili
- Excel 2007 Türkçe
- Altın Üyelik Bitiş Tarihi
- 01-01-2024
Bir sayfada 2 farklı bölüm var. Makro ile bu iki alan için yazdır butonu yapabilir miyim.
Araştırdım böyle bir makro yapamadım.
Sub YAZ()
' Klavye Kısayolu: Ctrl+y
ActiveSheet.Range("$b$3:$g$26").AutoFilter Field:=9
Rows("8:8").Select
Selection.AutoFilter
Range("b3").Select
Selection.AutoFill Destination:=Range("b3:g26"), Type:=xlFillDefault
Range("b3:g26").Select
ActiveWindow.SmallScroll Down:=-36
Range("T24").Select
Sheets("Çıktı").Select
End Sub
Yazdırmak istediğim birinci alan ; B3 ile G26 aralığı ve ikinci buton; B30 ; G53 aralığı. Tek sayfa çıktı alıyorum.
Araştırdım böyle bir makro yapamadım.
Sub YAZ()
' Klavye Kısayolu: Ctrl+y
ActiveSheet.Range("$b$3:$g$26").AutoFilter Field:=9
Rows("8:8").Select
Selection.AutoFilter
Range("b3").Select
Selection.AutoFill Destination:=Range("b3:g26"), Type:=xlFillDefault
Range("b3:g26").Select
ActiveWindow.SmallScroll Down:=-36
Range("T24").Select
Sheets("Çıktı").Select
End Sub
Yazdırmak istediğim birinci alan ; B3 ile G26 aralığı ve ikinci buton; B30 ; G53 aralığı. Tek sayfa çıktı alıyorum.