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

Word Unterschriftenmakro

Frage Entwicklung VB for Applications

Mitglied: aiun

aiun (Level 1) - Jetzt verbinden

20.10.2006, aktualisiert 12:47 Uhr, 5816 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 ..
Neuester Wissensbeitrag
Windows 10

Powershell 5 BSOD

(8)

Tipp von agowa338 zum Thema Windows 10 ...

Ähnliche Inhalte
Microsoft Office
Laufzeitfehler 438 bei Word und Exel-AddIns (1)

Frage von klanax zum Thema Microsoft Office ...

Windows 7
Microsoft Word - Anzeigefehler bei Scrollen

Frage von heisenberg4 zum Thema Windows 7 ...

Microsoft Office
gelöst Wie kann man die Standard-Schriftart bei einfügen von Text in Word 2013 festlegen? (3)

Frage von Rene1976 zum Thema Microsoft Office ...

Microsoft Office
Rechnungen in Word - zu lange Formel (2)

Frage von traller zum Thema Microsoft Office ...

Heiß diskutierte Inhalte
Microsoft
Ordner mit LW-Buchstaben versehen und benennen (20)

Frage von Xaero1982 zum Thema Microsoft ...

Outlook & Mail
gelöst Outlook 2010 findet ost datei nicht (19)

Frage von Floh21 zum Thema Outlook & Mail ...

Netzwerkmanagement
gelöst Anregungen, kleiner Betrieb, IT-Umgebung (18)

Frage von Unwichtig zum Thema Netzwerkmanagement ...

Festplatten, SSD, Raid
M.2 SSD wird nicht erkannt (14)

Frage von uridium69 zum Thema Festplatten, SSD, Raid ...