Druckbereich mit Shortcut
05.03.2007 11:00:20
Peter
Wenn ich in einem Workbook einen Bereich markiert habe und dann Strg+Umschalt+F drücke, möchte ich, dass dieser Bereich als Druckbereich festgelegt wird.
Mit ActiveSheet.Selection (und auch mit nur Selection) kann er jedoch nichts anfangen.
Kann mir jemand weiterhelfen?
Danke, Peter
Sub Druckbereich()
' Druckbereich Makro
' Tastenkombination: Strg+Umschalt+F
ActiveSheet.PageSetup.PrintArea = ActiveSheet.Selection
End Sub