X6 - Problme bei Ebenen steuern (Dokumentgitter)....

[norre]

Hallo Matze,
du darfst auch die Zeilen nicht verändern
Dr. Macro Koters Code müßte dann so aussehen

Code:

Sub GridNoPrint()

    Dim doc As Document
    Dim lyr As Layer
    
    Set doc = CorelDRAW.ActiveDocument
    
    For Each lyr In doc.MasterPage.Layers
        If lyr.Name = "Dokumentgitter" Then
        lyr.Printable = False
    End If
    Next

End Sub

Soll das Gitter druckbar sein, dann müßtest du False durch True ersetzen.

Wie schon geschrieben ändert das Macro bei meinem X6.4 nicht die Druckbarkeit der Gitterebene.
Aber da steht das Gitter ja eh auf nicht druckbar