Re: [de-users] Rahmeninhalt kopieren

Hallo Thomas,

mit einem Makro könntest Du die zu druckenden Etiketten auswählen,
d.h. die "Drucken" Option in den Eigenschaften der einzelnen Rahmen
aktiveren bzw. deaktivieren.
In der Druckvorschau siehst Du dann das Ergebnis.

REM  *****  BASIC  *****
OPTION EXPLICIT

Sub Test()
        ' Drucke Etikett 1 bis einschließlich 8
        Call Auswahl(1,8)
End Sub

Sub Auswahl(ByVal nStart as Integer, ByVal nStop as Integer)
        Dim oDoc as Object
        Dim oFrame as Object
        Dim i as Integer
        Dim nCount as Integer
        
        oDoc = ThisComponent
        nCount = oDoc.TextFrames.getCount()

        For i = 0 To nCount -1
                oFrame = oDoc.TextFrames.getByIndex(i)
                If i+1 >= nStart and i+1 <= nStop Then
                        oFrame.Print = True
                Else
                        oFrame.Print = False
                EndIf
        Next i
End Sub


Gruß
Oliver


--
Liste abmelden mit E-Mail an: users+unsubscribe@de.libreoffice.org
Probleme? https://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: https://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: https://listarchives.libreoffice.org/de/users/
Datenschutzerklärung: https://www.documentfoundation.org/privacy