Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Dokument auf Textmarken prüfen
zurück: Aus beliebiger Datei mit Wordmakro Dateigröße ermitteln weiter: Word - Seiten an verschiedene Drucker verteilen. Makro? Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Degelmann
Gast


Verfasst am:
30. Dez 2005, 10:32
Rufname:

Dokument auf Textmarken prüfen - Dokument auf Textmarken prüfen

Nach oben
       

Hallo zusammen.
Ich möchte überprüfen, ob eine bestimmte Textmarke in einem Dokument vorkommt.

Eingesetzt wird WORD XP.

Augenblicklicher Code:
Selection.GoTo what:=wdGoToBookmark, Name:="Raum"
Selection.TypeText Text:=frmAdressenwaehlen.Controls("txtRaum")

Vor diesem Zeilen möchte ich prüfen lassen, ob es diese Textmarke überhaupt gibt. Das müßte doch zu prüfen sein, oder ?

Gruß,
Frank Degelmann
Lisa
Moderator; Word seit Word 5.0 (für DOS)


Verfasst am:
30. Dez 2005, 12:10
Rufname:
Wohnort: Leipzig

AW: Dokument auf Textmarken prüfen - AW: Dokument auf Textmarken prüfen

Nach oben
       

Hallo Frank,

klar, das ist sogar sehr zu empfehlen:
Code:
If ActiveDocument.Bookmarks.Exists("Raum") Then
   Selection.GoTo What:=wdGoToBookmark, Name:="Raum"
   Selection.TypeText Text:=frmAdressenwaehlen.Controls("txtRaum")
End If

Du kannst auch diese Funktion ResetBookmark benutzen:
Code:
Function ReSetBookmark(ByVal strName As String, ByVal strText As String)
'Recycling-Textmarke mit übernommenen Werten, geht für alle Textmarken

    Dim bm As Bookmark
    Dim rng As Range

    If ActiveDocument.Bookmarks.Exists(strName) Then
        Set bm = ActiveDocument.Bookmarks(strName)
        Set rng = bm.Range
        rng.Text = strText
        ActiveDocument.Bookmarks.Add strName, rng
    End If
   
    Set rng = Nothing
    Set bm = Nothing

End Function

Diese rufst du dann jeweils auf und gibst ihr als Argumente den Namen der Bookmark und den einzusetzenden Text mit. Die ReSetBookmark kommt ohne Selection aus, sondern ersetzt gleich den Range der Textmarke. Das läuft schneller und sicherer.

_________________
Sei doch so nett und gib eine Rückmeldung, ob es klappt!
Gruß, Lisa

Guter Rat ist teuer!
Degelmann
Gast


Verfasst am:
02. Jan 2006, 11:36
Rufname:


AW: Dokument auf Textmarken prüfen - AW: Dokument auf Textmarken prüfen

Nach oben
       

Hallo Lisa,

es funktioniert wunderbar.
Vielen Dank für die Informationen, haben mir sehr geholfen.

Gruß,
Frank Degelmann
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Word Serienbriefe: IF-Feld, mehrere Bedingungen, verknüpft mit Textmarken 0 Psychobe 194 25. Nov 2013, 15:23
Psychobe IF-Feld, mehrere Bedingungen, verknüpft mit Textmarken
Keine neuen Beiträge Word Serienbriefe: Textmarken: Alle innerhalb einem Dokument anzeigen lassen 1 Gast 815 11. März 2013, 23:28
MarkMH_K Textmarken: Alle innerhalb einem Dokument anzeigen lassen
Keine neuen Beiträge Word Serienbriefe: Dynamisch erzeugtes dokument in WORD 2 Wotild 284 13. Nov 2012, 14:36
Gast Dynamisch erzeugtes dokument in WORD
Keine neuen Beiträge Word Serienbriefe: DOCVariable prüfen und ggf. Leerzeichen vor den Inhalt setze 0 FMMarkus 401 13. Sep 2012, 09:26
FMMarkus DOCVariable prüfen und ggf. Leerzeichen vor den Inhalt setze
Keine neuen Beiträge Word Serienbriefe: Probleme mit geschütztem Dokument aus Serienbriefvorlage 1 Tonarel 289 21. Aug 2012, 12:45
Tonarel Probleme mit geschütztem Dokument aus Serienbriefvorlage
Keine neuen Beiträge Word Serienbriefe: Word 2003 – Textmarken sichtbar machen 1 goetzbos 907 05. Jul 2012, 10:33
MarkMH_K Word 2003 – Textmarken sichtbar machen
Keine neuen Beiträge Word Serienbriefe: 3 in 1 Dokument 2 lm 384 14. Mai 2012, 10:36
halweg 3 in 1 Dokument
Keine neuen Beiträge Word Serienbriefe: Einbinden Textmarken und Makro aus DOT-Datei in Serienbrief 0 hurganator 690 21. Feb 2012, 10:36
hurganator Einbinden Textmarken und Makro aus DOT-Datei in Serienbrief
Keine neuen Beiträge Word Serienbriefe: Word 2010 Serienbrief in normales Word Dokument umwandeln 4 wolfgangeder 3028 19. Okt 2011, 23:59
charlybrown Word 2010 Serienbrief in normales Word Dokument umwandeln
Keine neuen Beiträge Word Serienbriefe: integrierte Exceltabelle / mehrere Positionen in Dokument 3 eva0103 1494 23. Jun 2011, 16:19
charlybrown integrierte Exceltabelle / mehrere Positionen in Dokument
Keine neuen Beiträge Word Serienbriefe: Geschütztes Dokument, Umschlag drucken 1 MrUmschlag 1601 30. Aug 2010, 08:45
MrUmschlag Geschütztes Dokument, Umschlag drucken
Keine neuen Beiträge Word Serienbriefe: datenfelder beim öffnen von dokument nicht aktualisiert! 6 goto_# 3822 17. Nov 2009, 20:19
goto_# datenfelder beim öffnen von dokument nicht aktualisiert!
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: HTML CSS