Hallo Ihr,
habe folgendes Problem. Ich möchte in Excel ein Formular erstellen, dass ausgefüllt wird und dann als Datei zurück geschickt wird. Dafür hab ich den angefügten Quellcode verwendet.
Dabei tritt folgendes Problem auf. Ich rufe den Quellcode über einen Commandbutton auf. Solang ich diesen in Excel ausführe funktioniert alles problemlos. Speichere ich jedoch die Excel - Datei als Html ab. Wird mir zwar mein Formluar richtig inklusive Button angezeigt aber beim Drücken des Buttons wird der Quelltext nicht ausgeführt.
Liegt das vielleicht daran, dass der Quelltext nicht mit übernommen wird wenn ich die Excel-Datei als Html speichere? Was müsste ich ändern, dass der Quellcode ausgeführt wird?
Der Punkt mit dem Datei zurück schicken ist noch nicht implementiert. Darüber mach ich mir jedoch erst Gedanken wenn ich das mit dem Emailversand zum Laufen gebracht habe.
Schon mal vielen Dank im Vorraus.
habe folgendes Problem. Ich möchte in Excel ein Formular erstellen, dass ausgefüllt wird und dann als Datei zurück geschickt wird. Dafür hab ich den angefügten Quellcode verwendet.
VB.NET-Quellcode
- Private Declare Function ShellExecute Lib "shell32.dll" _
- Alias "ShellExecuteA" (ByVal hWnd As Long, _
- ByVal lpOperation As String, _
- ByVal lpFile As String, ByVal _
- lpParameters As String, _
- ByVal lpDirectory As String, _
- ByVal nShowCmd As Long) As Long
- Private Const SW_SHOW = 5
- Sub Mailen()
- Dim sTo, sSubject, sBody, name As String
- name = Cells(1, 2)
- sTo = "Anonym@provider.de"
- sSubject = "Betreff - " & name
- sBody = "Dieses steht im Mail-Text"
- ShellExecute hWnd, "open", "mailto:" & sTo & _
- " ?Subject=" & sSubject & " &Body=" & sBody, _
- vbNullString, vbNullString, SW_SHOW
- 'DoEvents
- End Sub
Dabei tritt folgendes Problem auf. Ich rufe den Quellcode über einen Commandbutton auf. Solang ich diesen in Excel ausführe funktioniert alles problemlos. Speichere ich jedoch die Excel - Datei als Html ab. Wird mir zwar mein Formluar richtig inklusive Button angezeigt aber beim Drücken des Buttons wird der Quelltext nicht ausgeführt.
Liegt das vielleicht daran, dass der Quelltext nicht mit übernommen wird wenn ich die Excel-Datei als Html speichere? Was müsste ich ändern, dass der Quellcode ausgeführt wird?
Der Punkt mit dem Datei zurück schicken ist noch nicht implementiert. Darüber mach ich mir jedoch erst Gedanken wenn ich das mit dem Emailversand zum Laufen gebracht habe.
Schon mal vielen Dank im Vorraus.
