Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Inhalt einer Textmarke per VBA prüfen

Frage Entwicklung VB for Applications

Mitglied: Bino209

Bino209 (Level 1) - Jetzt verbinden

21.07.2008, aktualisiert 23.07.2008, 11597 Aufrufe, 3 Kommentare

Hallo zusammen,

hoffe einer von euch kann mir helfen, habe nämlich ein kleines Problem. Muss in WORD per VBA prüfen ob in einer Textmarke ein Text vorhanden ist oder nicht... Wenn ja, dann soll die Helligkeit eines Bild auf 100% bzw. 50% gestellt werden, dass Bild soll also angezeigen werden oder nicht, je nach Zustand der Textmarke.

If ActiveDocument.Bookmarks("B121").Select = TRUE Then ' Abfrage nach Inhalt der Textmarke ... ???

ActiveDocument.Shapes("Picture 3").Select
Selection.ShapeRange.PictureFormat.Brightness = 1# 'ausbleden
Selection.ShapeRange.PictureFormat.Contrast = 0.5

Else

ActiveDocument.Shapes("Picture 3").Select
Selection.ShapeRange.PictureFormat.Brightness = 0.5 'einblenden
Selection.ShapeRange.PictureFormat.Contrast = 0.5

End If

Vielen Dank schonmal für eure Hilfe...


Gruß
Bino
Mitglied: RDiller
21.07.2008 um 11:38 Uhr
Hallo Bino,

probiere es doch mal so:

Zu der Textmarke springen und diese markieren

Selection.GoTo What:=wdGoToBookmark, Name:="B121"

Dann den Inhalt der Textmarke prüfen

If Selection = "Was Du halt prüfen willst" Then

Gruß

Ralf
Bitte warten ..
Mitglied: Bino209
22.07.2008 um 11:23 Uhr
Habe es anders herausgefunden ... Aber trotzdem Danke RDiller...

If ActiveDocument.FormFields("B123").Result = "" Then


Du musst die Textmarke mit FormFields ansprechen, dann klappt alles wunderbar ....
Bitte warten ..
Mitglied: RDiller
23.07.2008 um 08:51 Uhr
Hi Bino,


das geht aber nur wenn Du ein Formular hast und bei Deiner Anfrage hast Du über Textmarken gesprochen!




Gruß

Ralf
Bitte warten ..
Ähnliche Inhalte
Visual Studio
gelöst Vb.net: Word-Doc seitenweise durchsuchen nach Textmarke (7)

Frage von ahstax zum Thema Visual Studio ...

Batch & Shell
gelöst EDI Dateien auf Inhalt prüfen und verschieben (6)

Frage von ThomasKern zum Thema Batch & Shell ...

VB for Applications
VBA Grenzwerte in String prüfen Regex ??? Excel2010 (3)

Frage von Chillministrator zum Thema VB for Applications ...

VB for Applications
VBA - Welchen Inhalt hat eine Zelle die mit der Taste Enft geleert wird? (3)

Frage von Juckie zum Thema VB for Applications ...

Neue Wissensbeiträge
Windows Update

Microsoft Update KB4034664 verursacht Probleme mit Multimonitor-Systemen

(2)

Tipp von beidermachtvongreyscull zum Thema Windows Update ...

Viren und Trojaner

CNC-Fräsen von MECANUMERIC werden (ggf.) mit Viren, Trojanern, Würmern ausgeliefert

(4)

Erfahrungsbericht von anteNope zum Thema Viren und Trojaner ...

Windows 10

Windows 10: Erste Anmeldung Animation deaktivieren

(3)

Anleitung von alemanne21 zum Thema Windows 10 ...

Heiß diskutierte Inhalte
Netzwerkprotokolle
Leiten "dumme" Switches VLAN-Tags mit durch? (23)

Frage von coltseavers zum Thema Netzwerkprotokolle ...

Windows Server
gelöst Neues KB für W10 1607 und W2K16 wieder mal nicht im WSUS 3.0, hat das noch jemand? (15)

Frage von departure69 zum Thema Windows Server ...

Batch & Shell
Batch zum suchen und verschieben von Verknüpfungen (12)

Frage von zeroblue2005 zum Thema Batch & Shell ...

Router & Routing
FTTH bzw FTTB Router (11)

Frage von ukulele-7 zum Thema Router & Routing ...