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

Speichern und senden als anhang

Forumthread: Speichern und senden als anhang

Speichern und senden als anhang
08.07.2005 12:07:55
mike
Hallo gemeinde,
wer kann mir bei einem kleinen Problem helfen?
Ich möchte eine Datei test.xls als test zelleA1.xls speichern.
dann soll diese datei als anhang mit dem betreff test an mich@test.de gesendet werden.
für mich als VBA anfänger nicht lösbar
Danke miked
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Speichern und senden als anhang
08.07.2005 14:36:43
F@ker
schau mal hier :

Sub BestellungSpeichern(Dateiname As String)
Dim ZOrdner As String
Application.ScreenUpdating = False
ZOrdner = Application.ActiveWorkbook.Path
ZOrdner = ZOrdner & "\Speicherort"
Dim WB As Workbook
Worksheets(2).Copy
Set WB = ActiveWorkbook
ActiveSheet.OLEObjects.Delete
ActiveSheet.UsedRange.Value = ActiveSheet.UsedRange.Value
Dateiname = ZOrdner & "\" & Dateiname
ActiveWorkbook.SaveAs Dateiname
ActiveWorkbook.Close SaveChanges:=False
Application.ScreenUpdating = True
End Sub



Sub BestellungMailen(Dateiname As String)
Dim OutObj As Object
Dim Mail As Object
Dim Name As String
Dim EMailName As String
Set OutObj = CreateObject("Outlook.Application")
Set Mail = OutObj.CreateItem(0)
Name = "mich"
EMailName = "mich@test.de"
Mail.To = EMailName
Mail.Subject = "xxx"
Mail.Body = "Hallo " & Name & "," & Chr(13) & Chr(13) & _
"xxx"   & _
Chr(13) & _
Chr(13) & _
"M.f.G."
Mail.Attachments.Add Dateiname
Mail.display
Set OutObj = Nothing
Set Mail = Nothing
End Sub

Anzeige
AW: Speichern und senden als anhang
11.07.2005 11:14:58
mike
Hallo F@ker
ich glaub ich schall das nicht so recht.
Ich habe einen Button erstellt und wenn ich drauf klike soll die gespeichert werden
z.Bsp so
ActiveWorkbook.SaveAs "C:\Kundenanfrage\Kundenanfrage" & Range("A9").Value
dann die datei als Anhang an mich gemailt werden.
Ich muß doch dem Button den Makronamen zuweisen.
Wie kann dann deine anweisung ausgeführt werden?

Anzeige
AW: Speichern und senden als anhang
11.07.2005 11:20:47
mike
Beim Ausführn bleibt das makro da stehen
Mail.Attachments.Add Dateiname
;

Forumthreads zu verwandten Themen

rückgängig historie speichern vor SelectionChange
Susanne

Hallo zusammen,
ich benutze eine Worksheet_SelectionChange Prozedur und ändere damit Formate meiner Zellen. Jedes ausgeführte Makro löscht ja die Rückgängig Historie. Nun möchte ich gerne zu Beginn des Makros die Historie speichern und am Ende des Makros wieder einfügen. Es soll also nicht...
18.09.2008 10:37:00
Thread-ID: 1010643
5 Beiträge
Zelleninhlalt übernehmen der ergänzt werden kann
Benny

Guten Morgen!
Kann mir jemand bei folgenem Problem helfen?
Also es soll beim öffnen einer Datei ein Zelleninhalt einer anderen Datei übernommen werden, dies hab ich mit einem SVerweis gemacht. Nun möchte ich zusätzlich noch weitere Inhalte in die Zelle manuell einpflegen. Wie kann ich d...
07.11.2008 11:12:00
Thread-ID: 1022582
6 Beiträge
Prüfen ob Datensätze vorhanden ggf. hinzufügen
Urmila

Hallo alle gemeinsam,
im Tabelle 1 stehen daten, Spalte A Dokument...Spalte D Datum.
Nun will ich dass geprüft wird, ob Datum größer als Heute, dann prüfen
ob Dokument von Spalte A in Tabelle 2 (ebenfalls Spalte A) vorhanden,
wenn nicht, diese Zeile kopieren und in Tabelle 2 al...
09.01.2009 12:56:00
Thread-ID: 1038201
5 Beiträge
nach Speichern automatisch Schließen
Valeri

Hallo liebes Forum,
ich möchte meine Arbeitsmappe nach dem ich gespeichert habe Automatisch schlissen lassen.
Wie würde den der Code dafür aussehen?
Vielen Dank schon mal im Voraus!
Gruß Valeri
11.01.2012 11:23:23
Thread-ID: 1245611
12 Beiträge
Uhrzeit nach Wenn-Abfrage automatisch eintragen
GP

Hallo VBA-Künstler,
ich möchte automatisch die Uhrzeit nach nach einer Wenn-Abfrage eintragen und einfrieren.
Folgender Code wird verwendet:
Private Sub Worksheet_Change(ByVal Target As Range) If Intersect(Target, Range("C1:C100")) Is Nothing Then Exit Sub If Target.Value "ok" Th...
15.01.2014 14:59:00
Thread-ID: 1345327
4 Beiträge
Automatische Aufforderung zu Speichern nach Öffnen
Michael

Hallo,mein Problem: Ich möchte, dass nach dem Öffnen meiner Excel-Vorlage der Benutzer sofort zum Speichern dieser als xls-Datei aufgefordert wird.Kann mir jemand helfen?Michael
31.07.2002 14:18:16
Thread-ID: 143099
3 Beiträge
VBA Daten aus anderer Excel laden und speichern
teambob


VBA Daten aus anderer Excel laden und speichern
Beitragvon Teambob » 06. Nov 2015, 10:28
Hallo Community,
ich habe ein kleines Programm mit VBA geschrieben, wo ich den Lagerbestand abfrage und Zu/Abbuchen kann.
Die Daten werden dann in einer Tabelle in der gleichen Excel ge...
06.11.2015 11:25:42
Thread-ID: 1456666
3 Beiträge
Anfänger! Was bedeuten die folgenden Ausdrücke?
Sebastian R.

Hallo, mir wurde jetzt nun schon oft von Euch geholfen und ich habe Lust bekommen, selbst die Sprache zu lernen. Da es ja auf basic aufbaut, wird es wahrscheinlich leichter fallen als C/c++ oder anderes.In einigen Scripten sind mir folgende Ausdrücke aufgefallen, die ich nicht interpretieren ka...
19.08.2002 10:52:14
Thread-ID: 150096
5 Beiträge
mail nach Senden speichern (für Profis)(mit Code)
Martin

Ich habe im Internet einen Code gefunden, der es ermöglicht e-mails mit Hilfe eines mapi.session - Objektes zu versenden. Bitte hilft mir dabei, den Code so weit zu erweitern, dass die e-mail nach dem Sendevorgang in eine Datei gespeichert wird (als Sendebestätigung). Ich habe bereits mehrere V...
28.08.2002 10:41:33
Thread-ID: 153579
10 Beiträge
automatische Bildlaufleiste nach Uhrzeit
Gecko

Moin,
habe mal wieder ein Problem und hoffe auf eure Hilfe.
Ich habe bereits eine Tabelle auf der die Bildlaufleiste alle x Sekunden/Minuten/Stunden eine Zelle weiter nach rechts geht. Gestartet und Beendet per Klick.
Nun möchte ich das so umbasteln, dass zu einer bestimmten Uhrzeit...
09.06.2017 08:33:47
Thread-ID: 1563148
2 Beiträge
E-Mail-Anhang in Outlook finden&abspeichern
Johannes

Hallo zusammen,
ich bekomme wöchentlich eine E-Mail mit Anhang, welche ich per Excel Makro auf der Festplatte speichern und danach weiterverarbeiten möchte.
Untenstehendes Makro habe ich schon. Ich bekomme leider nur immer einen Fehler, wenn zwischen der Mail, welche ich suche, und dem...
14.05.2018 15:06:09
Thread-ID: 1623915
4 Beiträge
E-Mail-Anhang in Outlook finden&abspeichern
Johannes

Hallo zusammen,
ich bekomme wöchentlich eine E-Mail mit Anhang, welche ich per Excel Makro auf der Festplatte speichern und danach weiterverarbeiten möchte.
Untenstehendes Makro habe ich schon. Ich bekomme leider nur immer einen Fehler, wenn zwischen der Mail, welche ich suche, und dem...
14.05.2018 15:15:39
Thread-ID: 1623922
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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