Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Problem: Datenblatt per Mail verschicken
zurück: Spalten nach Namen auswählen und bearbeiten weiter: Makro in geschütztem Arbeitsblatt arbeitet nicht Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Offen Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Sums2186
Im Profil kannst Du frei den Rang ändern


Verfasst am:
09. Mai 2011, 13:20
Rufname:

Problem: Datenblatt per Mail verschicken - Problem: Datenblatt per Mail verschicken

Nach oben
       Version: Office 2010

Hallo zusammen,

ich habe da mal eine Frage.

Momentan benutze ich folgenden Code um aus einer Exceldatei (Excel 2003) ein bestimmtes Sheet zu senden per Outlook.

Nun habe ich mein System umgestellt auf Windows 7 und Excel 2010.

Der unten genannte Code funktioniert nun aber leider nicht mehr wenn ich den folgenden Code einfach von .xls auf xlsm um ändere:

[quote]ActiveWorkbook.SaveAs Filename:="M:\Daten\" & ActiveSheet.Name & ".xls", _ [/quote]
Es liegt wohl an Excel bzw. an dem Code, dass es nicht mehr klappt. Weil das Makro funktioniert noch wenn ich die Datei als xls. gespeichert habe und es mit Outlook 2010 versenden will.

Kann mir evtl. Jemand weiterhelfen.

Wäre euch sehr dankbar.

[code]Sub Excel_Sheet_via_Outlook_Senden()
Dim olApp As Object
Dim AWS As String

ActiveSheet.copy
Range("A1:R42").Select
Selection.copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False

ActiveWorkbook.SaveAs Filename:="M:\Daten\" & ActiveSheet.Name & ".xls", _
FileFormat:=IIf(Val(Application.Version) > 11, 56, xlNormal)

AWS = ActiveWorkbook.FullName

Set olApp = CreateObject("Outlook.Application")
With olApp.CreateItem(0)
.To = "
'.To = ""
.Subject = " " & Date & " " & Time
.Attachments.Add AWS
'Hier wird die HTML Mail erstellt
.body = "Im Anhang finden Sie die Infos aus dem Statusmeeting " & _
Date & vbCrLf & vbCrLf & "Mit freundlichen Grüßen" _
& vbCrLf & "XXX"
'Hier wird die Mail nochmals angezeigt
.Display
'Hier wird die Mail gleich in den Postausgang gelegt
.Send
'Hier wird die Aktuelle Arbeitsmappe geschlossen
ActiveWorkbook.Close savechanges:=False
'Hier könnte die Datei wieder gelöscht werden
Kill AWS
End With
End Sub[/code]
Sums2186
Im Profil kannst Du frei den Rang ändern


Verfasst am:
16. Mai 2011, 11:11
Rufname:


AW: Problem: Datenblatt per Mail verschicken - AW: Problem: Datenblatt per Mail verschicken

Nach oben
       Version: Office 2010

Wäre euch wirklich um eine Antwort dankbar.
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Excel Formeln: Text per Formel hochstellen 1 Jackson 2514 18. Feb 2008, 18:13
< Peter > Text per Formel hochstellen
Keine neuen Beiträge Excel Formeln: Per Doppelklick Zahl in Zelle einfügen 1 Frank4444 407 30. Dez 2007, 00:58
< Peter > Per Doppelklick Zahl in Zelle einfügen
Keine neuen Beiträge Excel Formeln: Datum vergleichen und mit einer mail erinnern 0 Doc74 487 16. Sep 2007, 19:42
Doc74 Datum vergleichen und mit einer mail erinnern
Keine neuen Beiträge Excel Formeln: Wert aus Zelle per Referenz auslesen 1 Plaumann 5846 03. Sep 2007, 15:57
urs Wert aus Zelle per Referenz auslesen
Keine neuen Beiträge Excel Formeln: Wenn Zelle <>0 dann kopiere Datensatz in anderes Daten 2 Moritz1989 782 20. Aug 2007, 21:15
Moritz1989 Wenn Zelle <>0 dann kopiere Datensatz in anderes Daten
Keine neuen Beiträge Excel Formeln: Datenblatt Verknüpfung 4 tobi9876 301 03. Aug 2007, 13:58
Gast Datenblatt Verknüpfung
Keine neuen Beiträge Excel Formeln: Aktienkurse per Abfrage aus dem Internet importieren 3 AMLiebig 6913 29. Jun 2007, 14:18
styrnal Aktienkurse per Abfrage aus dem Internet importieren
Keine neuen Beiträge Excel Formeln: Daten abrufen in Excel möglich oder doch nur per Datenbank? 7 fatcartman 1501 11. Jun 2007, 12:29
fatcartman Daten abrufen in Excel möglich oder doch nur per Datenbank?
Keine neuen Beiträge Excel Formeln: Per Button Felder leeren 8 Gast 1201 22. Mai 2007, 11:05
c0bRa Per Button Felder leeren
Keine neuen Beiträge Excel Formeln: Per Drehfeld oder Button das Tabellenblatt wechseln 8 Bjoern 1 11208 08. Mai 2007, 14:05
Gast Per Drehfeld oder Button das Tabellenblatt wechseln
Keine neuen Beiträge Excel Formeln: zellen per formel ausblenden 4 Thomas07 1909 21. Feb 2007, 18:47
< Peter > zellen per formel ausblenden
Keine neuen Beiträge Excel Formeln: wert kopieren aber nicht formel per vba 4 red-shark 1607 04. Aug 2006, 15:08
Gast wert kopieren aber nicht formel per vba
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Expression Web Forum