Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

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
GELÖST

Word Unterschriftenmakro

Frage Entwicklung VB for Applications

Mitglied: aiun

aiun (Level 1) - Jetzt verbinden

20.10.2006, aktualisiert 12:47 Uhr, 5977 Aufrufe, 3 Kommentare

variable Dateipfade funktionieren nicht
[Edit by Mod] Verschoben von "Programmiersprachen" nach "Visual Basic, VBA, .NET und ähnliches Geraffel" [/Biber]

Hi,

ich habe folgendes Problem:

Ich hab ein Wordmakro erstellt das ein Bild von einem Netzpfad aufruft, in diesem Fall eine Unterschrift. Da diese natürlich bei jedem User unterschiedlich ist, habe ich auf einer Freigabe mehrere Verzeichnisse mit den passenden Usernamen angelegt und dort die Unterschrift als .jpg hineinkopiert.

Das Makro soll nun einfach folgende Fkt. übernehmen:

nimm Bild aus Ordner X und füge es in das Dokument ein.
01.
    Selection.InlineShapes.AddPicture FileName:= _ 
02.
      "X:\blabla\%username%\Unterschrift.jpg" _ 
03.
        , LinkToFile:=False, SaveWithDocument:=True
Wenn ich dieses Makro nun ausführe, bekomme ich folgende Fehlermeldung:
Laufzeitfehler: 5152
Kein gültiger Pfad- oder Dateiname

Hat kurioserweise auch schon mal funktioniert, allerdings mag er das jetzt nur noch mit festen Pfaden, also:

X:\blabla\Mustermann\unterschrift.jpg

Ich möchte natürlich nicht unendliche normal.dots anpassen und verteilen...

Sind diese %%-variablen in Makros überhaupt verfügbar/erlaubt oder war das reiner Zufall das es funktioniert hat?

Hat irgendwer eine ähnliche Konstellation laufen?

Ich danke im vorraus für jede Hilfestellung.
Mitglied: LordMDG
20.10.2006 um 10:26 Uhr
Moin!

Ich glaube nicht, das das mit den %% funktioniert.
Allerdings gibt es unter VBA eine Funktion, die den Benutzernamen herausfindet. Vielleicht solltest du in die Tichtung mal schauen.
Bitte warten ..
Mitglied: bastla
20.10.2006 um 11:43 Uhr
Hallo aiun!

Versuch mal

01.
Selection.InlineShapes.AddPicture FileName:= _ 
02.
      "X:\blabla\" & Environ("Username") & "\Unterschrift.jpg" _ 
03.
        , LinkToFile:=False, SaveWithDocument:=True
HTH
bastla
Bitte warten ..
Mitglied: aiun
20.10.2006 um 12:47 Uhr
Jear, damit funktionierts!

*begeistert sei*

Ich habe soviel mit riesigen aufwändigen VBA Scripts gelesen, dass ich kaum an eine einfache Lösung geglaubt habe.

VIELEN DANK!
Bitte warten ..
Ähnliche Inhalte
Microsoft Office
gelöst Schnellbausteine aus Word 2007 nach Word 2016 übernehmen (2)

Frage von TiTux zum Thema Microsoft Office ...

Microsoft Office
Word Dokumente öffnen sich nicht (5)

Frage von xbast1x zum Thema Microsoft Office ...

VB for Applications
gelöst Suche in Word (2)

Frage von MarcoBorn zum Thema VB for Applications ...

Microsoft Office
Laufzeitfehler 13 in Word 2013 (5)

Frage von Wild-Wolf zum Thema Microsoft Office ...

Neue Wissensbeiträge
Mac OS X

Apple hat macOS High Sierra veröffentlicht

(4)

Information von Frank zum Thema Mac OS X ...

Viren und Trojaner

Ransomware or Wiper? RedBoot Encrypts Files but also Modifies Partition Table

(4)

Information von BassFishFox zum Thema Viren und Trojaner ...

Notebook & Zubehör

WOL bei HP Notebooks

(8)

Erfahrungsbericht von Henere zum Thema Notebook & Zubehör ...

Heiß diskutierte Inhalte
Windows Server
Seit IP Umstellung DC DNS Fehler (29)

Frage von Yaimael zum Thema Windows Server ...

Windows 10
gelöst Netzwerkkarte schaltet sich erst nach dem Logon ein (24)

Frage von DerWoWusste zum Thema Windows 10 ...

Grafik
gelöst CAD Arbeitsplätze (17)

Frage von Diddi93 zum Thema Grafik ...

Weiterbildung
gelöst Fest angestellter Admin oder Systemhaus Admin mit Kundenbetreuung? (16)

Frage von Voiper zum Thema Weiterbildung ...