Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Zellen vom Druck ausschließen

Gruppe

Bereich

Problem

Wie kann ich einen Zellbereich vom Druck ausschließen? Der auszuschließende Bereich soll über einen Dialog festgelegt werden.

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

StandardModule: basMain

Sub BereichFestlegen()
   Const csMsg As String = "Auszuschließenden Bereich selektieren:"
   Dim rng As Range
   Dim sTxt As String
   Set rng = Application.InputBox(prompt:=csMsg, Type:=8)
   sTxt = rng.NumberFormat
   rng.NumberFormat = ";;;"
   ActiveSheet.Range("A1:A50").PrintPreview
   rng.NumberFormat = sTxt
End Sub

    

Beiträge aus dem Excel-Forum zu den Themen Druck und Bereich