Hogyan automatizálhatja az e-mail küldést és állíthat be emlékeztetőket Excel-makrók segítségével


Az Excel egy hatékony eszköz, amely számos célra használható, többek között e-mailek küldésére és emlékeztetők beállítására. Makrók használatával automatizálhatja ezeket a feladatokat, így időt és energiát takaríthat meg. Ebben a cikkben végigvezetjük egy olyan makró létrehozásának lépésein, amely e-mailt küld és emlékeztetőt állít be az Excelben.

1. lépés: Nyissa meg a Visual Basic szerkesztőt

Makró létrehozásához meg kell nyitnia a Visual Basic szerkesztőt. Nyomja meg az Alt + F11 billentyűkombinációt, vagy lépjen a Fejlesztő lapra, és kattintson a Visual Basicre. Ez megnyitja a szerkesztőt, ahol megírhatja a kódot.

2. lépés: Írja meg az e-mail küldés makróját

Ezután meg kell írnia az e-mail küldés makróját. Itt van egy mintakód, amelyet használhat:

Sub SendEmail()

Dim OutApp As Object

Dim OutMail As Object

Set OutApp = CreateObject(„Outlook.Application”)

Set OutMail = OutApp.CreateItem(0)

With OutMail

.To = „[email protected]

.CC = „”

.BCC = „”

.Subject = „Az e-mail tárgya”

.Body = „Az e-mail szövege”

.Attachments.Add („C:FilePathAttachment.xlsx”)

.Send

End With

Set OutMail = Nothing

Set OutApp = Nothing

End Sub

A kódot az Ön igényeihez igazíthatja. Cserélje ki a „[email protected]” szót a címzett e-mail címére, az „Email tárgya” és az „Email teste” szót pedig az e-mail tárgyára, illetve tartalmára. Ha fájlt szeretne csatolni, helyettesítse a „C:FilePathAttachment.xlsx” szöveget a fájl elérési útvonalával.

3. lépés: Makró írása az emlékeztető beállításához

Most hozzunk létre egy makrót az emlékeztető beállításához. Íme egy mintakód:

Sub SetReminder()

Dim myDate As Date

myDate = Now + TimeValue(„00:10:00”) ‘Változtassuk meg az időt tetszés szerint

Application.OnTime myDate, „Reminder”

End Sub

Sub Reminder()

MsgBox „Reminder”

End Sub

Ez a kód 10 percre állít be egy emlékeztetőt. Az időpontot a TimeValue függvény értékének módosításával módosíthatja. A Reminder sub megjelenít egy üzenőmezőt emlékeztetőként.

4. lépés: A makrók hozzárendelése a gombokhoz

Végül a makrókat a gombokhoz kell hozzárendelni. Ehhez lépjen a Fejlesztő lapra, és kattintson a Beszúrás gombra. Válassza ki a gombvezérlőt, és rajzoljon egy gombot a munkalapra. Kattintson a jobb gombbal a gombra, és válassza a Makró hozzárendelése lehetőséget. Válassza ki a gombhoz hozzárendelni kívánt makrót, majd kattintson az OK gombra.

Mostantól kezdve, amikor a gombra kattint, a makró lefut, és vagy e-mailt küld, vagy emlékeztetőt állít be, attól függően, hogy melyik gombhoz rendelte.

Összefoglalva, a makrók használatával automatizálhatja az Excelben az olyan feladatokat, mint az e-mailek küldése és az emlékeztetők beállítása. Az ebben a cikkben megadott mintakódok segítségével könnyedén létrehozhatja saját makróit, és az igényeinek megfelelően testre szabhatja azokat. Ezzel időt és energiát takaríthat meg magának, és hatékonyabbá teheti munkáját.

FAQ
Hogyan állíthatok be emlékeztetőt az Excelben e-mailben?

Ahhoz, hogy az Excelben emlékeztetőt állítson be e-mailben, az alábbi lépéseket kell követnie:

1. lépés: Nyissa meg az Excel munkafüzetét, és lépjen a „Fejlesztő” fülre. (Megjegyzés: Ha nincs a „Fejlesztő” fül az Excelben, akkor először engedélyeznie kell azt. Ehhez menjen a „Fájl” > „Beállítások” > „Szalag testreszabása” > jelölje be a „Fejlesztő” négyzetet a „Fő lapok” alatt).

2. lépés: Kattintson a „Visual Basic” gombra a „Kód” csoportból. Ez megnyitja a Visual Basic szerkesztőt.

3. lépés: A Visual Basic szerkesztőben kattintson a „Beszúrás” menüre, és válassza a „Modul” lehetőséget. Ez egy új modult hoz létre.

4. lépés: Az új modulban másolja be a következő kódot:

Sub SendEmailReminder()

Dim OutApp As Object

Dim OutMail As Object

Dim strbody As String

Set OutApp = CreateObject(„Outlook.Application”)

Set OutMail = OutApp.CreateItem(0)

strbody = „Kedves [Címzett neve], ” & vbCrLf & vbCrLf & _

„Ez egy emlékeztető, hogy a jelentést a [határidőig] töltse ki és küldje be.” & _

vbCrLf & vbCrLf & _

„Köszönjük együttműködését.” & vbCrLf & vbCrLf & _

„Üdvözlettel,” & vbCrLf & _

„[Az Ön neve]”.

On Error Resume Next

With OutMail

.To = „[Címzett e-mail címe]”

.CC = „”

.BCC = „”

.Subject = „Report Submission Reminder”

.Body = strbody

.Send

End With

On Error GoTo 0

Set OutMail = Nothing

Set OutApp = Nothing

End Sub

5. lépés: Helyettesítse a helyőrzőket saját tartalmával. Például helyettesítse a „[Címzett neve]” szöveget annak a személynek a nevével, akinek el szeretné küldeni az emlékeztetőt, és a „[Címzett e-mail címe]” szöveget az e-mail címével. Az e-mail tárgyát és szövegét is megváltoztathatja az igényeinek megfelelően.

6. lépés: Mentse a modult a „Fájl” > „Mentés” gombra kattintva vagy a „Ctrl + S” billentyűkombinációval.

7. lépés: Menjen vissza az Excel munkalapjához, és jelölje ki azt a cellát, ahol az emlékeztetőt szeretné beállítani.

8. lépés: Kattintson a jobb gombbal a cellára, és válassza a kontextusmenüből a „Makró hozzárendelése” lehetőséget.

9. lépés: Válassza ki a „SendEmailReminder” makrót a listából, majd kattintson az „OK” gombra.

10. lépés: Mostantól, amikor elérkezik az esedékesség napja, kattintson a jobb gombbal a cellára, és válassza a „SendEmailReminder” lehetőséget a kontextusmenüből. Ez megnyitja az Outlookot, és létrehoz egy új e-mailt az emlékeztető üzenettel. Ezután testre szabhatja az üzenetet, és elküldheti a címzettnek.

Beállíthatok emlékeztetőket az Excelből?

Igen, az Excelből különböző módszerekkel állíthat be emlékeztetőket. Az egyik gyakori módszer az Excel „Emlékeztetők” funkciójának használata. Ez a funkció lehetővé teszi, hogy meghatározott dátumokra vagy időpontokra emlékeztetőket hozzon létre, és szükség esetén beállíthatja, hogy azok rendszeres időközönként ismétlődjenek.

Az Emlékeztetők funkció használatához kövesse az alábbi lépéseket:

1. Nyissa meg az Excel fájlt, és lépjen a „Kezdőlap” fülre.

2. Kattintson a „Feltételes formázás” gombra, és válassza az „Új szabály” lehetőséget.

3. Válassza ki a „Formula használata a formázandó cellák meghatározásához” lehetőséget.

4. A „Formázza az értékeket, ahol ez a képlet igaz” mezőbe írja be az emlékeztetőt kiváltó képletet. Ha például azt szeretné, hogy egy bizonyos dátum közeledtével emlékeztessék, használhatja a =TODAY()+7 képletet, amely kiemeli azokat a cellákat, amelyek pontosan egy hétre vannak a mai dátumtól.

5. Kattintson a „Formázás” gombra, és válassza ki, hogyan szeretné, hogy a cellák formázva legyenek, amikor az emlékeztető aktiválódik.

6. Kattintson az „OK” gombra a szabály mentéséhez.

Miután létrehozta az emlékeztető szabályt, az automatikusan alkalmazásra kerül az Excel fájlban. Amikor a feltétel teljesül (azaz közeledik a dátum), a cellák az Ön által megadott formázás szerint lesznek kiemelve. Ezt aztán emlékeztetőként használhatja, hogy megtegyen bármilyen szükséges intézkedést, például befizessen egy számlát vagy elvégezzen egy feladatot.

Az emlékeztetők Excelben történő beállításának egyéb módszerei közé tartozik a makrók vagy bővítmények használata, amelyek fejlettebb funkciókat biztosíthatnak. Az Emlékeztetők funkció azonban egyszerű és hatékony módja az emlékeztetők beállításának közvetlenül az Excel-fájlban.