VBA-Forum - Das Forum zu Microsoft VBA

Ansicht des Beitrags:

Von: vamsi	Datum: 04.03.2017 01:32:28	Views: 897	Rating:	Antwort:
Thema: Printing name tags using vba
I want to print the name tags into one sheet using VBA. The Same Name should be print at the top position( reverse direction) and the bottom position on the same page. I am using following code Private Sub CommandButton1_Click() Dim FoundRange As Range Dim EndRange As Range Set FoundRange = Sheet1.Cells.Find(TextBox1.Text) Set EndRange = Sheet1.Range(FoundRange.Address).Offset(0, 2) If Not FoundRange Is Nothing Then Range(FoundRange.Address, EndRange.Address).PrintOut Else MsgBox "Not available" End If Using this code, I am printing only one name at the top. Does anyone knows, how can I print the same name on top(reverse) and bottom? thanks in advance.

Ihre Antwort

Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema:		Name:		Email:

Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen