Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Email Automatisch versenden
Gehe zu Seite 1, 2, 3  Weiter
zurück: Bestimmte Zeilen von 2 Tabellen abgleichen und "X" weiter: Auswertung: Wann wurde zuletzt eine Änderung vollzogen? 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
Thomas Wittenbecher
Gast


Verfasst am:
27. Okt 2005, 12:08
Rufname:

Email Automatisch versenden - Email Automatisch versenden

Nach oben
       

Hallo

Ich möchte einen Wert aus einer Zelle Automatisch als Mail (über Outlook) versenden wenn eine Formel in Excel war ist.

Das soll Automatisch gehen. Der Wert der Zelle kann im Betreff Stehen.
Ist das möglich wenn ja wie.

Wenn möglich auch ohne Macro nur als Formel?

Danke für eure Hilfe
Nenilix
lernwillig und wissbegierig


Verfasst am:
27. Okt 2005, 13:32
Rufname:


AW: Email Automatisch versenden - AW: Email Automatisch versenden

Nach oben
       

nur als Formel, das geht nicht.

Dafür musst du schon ein Makro laufen lassen.

Hast du bereits Kenntnisse in der Makro-Programmierung ?

_________________
Gruß
Roger
Thomas Wittenbecher
Gast


Verfasst am:
27. Okt 2005, 15:37
Rufname:

AW: Email Automatisch versenden - AW: Email Automatisch versenden

Nach oben
       

Nein habe leider keine Kenntnisse, probier es immer mit Aufnahme und dann Irgendwie hingefuchst nur leider klappt da nüscht.

Würde mich über eine Hilfe freuen muß es halt als Macro gehen.
Muss ich das dann immer beim Start aktivieren oder ??
Nenilix
lernwillig und wissbegierig


Verfasst am:
28. Okt 2005, 07:17
Rufname:

AW: Email Automatisch versenden - AW: Email Automatisch versenden

Nach oben
       

Hi,
versuche es mal hiermit

Code:
Sub so()
   Dim objApp As Object
   Dim objMailItem As Object
   Dim Adress As Variant
   Dim sAdress As String, sSubject As String
   Set objApp = CreateObject("Outlook.Application")
   Set objMailItem = objApp.CreateItem(0)

sAdress = Range("b1").Value
sSubject = Range("b2").Value

If Range("b4").Value = True Then
With objMailItem
.To = sAdress
.Subject = sSubject
.OriginatorDeliveryReportRequested = True
.ReadReceiptRequested = True
.Display
End With
End If

Set objMailItem = Nothing
Set objApp = Nothing

End Sub


Du musst halt nur einen Button in deine Tabelle einfügen und hängst dort dann das obige Makro dran.

Automatisch startet das ganze dann zwar nicht, sondern du musst den Vorgang der Prüfung manuell anwerfen.

Aufgebaut ist das Makro so, daß du in der Zelle B1 die Mailadresse des
Empfängers stehen hast.
In Zelle B4 steht deine Formel, die wahr oder falsch ausgibt.
In Zelle B2 steht dein Wert, den du per Email verschicken willst.

Ich habe das ganze erstmal nur so eingstellt, daß du die Mail angezeigt bekommst und sie sich nicht automatisch verschickt.

Willst du das abschalten, dann tausche den Eintrag
.Display
durch
.Send
aus

_________________
Gruß
Roger
Thomas Wittenbecher
Gast


Verfasst am:
28. Okt 2005, 09:30
Rufname:


AW: Email Automatisch versenden - AW: Email Automatisch versenden

Nach oben
       

Danke erst mal, komme erst heut abend wieder an denn Rechner daheim da Probier ich das mal.
Gast



Verfasst am:
28. Okt 2005, 12:25
Rufname:

AW: Email Automatisch versenden - AW: Email Automatisch versenden

Nach oben
       

Recycled hat folgendes geschrieben:
Hi,
versuche es mal hiermit



Geht prima.
Kannst Du mir auch sagen wie ich noch einen Text in die EMail bekomme?

MfG
Bernie6666
Tobias113
(VBA, VB6 als Hobby) .Net ein bisschen mehr


Verfasst am:
28. Okt 2005, 13:55
Rufname:

Versuchs mal - Versuchs mal

Nach oben
       

Mit

Code:
.body = "Dein Text der in der Mail erscheinen soll"

_________________
MfG
Tobias



Es gibt keine Dummen Fragen....
Wer nicht Fragt bleibt Dumm
Gast



Verfasst am:
28. Okt 2005, 14:12
Rufname:

AW: Email Automatisch versenden - AW: Email Automatisch versenden

Nach oben
       

Super Cool!!!


Vielen Dank!!!


Bernie6666
Gast



Verfasst am:
28. Okt 2005, 14:59
Rufname:

AW: Email Automatisch versenden - AW: Email Automatisch versenden

Nach oben
       

Da fällt mir nochwas ein:

Wie heißt die Variable für "CC" (vieleicht ".cc")?
...und kann man auch Dateien anhängen?


MfG
Bernie6666
Tobias113
(VBA, VB6 als Hobby) .Net ein bisschen mehr


Verfasst am:
28. Okt 2005, 16:18
Rufname:

Ne leider nicht - Ne leider nicht

Nach oben
       

So einfach haben die Microsofter es nicht gemacht...

Ich mache es mit einem String den ich aus den Zellen in denen die Mail adressen stehen...
Code:

.Subject = [A1] & ";" & [B1]  ' usw... oder als Array


Anhänge:

Code:

Name = ActiveWorkbook.FullName
.Attachments.Add Name

_________________
MfG
Tobias



Es gibt keine Dummen Fragen....
Wer nicht Fragt bleibt Dumm
Nenilix
lernwillig und wissbegierig


Verfasst am:
29. Okt 2005, 20:21
Rufname:

AW: Email Automatisch versenden - AW: Email Automatisch versenden

Nach oben
       

.cc ... ist natürlich richtig.

ein Anhang kannst du mit

willst du beim Anhang immer den gleichen anhängen, dann kannst du
ihn direkt in den Makro-Code eintragen.

Oder du machst es variable und definierst den Anhang über einen
Zellenwert.

Welche Lösung kannst du gebrauchen ?

_________________
Gruß
Roger
Tobias113
(VBA, VB6 als Hobby) .Net ein bisschen mehr


Verfasst am:
30. Okt 2005, 12:37
Rufname:

AW: Email Automatisch versenden - AW: Email Automatisch versenden

Nach oben
       

Ok nehm alles zurück Embarassed
_________________
MfG
Tobias



Es gibt keine Dummen Fragen....
Wer nicht Fragt bleibt Dumm
Gast



Verfasst am:
31. Okt 2005, 12:23
Rufname:

Outlook 2003 - Outlook 2003

Nach oben
       

Hallo,

hab mich auch mal an dem script versucht..Jedoch steigt es aus bei Outlook 2003 in der folgenden Zeile...

Set objMailItem = objApp.CreateItem(0)

irgendjemand mit einer idee warum ?

gruß

Achim
Tobias113
(VBA, VB6 als Hobby) .Net ein bisschen mehr


Verfasst am:
31. Okt 2005, 22:19
Rufname:

AW: Email Automatisch versenden - AW: Email Automatisch versenden

Nach oben
       

Ich habe es versucht und Ich (Office 2003) hab keine probleme Question
_________________
MfG
Tobias



Es gibt keine Dummen Fragen....
Wer nicht Fragt bleibt Dumm
Gast



Verfasst am:
31. Okt 2005, 22:27
Rufname:


AW: Email Automatisch versenden - AW: Email Automatisch versenden

Nach oben
       

Hmmm, ok mein Problem hat sich gerade verlagert...Mit Outlook XP geht es jedoch kommt bei jedem Mailversenden ein Hinweistext :

Eine Anwendung versucht, automatisch Nachrichten in Ihrem Auftrag zu senden. Möchten Sie dies zulassen ?



Dann zählt ein Counter 5 Sekunden runter und wartet dann auf eine Eingabe... Ja oder Nein.

Wie oder wo fange ich das ab ?
Welche Sicherheitsfunktion steckt da dahinter ? hab alle Optionen schon durchgeschaut aber nichts gefunden was mich drauf hinweist ...


Die Hilfe bringt diesen Text :

Ein Programm versucht, Nachrichten mit Item.Send zu senden
Ein Programm versucht, mit dem Befehl Item.Send der Anwendung Microsoft Outlook Visual Basic automatisch E-Mail-Nachrichten zu senden. Wenn Sie möchten, dass das Programm diese E-Mail-Nachricht sendet, klicken Sie auf Ja. Klicken Sie auf Nein, um das Programm zu beenden. Wenn Sie sich nicht sicher sind, welches Programm die E-Mail-Nachricht sendet oder warum, sollten Sie auf Nein klicken, um ein mögliches Verbreiten von Viren zu vermeiden.

Anmerkung Bei Anzeige dieser Meldung steht die Schaltfläche Ja 5 Sekunden lang nicht zur Verfügung.
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Gehe zu Seite 1, 2, 3  Weiter
Diese Seite Freunden empfehlen

Seite 1 von 3
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: Formeln automatisch in neu eingefügte Zeile übertragen 3 Ferencz 1728 27. Feb 2006, 15:22
Klaus-Dieter Formeln automatisch in neu eingefügte Zeile übertragen
Keine neuen Beiträge Excel Formeln: Automatisch komprimieren? 12 Gast 2218 11. Feb 2006, 12:23
Gast Automatisch komprimieren?
Keine neuen Beiträge Excel Formeln: Komma getrennte Datensätze automatisch Zellen zuweisen 3 shniberkiis 2004 12. Dez 2005, 11:47
shniberkiis Komma getrennte Datensätze automatisch Zellen zuweisen
Keine neuen Beiträge Excel Formeln: Datumsfrage: Möchte Wochenenden automatisch erkennen lassen. 5 MrMr 3258 28. Okt 2005, 15:44
MrMr Datumsfrage: Möchte Wochenenden automatisch erkennen lassen.
Keine neuen Beiträge Excel Formeln: Zellen automatisch kopieren 2 Roland 01 4487 27. Okt 2005, 14:11
Roland 01 Zellen automatisch kopieren
Keine neuen Beiträge Excel Formeln: ExcelTabellen sollen automatisch daten übernehmen 5 Gast 1843 17. Okt 2005, 16:55
Arnim ExcelTabellen sollen automatisch daten übernehmen
Keine neuen Beiträge Excel Formeln: automatisch Code generieren 17 Niceguy 2530 08. Sep 2005, 13:43
Niceguy automatisch Code generieren
Keine neuen Beiträge Excel Formeln: Tabellenblätter automatisch umbenennen 8 Robert_02 5586 07. Sep 2005, 19:41
fl618 Tabellenblätter automatisch umbenennen
Keine neuen Beiträge Excel Formeln: automatisch nur aufrunden?! 2 RobinsonHamburg 3545 30. Apr 2005, 19:10
Gast automatisch nur aufrunden?!
Keine neuen Beiträge Excel Formeln: Beim Import von Daten automatisch zusammenzählen 8 Schoki 1146 20. Apr 2005, 09:52
Schoki Beim Import von Daten automatisch zusammenzählen
Keine neuen Beiträge Excel Formeln: Automatisch Verlinken 13 Gast 4649 19. Apr 2005, 13:18
Gast Automatisch Verlinken
Keine neuen Beiträge Excel Formeln: Auto-Filter aktualisiert nicht automatisch 2 Michi 1325 04. März 2005, 13:10
Michi Auto-Filter aktualisiert nicht automatisch
 

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