Thema Datum  Von Nutzer Rating
Antwort
03.02.2018 13:45:50 Karl
NotSolved
Blau Inhalt von Textmarken ändern
 03.02.2018 14:44:27 Gast68099
NotSolved

Ansicht des Beitrags:
Von:
Gast68099		 Datum:
03.02.2018 14:44:27		 Views:
674		 Rating:
     
Antwort:
  Ja
Thema:
Inhalt von Textmarken ändern

Hier ist ein Code aus meinem Archiv. Es wird gezeigt, wie man Bookmarks auslist und ändert.

Beachte, es gibt 2 Arten von bookmarks.

?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
http://www.vbaexpress.com/forum/showthread.php?59307-Update-bookmark-text
 
Sub UpdateBookmarks()
     'Graham Mayor - http://www.gmayor.com - Last updated - 30/04/2017
    Dim i As Long
    Dim oBM As Bookmark
    Dim sText As String
    Dim sName As String
    On Error GoTo err_Handler
    For i = 1 To 3
        For Each oBM In ActiveDocument.Bookmarks
            If oBM.Name = "Project_" & i & "_bookmark" & i Then
                sName = oBM.Name
                sText = oBM.Range.Text
                sText = Left(sText, Len(sText) - 4) & "2020"
                FillBM sName, sText
                Exit For
            End If
        Next oBM
    Next i
lbl_Exit:
    Set oBM = Nothing
    Exit Sub
err_Handler:
    MsgBox Err.Number & vbCr & Err.Description
    Err.Clear
    GoTo lbl_Exit
End Sub

 

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:
WYSIWYG-Editor, ctl00_Content_editor1



  • 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
03.02.2018 13:45:50 Karl
NotSolved
Blau Inhalt von Textmarken ändern
 03.02.2018 14:44:27 Gast68099
NotSolved