wie bekomme ich es hin, dass bei einer Textbox nur der Text gedruckt wird, nicht der Rahmen bzw. der Hintergrund?
Danke für eure Hilfe.
Gruß
Karsten
'Makros im Tabellenblatt-Modul des Blattes mit der Textbox
Sub TextBoxvordrucken()
With Me.TextBox1 'Den Namen der Textbox ggf. anpassen !!!
.BorderStyle = fmBorderStyleNone
.BackStyle = fmBackStyleTransparent
.SpecialEffect = fmSpecialEffectFlat
End With
End Sub
Sub TextBoxNachdrucken()
With Me.TextBox1 'Den Namen der Textbox ggf. anpassen !!!
.BorderStyle = fmBorderStyleSingle
.BackStyle = fmBackStyleOpaque
.SpecialEffect = fmSpecialEffectSunken
End With
End Sub
Private Sub CommandButton1_Click()
'Eigenschaften für Commandbutton(Active-X/STeuerelmente-Toolbox) wie folgt einstellen
'TakeFocusOnClick: False
'PrintObject: False
TextBoxvordrucken
Me.PrintOut preview:=True
TextBoxNachdrucken
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen