Thema Datum  Von Nutzer Rating
Antwort
Rot Position Cursor Ende einer Zeile in Word erkennen VBA
18.05.2022 19:07:10 Kerstin
NotSolved
18.05.2022 23:35:27 Gast28545
NotSolved
19.05.2022 08:28:30 Mase
NotSolved
19.05.2022 12:20:20 Gast69954
NotSolved
20.05.2022 10:19:52 Kerstin
Solved

Ansicht des Beitrags:
Von:
Kerstin
Datum:
18.05.2022 19:07:10
Views:
161
Rating: Antwort:
  Ja
Thema:
Position Cursor Ende einer Zeile in Word erkennen VBA

Hallo,

mit Hilfe der antworten hier aus dem Forum konnte ich in kürzester Zeit mit meinem Makro weiterkommen.

An dieser Stelle komme ich aber nicht mehr weiter: ElseIf Selection.IPAtEndOfLine = False Then Selection.MoveRight (1)

Was möchte ich tun? Wenn der Cursor NICHTam Ende einer Zeile ist (also der Cursor steht NICHT direkt VOR der Absatzmarke), dann soll der Cursor eine Position nach rechts laufen. Die Abfrage, ob der Cursor vor dem Absatzzeichen steht, kenne ich nicht. Ich hatte es mal mit IPASTENDOFLINE versucht, ging aber leider nicht.

 

Danke für eure tolle Hilfe!

 

 Selection.SetRange Start:=bmBookmark.End, End:=bmBookmark.End
            Selection.MoveLeft (1)
           
            If Selection.IsEndOfRowMark = True Then
                While Selection.IsEndOfRowMark = True
                Selection.MoveLeft (1)
                Wend
'die folgende Abfrage funktioniert leider nicht, weil wahrscheinlich die Info zur Selection falsch ist.            

ElseIf Selection.IPAtEndOfLine = False Then
                Selection.MoveRight (1)
            End If
           
               With Selection
                .Font.Size = 8
                .Font.Bold = True
                .Font.ColorIndex = wdGreen
                .Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, Text:= _
                  "QUOTE" & " " & BookmarkInsert & "#>", PreserveFormatting:=True
                End With

 


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 Position Cursor Ende einer Zeile in Word erkennen VBA
18.05.2022 19:07:10 Kerstin
NotSolved
18.05.2022 23:35:27 Gast28545
NotSolved
19.05.2022 08:28:30 Mase
NotSolved
19.05.2022 12:20:20 Gast69954
NotSolved
20.05.2022 10:19:52 Kerstin
Solved