Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1128to1132
1128to1132
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Verknüpfung in Ordner speichern

Forumthread: Verknüpfung in Ordner speichern

Verknüpfung in Ordner speichern
Günter
Hallo Zusammen,
ich habe wieder ein Thema.
Wie kann ich per Makro von der gerade geöffnet Datei eine Verknüpfung in einem bestimmen Verzeichnis erstellen.
Wie kann ich später per Makro diese Verknüpfung wieder löschen.
Danke für EUre Hilfe.
Gruß Günter
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Verknüpfung in Ordner speichern
16.01.2010 14:38:11
Tino
Hallo,
so müsste es funktionieren eine Verknüpfung zu erstellen.
Dim oShell As Object, oLink As Object
Dim sLinkName$, sOrdner$, sLinkPfad$
sLinkPfad = ThisWorkbook.FullName 'Link Pfad
sLinkName = ThisWorkbook.Name 'Link Name
sOrdner = "G:\Ordner\" 'Ordner
' Verweis auf den Windows Scripting Host erstellen
Set oShell = CreateObject("WScript.Shell")
' Neuen Link Erstellen
Set oLink = oShell.CreateShortcut(sLinkName & ".lnk")
With oLink
.TargetPath = sLinkPfad
.WorkingDirectory = sOrdner
.Save
End With
Set oLink = Nothing
Set oShell = Nothing
und so kannst Du diese wieder löschen
Dim sLinkPfad$
sLinkPfad = ThisWorkbook.FullName & ".lnk" 'Link Pfad
Kill sLinkPfad
Gruß Tino
Anzeige
Anmerkung, löschen Verknüpfung
16.01.2010 14:40:29
Tino
Hallo,
beim löschen der Verknüpfung, muss natürlich der Pfad zu dieser angegeben werden.
Gruß Tino
AW: Verknüpfung in Ordner speichern
16.01.2010 15:24:57
Günter
Hallo Tino,
es klappt "fast".
Mein Problem ist, dass die Verknüpfung im Verzeichnis "c:\Usrer\...\Eigene Dokumente" und nicht in 'sOrdner' abgelegt wird.
Kannst Du mir einen Tipp geben?
Gruß Günter
Anzeige
AW: Verknüpfung in Ordner speichern
16.01.2010 15:34:30
Tino
Hallo,
du musst bei sLinkName den Pfad angeben wo der Link erstellt werden soll.
z. Bsp.
sLinkName = "C:\Ordner\" & ThisWorkbook.Name
Gruß Tino
Danke--AW: Verknüpfung in Ordner speichern
16.01.2010 17:00:14
Günter
Hallo Tino,
DANKE, das war es!
Gruß Günter
;

Forumthreads zu verwandten Themen

Automatisierter Email Versand xls vba
Christian

Hallo an alle Experten,
ich habe ein größeres Problem bezüglich des Versands von Woksheets als email Anhang und bräuchte dringend Hilfe.
Die Situation ist folgende:
Ich hab in verschiedenen Verzeichnissen(Ordnern) Excel WB (=Berichte/Reports) erzeugt, die jeweils nur aus einem She...
09.08.2008 11:00:00
Thread-ID: 1000468
6 Beiträge
Outlook Emails einlesen und löschen
Peter

Ich würde gerne den Outlook Posteingang in Excel einlesen und danach den Outlook Posteingang löschen.
Wie kann so etwas in VBA realisiert werden?
19.08.2008 18:20:00
Thread-ID: 1003019
3 Beiträge
Outlook Email einlesen/löschen
Peter

Ich bin zwar in der Lage Emails von Excel/VBA via Outlook abzusenden.
Jetzt würde ich jedoch gerne via VBA/Excel Emails einlesen, den Header der eingehenden Email auslesen und danach die Email wieder löschen.
Danke für die Unterstützung.
Grüße
Peter
29.08.2008 15:07:44
Thread-ID: 1005850
3 Beiträge
Anzeige
Email versenden Outlook - Problem
Peter

Ich versende via Excel/VBA alle 3 Minuten ein Email.
Nun kommt es ca. 1x am Tag vor, dass Outlook Emails nicht sofort sendet und sich die Emails im Postausgang sammeln bis ich Outlook schließe und wieder öffne.
Danke für die Unterstützung.
Grüße
Peter
29.09.2008 13:58:00
Thread-ID: 1013103
2 Beiträge
Email aus Excel über Outlook versenden
ray

Hallo,
ich plane grad neue Projekte und hab eine Frage, wo ich nur die Antwort aber keinen code brauche.
Ich möchte den Inhalt der Label oder textboxen von ein UserForm an Outlook übergeben und via Outlook versenden.
Dabei soll diese Mail in dem Outlookordner 'gesendete Objekte' e...
02.12.2008 10:35:00
Thread-ID: 1029428
3 Beiträge
Outlook-Mail aus Excel - Statusabfrage
Peter

Hallo,
aus Excel generiere ich Mail-Items mit nachfolgendem Code. Versendet werden diese durch manuelles Betätigen des "Senden"-Buttons. Gibt es eine Art Return-Code? Kann abgefragt werden, ob der "Senden"-"Button gedrückt wurde oder ob das Item ohne Senden geschlossen wurde?
Set MyOutA...
04.12.2008 14:07:27
Thread-ID: 1030167
6 Beiträge
Email über Outlook, Konto ändern
Nico

Hallo!
Ich schicke eine Email über ExcelVBA mit Outlook und dem Standardkonto.
Gibt es eine Möglichkeit die Email nicht über das Standardemailkonto zu verschicken, sondern über ein anderes Konto?
Wie kann ich das Konto vorher festlegen?
Sub EmailVerschickenKINDERSKIKURS() Dim...
16.12.2008 20:16:33
Thread-ID: 1033418
2 Beiträge
eMail aus Outlook in Excel einlesen
Heinzs

Hallo,
ich möchte eine in Outlook in einem bestimmten Ordner angekommene eMail in Excel weiterverarbeiten, d.h. wenn bestimmter Absender und bestimmter Betreff in bestimmten Ordner und bestimmtes Empfangsdatum vorliegt dann soll der Emailbody in die Exceltabelle ans Ende angefügt werden.
21.01.2009 15:36:17
Thread-ID: 1042242
3 Beiträge
Anzeige
Serienmail Outlook
Ilka

Hallo,
ich bräuchte mal wieder eure Hilfe. Ich möchte an einen bestimmten Personenkreis eine Art Serienmail verschicken, zu der jeder einen individuellen Datei-Anhang erhalten soll.
D. h. bei Herrn Müller soll der Anhang A, bei Frau Mayer Anhang B und bei Herr Schmitt Anhang C automati...
27.04.2009 08:15:33
Thread-ID: 1071278
3 Beiträge
Outlook Attachment abspeichern
jogi

Hallo zusammen,
ich möchte in Outlook ein Makro schreiben, dass mir von der E-Mail die Attachments in ein bestimmtes Verzeichnis speichert, jedoch soll an den gespeicherten Dateinamen das Datum der E-Mail drangehängt werden.
Bsp:
Die E-Mail vom 12.05.2009 enthält die Attachments: pa...
13.05.2009 10:04:32
Thread-ID: 1074731
2 Beiträge
Anzeige
Mailversand via Outlook
F.

Hallo
Möchte ein Reminder per Mail an mehrere Personen verschicken. Da ich auf den Geschmack von VBA gekommen bin, habe ich mir den folgenden Code zusammengesucht. Da ich die Sicherheitsabfrage umgehen möchte, habe ich zusätzlichen Code eingefügt.
Es erscheint die Fehlermeldung: Next o...
16.07.2009 15:48:48
Thread-ID: 1089111
7 Beiträge
Outlookmail aus Excel versenden
Peter

Hallo
ich erstelle von Excel aus mit VBA ein neues Mail in Outlook und versende es
Auszug:
Text = "Hier die Dateien"
Bereich = Sheets("Basis").Range("F19:H23") '? in Text einfügen
Sheets("Basis").Range("F19:H23").Copy '? in Text einfügen
Se...
07.10.2009 09:33:30
Thread-ID: 1107734
2 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige