Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Icon mit (VBA) anlegen
Autor: VBAMark222
Datum: 30.12.04 21:46
Hi, hab die Sache doch im Griff. Erst überzeuge ich mich, ob ein Pfad existiert, dann lege ich die Ordnen und die Dateien an und erst dann darf ich die Verknüpfungen anlegen. Dann gibt es auch ein schönes Ordnersymbol. Oder kann man auch eine andere Quelle für Iconsymbole angeben. Hier ein Ausschnitt: If Empty = Empty Then sIconLocation = TargetPath '#########Was kann hier rein?######## Else sIconLocation = IconLocation End If objWSHShortcut.TargetPath = "J:\Berichte\MB.xls" 'Ziel-Datei objWSHShortcut.IconLocation = sIconLocation 'Test objWSHShortcut.Description = "Ort: J:\Berichte" 'Wie Control-Tiptext objWSHShortcut.WorkingDirectory = "C:\Windows" objWSHShortcut.WindowStyle = 1 'WshNormalFocus objWSHShortcut.Save Gruß VBAMark222

Icon mit (VBA) anlegen	1.448	VBAMark222	23.12.04 16:09
Re: Icon mit (VBA) anlegen	970	Martoeng	25.12.04 15:10
Re: Icon mit (VBA) anlegen	1.022	VBAMark222	30.12.04 17:37
Re: Icon mit (VBA) anlegen	935	Martoeng	30.12.04 18:07
Re: Icon mit (VBA) anlegen	1.016	VBAMark222	30.12.04 21:46
Re: Icon mit (VBA) anlegen	1.082	VBAMark222	31.12.04 15:42

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen