Thema Datum  Von Nutzer Rating
Antwort
Rot Wert in Word einfügen aber rechtsbündig
 16.12.2011 14:59:40 LIA
NotSolved
17.12.2011 11:33:13 Holger
NotSolved
19.12.2011 08:48:32 LIA
NotSolved
19.12.2011 13:02:46 Dekor
NotSolved
19.12.2011 13:17:03 LIA
Solved

Ansicht des Beitrags:
Von:
LIA		 Datum:
16.12.2011 14:59:40		 Views:
2811		 Rating:
     
Antwort:
  Ja
Thema:
Wert in Word einfügen aber rechtsbündig

Hallo zusammen,

habe ein Makro, dass mir alle Werte ich Spalte 1 in ein Worddokument überträgt:

 

Private Sub CommandButton1_Click()
 
        
 If Not Word_Connect Then Exit Sub 'Raus wenns brennt
    Dim zahl As Long
    Dim i As Long
    Dim zeile As Long
    
    
    On Error GoTo Fehler
    With oWord_App
         .Documents.Add
    End With
    zeile = 1
    
    Do Until (i = zeile + 1)
        zeile = zeile + 1
        zahl = Cells(zeile, 1).Value
        If (Cells(zeile, 1).Value = "") Then GoTo hell
        
        With oWord_App
           
            .Selection.Text = zahl
            .Selection.Font.Size = 370
            .Selection.Font.Bold = True
            .Selection.Position = Right
            
        End With

        With oWord_App
            .ActiveDocument.PageSetup.Orientation = 1
            .PrintOut
        End With
        zahl = zahl + 1
        i = i + 1
        
    Loop
hell:
Aufraeumen:



    oWord_App.Quit

    Word_Disconnect
    Exit Sub
Fehler:
    MsgBox Err.Description
    Resume Aufraeumen
    

End Sub

 

 

Problem ist, dass der Wert linksbündig eingetragen wird. Wie kann ich das ändern, wenn der Wert aber rechtsbündig stehen soll? Wie heißt der Selection Befehl?

 

Danke!!

 

Gruß

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

Thema Datum  Von Nutzer Rating
Antwort
Rot Wert in Word einfügen aber rechtsbündig
 16.12.2011 14:59:40 LIA
NotSolved
17.12.2011 11:33:13 Holger
NotSolved
19.12.2011 08:48:32 LIA
NotSolved
19.12.2011 13:02:46 Dekor
NotSolved
19.12.2011 13:17:03 LIA
Solved