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

Excel Signatur

Frage Microsoft Microsoft Office

Mitglied: JK23JK

JK23JK (Level 1) - Jetzt verbinden

20.08.2013 um 15:28 Uhr, 3468 Aufrufe, 5 Kommentare, 2 Danke

Hallo zusammen,

ich habe da mal eine kurze Frage wozu ich leider nicht durch googlen fündig geworden bin.
Ich hoffe ich habe nicht falsch gegoogelt und gleich kommen 1000 Links zurück.


Es ist so, ich habe ein Excel Dokument mit verschiedenen Feldern etc.
Ein Feld soll davon nach Bearbeitung durch verschiedene Benutzer "unterschrieben" werden.

Gibt es die Möglichkeit zu sagen Wenn Benutzer XY das Dokument öffnet dann soll direkt in das Feld xy die unterschrift meinetwegen als .jpg eingefügt werden.
Die Unterschrift soll er sich aus nem bestimmten Pfad holen der über die Systemvariable welcher Benutzer angemeldet ist identifiziert wird.

Vielen Dank vorab.

Grüße
Mitglied: colinardo
20.08.2013, aktualisiert 21.08.2013
Hallo JK23JK,
no Problem:
Noch den Pfad zu den Bildern und den Dateinamen in Zeile 10 zusammensetzen, und das Worksheet und die Zelle in der die Unterschrift eingefügt werden soll in Zeile 16/17 festlegen, fertig.

01.
Private Sub Workbook_Open() 
02.
    Dim username As String 
03.
    Dim ws As Worksheet 
04.
     
05.
    'Usernamen des angemeldeten Users holen 
06.
    Set objShell = CreateObject("Wscript.Shell") 
07.
    username = objShell.ExpandEnvironmentStrings("%username%") 
08.
     
09.
    'Pfad zum Bild zusammensetzen 
10.
    strPathToImage = "E:\Unterschriften\" & username & ".png" 
11.
     
12.
    'Wenn Pfad und Bild existieren ... 
13.
    Set fso = CreateObject("Scripting.Filesystemobject") 
14.
    If (fso.FileExists(strPathToImage)) Then 
15.
        'Worksheet und Zelle auswählen in die die Unterschrift eingefügt werden soll 
16.
        set ws = Worksheets(1) 
17.
        ws.Range("A1").Select 
18.
        'Bild einfügen 
19.
        ws.Pictures.Insert (strPathToImage) 
20.
    Else 
21.
        MsgBox "Pfad bzw. Unterschrift existiert nicht!" & vbCrLf & strPathToImage 
22.
    End If 
23.
End Sub
Das ganze fügst du dann in dein Excel VBA-Project (ALT-F11) unter "Diese Arbeitsmappe" ein und speicherst das Dokument als *.xlsm ab. Eventuell musst du noch deine Makro-Sicherheitseinstellungen anpassen.

Grüße Uwe
Bitte warten ..
Mitglied: JK23JK
21.08.2013 um 09:50 Uhr
Hallo Uwe,


vielen Dank du hast mir sehr geholfen.

viele Grüße
JK23JK
Bitte warten ..
Mitglied: Barthinator
21.08.2013 um 12:31 Uhr
Moin,

vielen Dank erstmal! Genau das habe ich gesucht

Allerdings bekomme ich immer den Laufzeitfehler '91: Objektvariable oder With-Blockvariable nicht festgelegt.

Debugger sagt in Zeile 16.

Was kann ich da machen?

LG
Bitte warten ..
Mitglied: colinardo
21.08.2013, aktualisiert um 12:35 Uhr
sorry, da war ein kleiner typo drin.
muss so in Zeile 16 geschrieben werden:
01.
set ws = Worksheets(1)
ist oben korrigiert.

Grüße Uwe
Bitte warten ..
Mitglied: Barthinator
21.08.2013 um 12:42 Uhr
Ich bin begeistert!

Super vielen Dank!
Bitte warten ..
Ähnliche Inhalte
Microsoft Office
Excel File - an einer Stelle nur Lesen und an anderer Bearbeiten (2)

Frage von LenzDan zum Thema Microsoft Office ...

Microsoft Office
Wieso druckt PDF keine Excel Zellenfüllung? (4)

Frage von ITCrowdSupporter zum Thema Microsoft Office ...

Microsoft Office
Hilfe bei Erstellung eines Suchfelds im Excel (1)

Frage von ZeeRee zum Thema Microsoft Office ...

VB for Applications
gelöst EXCEL Macro oder ähnliches gesucht (3)

Frage von reissaus73 zum Thema VB for Applications ...

Neue Wissensbeiträge
Google Android

Cyanogenmod alternative Downloadquelle

(5)

Tipp von Lochkartenstanzer zum Thema Google Android ...

Batch & Shell

Batch als Dienst bei Systemstart ohne Anmeldung ausführen

(5)

Tipp von tralveller zum Thema Batch & Shell ...

Sicherheits-Tools

Sicherheitstest von Passwörtern für ganze DB-Tabellen

(1)

Tipp von gdconsult zum Thema Sicherheits-Tools ...

Heiß diskutierte Inhalte
Windows Server
gelöst Exchange HyperV Prozessorlast (19)

Frage von theoberlin zum Thema Windows Server ...

Windows Server
Server mit Netzwerkaussetzern (18)

Frage von SarekHL zum Thema Windows Server ...

LAN, WAN, Wireless
gelöst Batchdatei um einen Proxy einzustellen (14)

Frage von CrystalFlake zum Thema LAN, WAN, Wireless ...

Netzwerke
Vorschlag Hotelverkabelung (14)

Frage von FA-jka zum Thema Netzwerke ...