Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema TextBox
BildScreenshot zu TextBox TextBox-Seite mit Beispielarbeitsmappe aufrufen

Hyperlink mit Datei

Betrifft: Hyperlink mit Datei
von: Heiko F.
Geschrieben am: 15.04.2003 - 12:32:08

Hallo an alle ,
ich habe in einer Datei einen Hyperlink mit mailadresse erstellt.
nun soll automatisch dieselbe Datei , in der der Link ist , mit weggeschickt werden.
Geht das und wenn ja ,wie?
Danke

  

Re: Hyperlink mit Datei
von: Ramses
Geschrieben am: 15.04.2003 - 13:02:44

Hallo,

über einen Hyperlink habe ich auf die schnelle nichts, aber wenn du das über einen Commandbutton lösen kannst hier ein Weg:


Sub Excel_Workbook_via_Outlook_Senden()
    Dim Nachricht As Object, OutApp As Object
    Set OutApp = CreateObject("Outlook.Application")
    Dim AWS As String
    'Aktive Arbeitsmappe wird als mail gesendet
    AWS = ThisWorkbook.FullName
    'InitializeOutlook = True
    Set Nachricht = OutApp.CreateItem(0)
    With Nachricht
        .To = "irgendwer@provider"
        .Subject = "Testmeldung von Excel2000 " & Date & Time
        .attachments.Add AWS
        'Hier wird die HTML Mail erstellt
        .HTMLBody = "Das ist ein Test." & vbCrLf & "Bitte ignorieren."
        'Hier wird die Mail nochmals angezeigt
        .Display
        'Hier wird die Mail gleich in den Postausgang gelegt
        'Mail.Send
    End With
    OutApp.Quit
    Set OutApp = Nothing
    Set Nachricht = Nothing
End Sub 
     Code eingefügt mit Syntaxhighlighter 1.16

Statt "Irgendwer@Irgendein Provider" kannst du auch auf die Zelle verweisen, in der dein Hyperlink jetzt steht.

Gruss Rainer


  

Re: Hyperlink mit Datei
von: Heiko F.
Geschrieben am: 15.04.2003 - 13:44:10

Danke Ramses kann jetzt nicht testen , aber Du hast mir schonmal geholfen und es ging auch!
Vielen Dank!
Heiko

  

Re: Hyperlink mit Datei
von: Heiko F.
Geschrieben am: 15.04.2003 - 14:58:44

Hallo Rainer,
wie kann ich es ändern , so das es sofort weggeschickt wird?
Den Button habe ich hinbekommen.
Habe das Mail.send aktiviert und wenn ich sende , kommt die Fehlermeldung 424 Objekt erforderlich.
Was ist da falsch?
Danke Heiko

 

Beiträge aus den Excel-Beispielen zum Thema "Hyperlink mit Datei"