Top-Themen

Aktuelle Themen (A bis Z)

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

Vbs Text an Textmarke nur ein einziges Mal einfügen

Mitglied: sniperwolf14

sniperwolf14 (Level 1) - Jetzt verbinden

03.08.2011 um 14:11 Uhr, 2865 Aufrufe

Ich versuche gerade in einem Word2003-Dokument per vbs Nutzerdaten aus dem AD auszulesen. Das funktioniert auch ohne Probleme.
Ich habe das Problem, dass jedes Mal, wenn das Dokument geöffnet wird, er automatisch meinen Nachnamen an der Stelle ausgibt, sprich nach dem 3. Mal öffnen steht 3x mein Nachname an der Textmarke

Wie kann ich Word sagen, er soll nur einmal an der Textmarke einfügen soll und dann nie wieder?

Ich danke schon mal ganz riesig.


Hier mein Code:
01.
Sub AutoNew() 
02.
     
03.
On Error Resume Next 
04.
Dim qQuery, objSysInfo, objuser 
05.
Dim FullName, EMail, PhoneNumber 
06.
 
07.
' Active Directory Informationen für den angemeldeten User lesen 
08.
Set objSysInfo = CreateObject("ADSystemInfo") 
09.
objSysInfo.RefreshSchemaCache 
10.
qQuery = "LDAP://" & objSysInfo.UserName 
11.
Set objuser = GetObject(qQuery) 
12.
 
13.
'Variablen mit AD-Attributen füllen (es gibt viel mehr Attributen zb. FaxNumber usv.) 
14.
FullName = objuser.firstname & " " & objuser.lastname 
15.
lastname = objuser.lastname 
16.
PhoneNumber = objuser.TelephoneNumber 
17.
Firma = objuser.Company 
18.
 
19.
'Vordefinierte Textmarken in Word füllen 
20.
If ActiveDocument.Bookmarks("txtNachname").Range.Text = "" Then 
21.
   ActiveDocument.Bookmarks("txtNachname").Range.Text = lastname 
22.
End If 
23.
 
24.
End Sub
Ähnliche Inhalte
Webentwicklung

Foto Upload und Default Text einfügen

gelöst Frage von smackeeWebentwicklung12 Kommentare

Hallo zusammen Ich bin auf der Suche nach einem Tool oder wie man das umsetzen kann. Ein User laded ...

Batch & Shell

Text per Batchdatei kopieren und einfügen

Frage von imebroBatch & Shell47 Kommentare

Hallo, ich würde gerne für meine Kollegen eine kleine Hilfe basteln Wir nutzen ein Programm, in dem auch Memos ...

Batch & Shell

(Batch) festgelegte Zeichen vor und nach Text einfügen

gelöst Frage von unauthorized-userBatch & Shell2 Kommentare

Hallo Community, ich stehe gerade vor einem (wahrscheinlich sehr banalem) Problem und benötige eure Hilfe. Ausgangssituation: Ich habe mehrere ...

Entwicklung

VBS Für Änderung Mehere Texte in einer Datei

gelöst Frage von Mac2345Entwicklung13 Kommentare

Hallo ich benötige etwas Hilfe beim schreibe von vbs. Ich habe eine Datei die ich in einem bestimmten Bereich ...

Neue Wissensbeiträge
Verschlüsselung & Zertifikate
Meine Wissenssammlung zu Bitlocker
Erfahrungsbericht von DerWoWusste vor 10 StundenVerschlüsselung & Zertifikate2 Kommentare

Die Motivation für diesen Beitrag waren die vielen Posts rund um dieses Thema, die deutlich machen, wie viele Einzelaspekte ...

E-Mail
Email-Apps und Verhalten bei Pop3
Erfahrungsbericht von kfranzk vor 2 TagenE-Mail11 Kommentare

Hallo Freunde, da mir mein diesbezüglicher Faden als gelöst markiert wurde, muss ich hier neu aufsetzen. Ich arbeite bewusst ...

Hyper-V

Optimiertes Ubuntu per Microsoft Hyper-V-Schnellerstellung verfügbar

Anleitung von Frank vor 2 TagenHyper-V

Für Microsofts Virtualisierungssoftware Hyper-V ist ab sofort auch ein optimiertes Ubuntu 18.04.1 LTS verfügbar. In der "Hyper-V-Schnellerstellung" App, die ...

Sicherheits-Tools

Trend Micro WorryFree Business Security (WFBS) 10 - neuer Patch 1470 verfügbar

Tipp von VGem-e vor 2 TagenSicherheits-Tools1 Kommentar

Servus, mal sehen, ob mit Patch 1470, zu finden unter dann die angeblich fehlerhafte Funktion, die unter W10 im ...

Heiß diskutierte Inhalte
Netzwerke
Hilfe bei der Planung meines Heimnetzwerks
Frage von DHD082Netzwerke14 Kommentare

Hallo zusammen, wir bauen gerade ein Einfamilienhaus, welches ich mit einem Heimnetzwerk ausstatten möchte. Da ich zwar auch in ...

Tipps & Tricks
Nagstamon und PRTG Monitoring
Frage von Der.ITlerTipps & Tricks13 Kommentare

Hallo Ihr, heute am Sonntag bin ich mal früh aufgestanden um mich mit dem Problem von Gestern zu beschäftigen. ...

Hardware
Sophos SG135 - Routing
Frage von Xaero1982Hardware13 Kommentare

Moin Zusammen, ich ersetze gerade nen alten Cisco DualWAN Router durch eine SG 135. Ich muss bestimmte Ziele über ...

Datenschutz
Gilt ein Ransomware-Befall als Datenpanne nach DSGVO?
Frage von MOS6581Datenschutz12 Kommentare

Moin Kollegen, wenn sich jemand Ransomware einfängt und dadurch bspw. Kundendaten verschlüsselt werden; gilt dies dann als meldepflichtige Datenpanne ...