mail über Fremdprogramm versenden

Hallo,

da es ich hierbei um ein Problem mit einem Fremdprogramm handelt, setze dich mit Sinovo in Verbindung.

Gruß

Peter

Guten Morgen Lisa,
<br />das habe ich ausprobiert. Der Seriendruck funktioniert bei .xls aber bei .csv nicht. Außerdem erstelle ich die Steuerdatei aus einem Fremdprogramm und verzweige gleich nach Word. Der Umweg, die Datei in eine xls-Datei erst zu speichern, geht nicht. Eine Direktverbindung vom Fremdprogramm nach Word geht problemlos. Nur wenn die Emailadresse mit Unterstrich gegeben ist, gibt es ein Problem.
<br />Gruß Theo
<br />

Hi

wenn du normal Text eingeben kannst, vermute ich ein Fremdprogramm.

Ansonsten in der Systemsteuerung unter Region und Sprache/Tastatureinstellung ändern



Gruß

Christian

Nun möchte ich mehrere Dateien hintereinander ablaufen lassen, ohne zwischendurch eingreifen zu müssen. Ich stelle mir vor, eine entsprechende Auswahl in den rechts danebenliegenden Zellen (Laufzeit) zu markieren. Nach dem Anklicken eines Buttons sollen die Links, deren Laufzeiten markiert sind, nacheinander starten.

Nun ja, da gibt es div. Probleme, fangen wir mal bei Shell an. Wie man in der Doku leicht nachlesen kann muss der Pfadname ein ausführbares Programm sein, also IRGENDWAS.EXE z.B. Dein MOS ist eine Datendatei die von einem anderen Programm geöffnet wird.
<br />In einer Zelle hast Du einen Hyperlink und bei einem Klick darauf wird die MOS wiedergegeben, die Details wie das OS (nicht Excel!) das macht kann uns mal egal sein.
<br />Wenn wir nun da geklickt haben, dann gibt es netterweise in einem Blatt ein Ereignis welches NACH dem Aufruf, der an das OS gegeben wurde, ausgeführt wird. In dem könnten wir nun recht einfach mal kucken ob es z.B. rechts neben der Zelle noch weitere Hyperlinks gibt und diese ebenfalls ausführen.
<br />Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
Dim F As Range, T As Range, All As Range
'Nächste Zelle rechts
Set F = Target.Range.Offset(, 1)
'Letzte Zelle rechts
Set T = F.Offset(, Columns.Count - F.Column).End(xlToLeft)
'Wenn die letzte vor der ersten liegt, dann gibt es keine weiteren
If T.Column < F.Column Then Exit Sub
'Ganzer Bereich
Set All = Range(F, T)
'Jede Zelle durchlaufen
For Each F In All
'Ist ein Link da?
If F.Hyperlinks.Count > 0 Then
'Aufrufen
ThisWorkbook.FollowHyperlink F.Hyperlinks(1).Address
End If
Next
End Sub
<br />Da wir aber ein asynchron laufendes Multitasking-OS haben werden alle "Links" mit ein paar Millisekunden Verzögerung an Dein Abspielprogramm weitergegeben ... wenn Du Glück hast, dann hat dieses eine Playlist und es spielt alle MOS nacheinander ab.
<br />Wenn Du Pech hast laufen die MOS entweder parallel oder der letzte Link unterbricht alle vorherigen und nur das letzte Video wird abgespielt. Dann kommt die Frage ob dein Abspielprogramm eine API hat auf die man zugreifen kann und somit wartet bis ein Video abgespielt wurde und erst dann das nächste startet. Über die Windows-API herauszufinden ob das Video abgespielt wurde ... so gut wie unmöglich.
<br />Andreas.
<br />

Guten Tag,
<br />willkommen beim Microsoft Community Forum. Ihrer Beschreibung zufolge haben Sie ein Problem bei der Verwendung von Excel.
<br />Da ich nicht gesehen habe, wie Sie die Aktionsdatei ausgeführt haben, kann ich nicht sagen, warum ein Fehler gemeldet wird, daher schlage ich vor, dass Sie ein aufgezeichnetes Makro verwenden können.
<br />Klicken Sie auf Entwicklertools - Makro aufzeichnen - führen Sie dann die Aktionen aus, die Sie auf den Link geklickt haben, einschließlich der Aktion zum Öffnen des Links und der Aktion zum Klicken auf den zweiten Zellenlink, nachdem Sie dies getan haben, und klicken Sie dann auf Aufzeichnung beenden.
<br />Dann hinzufügen Sie Schaltfläche von Formularsteuerelemente und wählen Sie das Makro.
<br />Klicken Sie nun auf Visual Basic
<br />Unter Module können Sie den Code überprüfen.
<br />


<br />Wenn Sie den Code nicht übergeben, kommt die direkte Vorgänge auch eine Fehlermeldung "ungültiger Prozeduraufruf oder ungültiges Argument", was bedeutet, dass ein Problem mit dem Inhalt des Links selbst vorliegt.
<br />Ich hoffe, dass meine Antwort auf Ihre Frage eingeht.
<br />Ich wünsche Ihnen einen schönen Ferientag.
<br />Mit freundlichen Grüßen
<br />Olivia | Microsoft Community Support Spezialist
<br />-----------------------
<br />