Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
25.09.2025 16:01:26
VBA - Laufzeitfehler 9105 zu viele Zeichen 255
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
560to564
560to564
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

CommandButtonClick und eMail Versand

Forumthread: CommandButtonClick und eMail Versand

CommandButtonClick und eMail Versand
08.02.2005 15:17:12
Agnes
Hallo!
Ich möchte bei einer Arbeitsmappe einen CommandButton einrichten.
Wenn dieser angeklickt wird, soll die aktuell geöffnete Arbeitsmappe automatisch an eine bestimmte eMail Adresse versendet werden.
Also eine Komibnation aus:
"Datei/Senden an/E-Mail-Empfänger (als Anlage)" UND Hyperlink an eine bestimmte E-Mail-Adresse.
Das wäre echt spitze, wenn da jemand eine Lösung dafür wüsste!
Viele Grüße
Agnes
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: CommandButtonClick und eMail Versand
Erich
Hallo Agnes,
erster Ansatz:
Option Explicit
Sub BlattKopierenUndVersenden()
'aktives Tabellenblatt als Arbeitsmappe
'im Temporären Ordner speichern, als
'Anlage mit Outlook versenden und anschliesend löschen
Dim strPath As String
Dim strName As String
Dim strFile As String
strPath = "C:\Windows\Temp\" 'Pfad
strName = InputBox("Dateiname eingeben, xls wird automatisch vergeben")
If strName = "" Then Exit Sub
'strName = ActiveSheet.Name 'Tabellenname
strFile = strPath & strName & ".xls"
Application.ScreenUpdating = False
ActiveSheet.Copy
Cells.Select
Selection.Copy
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Range("A1").Select
Application.CutCopyMode = False
With ActiveWorkbook
.SaveAs strFile
Senden strFile 'Datei versenden
.Close
End With
Kill strFile 'Datei löschen
Application.ScreenUpdating = True
End Sub
Sub Senden(AWS As String)
Dim Nachricht As Object, OutApp As Object
Set OutApp = CreateObject("Outlook.Application")
Set Nachricht = OutApp.CreateItem(0)
With Nachricht
'.To = "erich-mayr@onlinehome.de"
'.Subject = InputBox(strName) '"strName" ' "Betreffzeile Header"
.attachments.Add AWS
'.Body = "Das ist ein Test." & vbCrLf & "Bitte ignorieren."
'Hier wird die Mail nochmals angezeigt
.Display
'Hier wird die Mail gleich in den Postausgang gelegt
'.Send
End With
'OutApp.Quit
'Set OutApp = Nothing
'Set Nachricht = Nothing
End Sub

mfg
Erich
http://www.toolex.de
Anzeige
;

Forumthreads zu verwandten Themen

dynamische Button-Click-Event für Tabelle
Pia

Hallo,
unter folgendem Link:
https://www.herber.de/forum/archiv/1100to1104/t1100971.htm
wird eine Lösung für dynamische Button-Click-Events bei Userforms angeboten. Ich würde gerne wissen, wie man dies bei einem Tabellenblatt macht. Dieses Tabellenblatt wird inkl. Button per VBA erz...
13.06.2010 21:47:18
Thread-ID: 1161677
3 Beiträge
Anzeige
VBA-CommandButton funktioniert nicht richtig
Marko

Hallo zusammen,
ich habe aus meinen früherem Aufgabengebiet noch eine Datei mit einem ganzen Sack voll Makros drin. Die meisten benötige ich jetzt nicht mehr - aber mindestens eines ist dabei, dass ich gern wieder nutzen würde.
Das Makro blendet ein Fenster ein und listet darin alle Tab...
27.05.2011 13:30:15
Thread-ID: 1216327
4 Beiträge
Anzeige
dynamische Button Click-Event #2
Micha

Hallo zusammen,
ich habe im Forum einen Artikel gefunden (dynamische Button Click-Event vom 07.09.2009) der mir sehr hilft, bei dem ich jedoch noch ein Verständnisproblem habe. Ich hoffe Ihr könnt es auch mir begreiflich machen.
Es geht darum, controls dynamisch zur Laufzeit anzulegen u...
27.09.2013 15:02:34
Thread-ID: 1332446
3 Beiträge
Excel VBA Button Click hilfe :(
Damien

Hallo,
ich versuche per VBA Makro auf diesen Knopf zu drücken:

Einloggen

button type="submit" class="yui3-button yui3-u" Einloggen /button
Kann mir einer ein Codeschnipsel dafür posten?
Danke...
14.11.2013 09:10:33
Thread-ID: 1338488
6 Beiträge
VBA Commandbutton
VBA

Hallo,
Ich habe gerade begonnen mich ein wenig mit VBA zu beschäftigen und bin nun auf ein Problem gestoßen bei dem ich auch mit Internetrecherge nicht weitergekommen bin.
Es geht um folgendes Problem:
Ich möchte mit der betätigen eines Commandobuttons eine Variable bestimmen und da...
06.06.2014 10:55:40
Thread-ID: 1364963
10 Beiträge
Click auf Submit Button in html via VBA
Henner

Hallo zusammen,
mit folgendem Code lasse ich Daten von Excel in html übergeben: Sub Anmelden() Dim IEApp As Object Set IEApp = CreateObject("InternetExplorer.Application") IEApp.Visible = True IEApp.Navigate "https://xxx.xx/form.php?id=12345" Do: Loop Until IEApp.Busy = False Do: Loop Unti...
30.04.2016 13:50:49
Thread-ID: 1491291
4 Beiträge
Commandbutton_click aufrufen
UweD

Hallo
habe im Codebereich von Tabelle2 einen Code auf einem Button liegen
Private Sub CommandButton1_Click() '*** Generieren 'mache alles mögliche end sub Vor dem Schließen möchte ich den "Knopf" noch einmal drücken
Mein Gedanke war.
ich rufe das aus der "Workbook_BeforeClose"...
25.08.2017 14:40:02
Thread-ID: 1576620
7 Beiträge
VBA per Tab-Taste von TextBox zu CommandButton
TextBox

Hallo liebe Excel Gemeinde,
ich habe eine TextBox1 in der ich Suchbegriffe eingebe.
Nun möchte ich, wenn ein Suchbegriff eingegeben wurde, dass ich
mit der Tab-Taste den CommandButton1 aktiviere,
und dann mit Enter den starten kann.
Kennt da jemand eine Lösung ?
Gruß
17.02.2019 10:25:04
Thread-ID: 1676110
9 Beiträge
Anzeige
[VBA] UserForm Click-Event für dyn. erz. Button
Nils

Hallo Leute,
ich habe eine Userform dynamisch mit Buttons bestückt. Je nachdem wie groß ein Array ist, werden 1 bis x Buttons erstellt.
Wie kann ich den Click-Event eines solchen Buttons definieren?
19.03.2019 16:47:00
Thread-ID: 1682182
2 Beiträge
VBA (Textfeld + CommandButton) zur Zeile springen
Frank

Hallo VBA Gemeinde,
ich benötige noch mal eure VBA Kenntnisse.
Hab eine UserForm erstellt.
Ich möchte anhand eines Textfeld und ein CommandButton zu einer bestimmten Zeile im Tabellenblatt springen (Die bestimmte Zeile wird über das Textfeld bestimmt).
Wer kann mir beim dem VBA-...
13.08.2019 19:43:19
Thread-ID: 1707504
20 Beiträge
CommandBarButton - Click nur einmal möglich
Volker Lehmann

Hallo,mit folgendem Problem komme ich nicht klar:ich habe im Cell-Kontext ein CommandBarButton eingefügt, der beim Click-Ereignis eine ComboBox in das aktive Arbeitsblatt einfügt. Das funktioniert soweit auch, allerdings nur beim ersten Click. Danach nicht mehr. Benutze ich hingegen einen regul...
04.12.2002 21:05:09
Thread-ID: 189047
3 Beiträge
IE5: Button auf HTML-Seite von VBA her clicken
Roland Burkhard
Ich steuere den IE5 von VBA (der Explorer ist Server, Excel/VBA ist Client)
Links fernsteuern, Daten in HTML-Seiten eingehen, navigieren, usw. geht i. O.
Was ich nicht hinkriege: Ein Klicken von Buttons die auf der HTML-Seite sind.
Wer kann helfen?
Ein Hubert hat 26. 2. 02 genau das...
21.07.2003 10:40:58
Thread-ID: 283397
2 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige