एक्सेल स्प्रेडशीट से आउटलुक रिमाइंडर कैसे बनाएं?
यह आलेख एक्सेल स्प्रेडशीट के डेटा के आधार पर आउटलुक अनुस्मारक बनाने के बारे में बात कर रहा है।
वीबीए कोड के साथ एक्सेल स्प्रेडशीट से आउटलुक अनुस्मारक बनाएं
वीबीए कोड के साथ एक्सेल स्प्रेडशीट से आउटलुक अनुस्मारक बनाएं
यदि आप एक्सेल से आउटलुक रिमाइंडर बनाना चाहते हैं, तो कृपया निम्नानुसार कार्य करें।
1. एक वर्कशीट बनाएं जिसमें नीचे स्क्रीनशॉट में दिखाए गए अनुसार कॉलम हेडर और संबंधित अनुस्मारक फ़ील्ड हों।
नोट: के लिए व्यस्त स्थिति स्तंभ, संख्या 2 इसका मतलब है कि अनुस्मारक के रूप में दिखाया जाएगा व्यस्त आपके आउटलुक कैलेंडर में। आप इसे बदल सकते हैं 1 (अस्थायी), 3 (कार्यालय से बाहर), 4 (अन्यत्र कार्य करना)या, एक्सएनएनएक्स (फ्री) जैसी तुम्हारी ज़रूरत है।
2। दबाएं ऑल्ट + F11 कुंजी को खोलने के लिए अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.
3। में अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की, क्लिक करें सम्मिलित करें > मॉड्यूल. फिर नीचे दिए गए VBA कोड को कोड विंडो में कॉपी करें।
वीबीए कोड: एक्सेल स्प्रेडशीट से आउटलुक अनुस्मारक बनाएं
Sub AddAppointments()
'Update by Extendoffice 20180608
Dim I As Long
Dim xRg As Range
Dim xOutApp As Object
Dim xOutItem As Object
Set xOutApp = CreateObject("Outlook.Application")
Set xRg = Range("A2:G2")
For I = 1 To xRg.Rows.Count
Set xOutItem = xOutApp.createitem(1)
Debug.Print xRg.Cells(I, 1).Value
xOutItem.Subject = xRg.Cells(I, 1).Value
xOutItem.Location = xRg.Cells(I, 2).Value
xOutItem.Start = xRg.Cells(I, 3).Value
xOutItem.Duration = xRg.Cells(I, 4).Value
If Trim(xRg.Cells(I, 5).Value) = "" Then
xOutItem.BusyStatus = 2
Else
xOutItem.BusyStatus = xRg.Cells(I, 5).Value
End If
If xRg.Cells(I, 6).Value > 0 Then
xOutItem.ReminderSet = True
xOutItem.ReminderMinutesBeforeStart = xRg.Cells(I, 6).Value
Else
xOutItem.ReminderSet = False
End If
xOutItem.Body = xRg.Cells(I, 7).Value
xOutItem.Save
Set xOutItem = Nothing
Next
Set xOutApp = Nothing
End Sub
नोट: उपरोक्त कोड में, ए 2: जी 2 वह डेटा श्रेणी है जिसके आधार पर आप नियुक्तियाँ बनाना चाहते हैं।
4। दबाएं F5 कोड को चलाने के लिए कुंजी या रन बटन पर क्लिक करें। फिर विशिष्ट फ़ील्ड वाली सभी नियुक्तियाँ आपके आउटलुक के कैलेंडर में एक ही बार में डाली जाएंगी।
और फिर, आप परिणाम देखने के लिए अपने दृष्टिकोण के कैलेंडर पर जा सकते हैं, स्क्रीनशॉट देखें:
सर्वोत्तम कार्यालय उत्पादकता उपकरण
आउटलुक के लिए कुटूल - आपके आउटलुक को सुपरचार्ज करने के लिए 100 से अधिक शक्तिशाली सुविधाएँ
🤖 एआई मेल सहायक: एआई जादू के साथ त्वरित प्रो ईमेल - प्रतिभाशाली उत्तरों के लिए एक-क्लिक, सही टोन, बहुभाषी महारत। ईमेलिंग को सहजता से रूपांतरित करें! ...
📧 ईमेल स्वचालन: कार्यालय से बाहर (POP और IMAP के लिए उपलब्ध) / ईमेल भेजने का शेड्यूल करें / ईमेल भेजते समय नियमों के अनुसार ऑटो सीसी/बीसीसी / स्वतः अग्रेषित (उन्नत नियम) / स्वतः ग्रीटिंग जोड़ें / बहु-प्राप्तकर्ता ईमेल को स्वचालित रूप से अलग-अलग संदेशों में विभाजित करें ...
📨 ईमेल प्रबंधन: आसानी से ईमेल याद रखें / विषयों और अन्य लोगों द्वारा घोटाले वाले ईमेल को ब्लॉक करें / डुप्लिकेट ईमेल हटाएँ / उन्नत खोज / फ़ोल्डरों को समेकित करें ...
📁 अनुलग्नक प्रो: बैच सहेजें / बैच अलग करना / बैच संपीड़न / ऑटो सहेजें / ऑटो डिटैच / ऑटो कंप्रेस ...
🌟 इंटरफ़ेस जादू: 😊अधिक सुंदर और शानदार इमोजी / टैब्ड व्यू के साथ अपनी आउटलुक उत्पादकता बढ़ाएँ / आउटलुक को बंद करने के बजाय छोटा करें ...
???? एक-क्लिक चमत्कार: आने वाले अनुलग्नकों के साथ सभी को उत्तर दें / फ़िशिंग-रोधी ईमेल / 🕘प्रेषक का समय क्षेत्र दिखाएं ...
👩🏼🤝👩🏻 संपर्क एवं कैलेंडर: बैच चयनित ईमेल से संपर्क जोड़ें / किसी संपर्क समूह को अलग-अलग समूहों में विभाजित करें / जन्मदिन अनुस्मारक हटाएँ ...
के ऊपर 100 सुविधाएँ आपके अन्वेषण की प्रतीक्षा करें! अधिक जानने के लिए यहां क्लिक करें।