Microsoft Excel – die neusten Beiträge

Email mit vba aus Excel + Text aus Word

Hallo zusammen,

ich bin gerade dabei VBA zu lernen und würde gerne testen, wie man mit Outlook automatisch Emails versenden kann. Hierzu habe ich entsprechende Empfänger (Adresese, Vorname, Nachname und Betreff) in Excel. Einen entsprechenden Email-Text (inkl. Absatz und Textformatierung) habe ich in Word vorliegen. Kann man das irgendwie kombinieren?

Ich habe im Netz bislang nur Lösungen gefunden, wie man Emails versenden kann, bei denen alles in Excel oder dem VBA vorliegt.

z.B. diese hier:

Sub Excel_Serial_Mail()
Dim MyOutApp As Object, MyMessage As Object
Dim i As Long
'Start der Sendeschleife an 10 Empfänger
For i = 1 To 10
    Set MyOutApp = CreateObject("Outlook.Application")
    Set MyMessage = MyOutApp.CreateItem(0)
    With MyMessage
        'Die Empfänger stehen in Spalte A ab Zeile 1
        .To = Cells(i, 1) 'E-Mail Adresse
        'Der Betreff in Spalte B
        .Subject = Cells(i, 2) '"Betreffzeil"
        'Der zu sendende Text in Spalte C
        'Maximal 1024 Zeichen
        'Der Text wird ohne Formatierung übernommen
        .Body = Cells(i, 3)
        'Hier wird die Mail angezeigt
        '.Display
        'Hier wird die Mail gleich in den Postausgang gelegt
        .Send
    End With
    'Objectvariablen leeren
    Set MyOutApp = Nothing 'CreateObject("Outlook.Application")
    Set MyMessage = Nothing 'MyOutApp.CreateItem(0)
    'Sendepause einschalten
    'Outlook kann die Aufträge nicht schnell genug verarbeiten
    Application.Wait (Now + TimeValue("0:00:05"))
Next i
End Sub
Microsoft Word, Microsoft Excel, E-Mail, VBA

Farben in andere Tabelle automatisch übertragen

Hallo

wieder einmal brauche ich eure Hilfe

ich benötige eine Formel, in der man ein in Tabelle 1 gelb markiertes Feld, automatisch in Tabelle 2 in Zelle A1 übertragen wird.

Zur Erklärung: Ziel ist eine Stundenauswertung unserer Mitarbeiter unterteilt in Früh-, Spät-, und Nachtschicht.

In der Tabelle 1 werden sämtliche Informationen zu dem Mitarbeiter eingetragen. z.B. das er an diesem Tag keine Spätschicht machen kann, das er frei haben muss usw. Wichtig ist aber das in der Tabelle 1 die Felder farblich unterschieden werden. z.B. am 02.01 (Zelle A1), arbeitet er Frühschicht (gekennzeichnet mit der Farbe GELB) am 03.01 (Zelle B1) arbeitet er Spätschicht (gekennzeichnet mit der Farbe GRÜN) am 04.01. (Zelle C1) arbeitet er Nachtschicht (gekennzeichnet mit der Farbe ROT).

In der Tabelle 2 soll dann die Zelle A1 GELB sein, Zelle A2 GRÜN und Zelle A3 ROT. In den jeweiligen Zelle A1; B1; und C1 der Tabelle 2 soll dann nachträglich die gearbeiteten Stunden eingetragen werden. Sodass ich dann z.B. in der Zelle AA1 alle Stunden zusammen addieren kann. In Zelle AB1 sollen alle in Zelle A1 bis Z1 befindlichen gelben Felder addiert werden. In Zelle AC1 alle grünen und AD1 alle roten.

Ich frage mich ist das so einfach möglich, oder was muss ich machen.

vielen Dank im voraus für eure Hilfe.

Ich wünsche allen die dieses lesen

ein gesegnetes Weihnachtfest und einen guten Rutsch ins neue Jahr

Gruss Frank

Microsoft Excel, Office 2010, Excel 2010, Farbe

Meistgelesene Beiträge zum Thema Microsoft Excel