Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Den in einer Zelle genannten Bereich eines Blattes drucken

Gruppe

Bereich

Problem

Wie kann ich den in einer Zelle genannten Druckbereich eines anderen Tabellenblattes über VBA ausdrucken?

Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.

StandardModule: basMain

Sub Drucken()
   Dim sWks As String, sRng As String, sAdr As String
   sAdr = Range("A1").Value
   sWks = Left(sAdr, InStr(sAdr, "!") - 1)
   sRng = Right(sAdr, Len(sAdr) - InStr(sAdr, "!"))
   Worksheets(sWks).Range(sRng).PrintPreview
End Sub