एक्सेल कई गणनाओं और टेम्पलेट्स को स्वचालित करने के लिए एक बेहतरीन उपकरण है। आप एक्सेल के माध्यम से कई प्रकार के मासिक कैलेंडर बना सकते हैं। यदि आप इसे करने के तरीके ढूंढ रहे हैं, तो आप सही जगह पर आए हैं। इस लेख में, मैं आपको एक्सेल में मासिक कैलेंडर बनाने के 3 प्रभावी तरीके दिखाऊंगा।
आप यहां से हमारी प्रैक्टिस वर्कबुक मुफ्त में डाउनलोड कर सकते हैं!
एक्सेल में मासिक कैलेंडर बनाने के 3 प्रभावी तरीके
1. एक्सेल टेम्पलेट्स से मासिक कैलेंडर बनाएं
एक्सेल के पास स्वयं कैलेंडर के लिए कुछ पूर्व-निर्मित टेम्पलेट हैं। आप नीचे दिए गए तरीकों का पालन करके उन टेम्पलेट्स में से किसी से मासिक कैलेंडर बना सकते हैं।
📌 चरण:
- सबसे पहले और सबसे महत्वपूर्ण, फाइल टैब पर जाएं।

- उसके बाद, विस्तारित फाइल टैब से नया विकल्प चुनें।
- बाद में, एक नया विंडो दिखाई देगी।
- इसके बाद, खोज बॉक्स में कैलेंडर टाइप करें और खोज शुरू करें आइकन पर क्लिक करें।

- परिणामस्वरूप, उपलब्ध टेम्पलेट आपको सुझाव के रूप में आएंगे।

- अब, अपनी पसंद के किसी भी टेम्पलेट को चुनें और बनाएं बटन पर क्लिक करें।

नतीजतन, आप टेम्पलेट के अनुसार एक नई एक्सेल विंडो में एक कैलेंडर देखेंगे। हमारे चुने हुए टेम्पलेट के लिए, परिणाम इस प्रकार होगा।

और पढ़ें: टेम्पलेट के बिना एक्सेल में कैलेंडर कैसे बनाएं (2 उदाहरण)
2. एक्सेल 2003 | 2007 | 2010 | 2013 | 2016 और बाद के संस्करणों में कस्टम मासिक कैलेंडर बनाएं
अब, ऐसा हो सकता है कि आपको कोई पूर्व-निर्मित टेम्पलेट पसंद न आए, बल्कि आप अपनी पसंद के अनुसार अपना खुद का मासिक कैलेंडर बनाना चाहते हैं। इस संबंध में, आप नीचे दिए गए चरणों का पालन करके एक्सेल में मासिक कैलेंडर बना सकते हैं।
📌 चरण:
- सबसे पहले, अपने महीने के लिए हेडर बनाएं और 7 पंक्तियों और 7 कॉलम का चयन करें।

- उसके बाद, चयन पर होम टैब से सभी बॉर्डर आइकन पर क्लिक करें।

- परिणामस्वरूप, सभी सेल में सभी बॉर्डर होंगे।
- इसके बाद, पहली चयनित पंक्ति में, सप्ताह के दिनों के नाम लिखें और उन्हें अपनी इच्छा के अनुसार फॉर्मेट करें।

- अब, अन्य 6 पंक्तियों और 7 कॉलम का चयन करें >> होम टैब >> सेल्स समूह >> फॉर्मेट टूल >> पंक्ति ऊंचाई… विकल्प पर जाएं।

- परिणामस्वरूप, पंक्ति ऊंचाई विंडो दिखाई देगी।
- पंक्ति ऊंचाई: टेक्स्ट बॉक्स में मान 40 डालें और OK बटन पर क्लिक करें।

- उसके बाद, पिछले चयन पर, होम टैब >> सेल्स समूह >> फॉर्मेट टूल >> कॉलम चौड़ाई… विकल्प पर जाएं।

- नतीजतन, कॉलम चौड़ाई विंडो दिखाई देगी।
- उसके बाद, कॉलम चौड़ाई: टेक्स्ट बॉक्स में मान 12 डालें और OK बटन पर क्लिक करें।

- अब, पिछले चयन पर, राइट-क्लिक करें और संदर्भ मेनू से सेल फॉर्मेट… विकल्प चुनें।

- इस समय, सेल फॉर्मेट विंडो दिखाई देगी।
- बाद में, संरेखण टैब पर जाएं >> क्षैतिज: विकल्प सूची में दाएं (इंडेंट) विकल्प चुनें >> लंबवत: विकल्प सूची में ऊपर विकल्प चुनें >> OK बटन पर क्लिक करें।

इस प्रकार, आपका कैलेंडर फॉर्मेटिंग पूरी तरह तैयार है। अब, अगले वर्ष के अगले महीने के पहले दिन को गूगल करें और मान को सप्ताह के दिनों के अनुसार रखें। अंत में, मासिक कैलेंडर इस तरह दिखना चाहिए।

और पढ़ें: इंटरैक्टिव कैलेंडर एक्सेल में कैसे बनाएं (2 आसान तरीके)
3. VBA का उपयोग करके मासिक कैलेंडर बनाएं
मासिक कैलेंडर बनाने का एक और तरीका VBA कोड का उपयोग करना है। आप इसे पूरा करने के लिए नीचे दिए गए चरणों का पालन कर सकते हैं।
📌 चरण:
- सबसे पहले, एक नई वर्कशीट बनाएं और डेवलपर टैब >> विजुअल बेसिक टूल पर जाएं।

- परिणामस्वरूप, एप्लिकेशन के लिए माइक्रोसॉफ्ट विजुअल बेसिक विंडो दिखाई देगी।
- इसके बाद, इन्सर्ट टैब >> मॉड्यूल विकल्प चुनें।

- परिणामस्वरूप, Module1 नामक एक नया मॉड्यूल बनाया गया है।
- बाद में, Module1 पर डबल-क्लिक करें और कोड विंडो में नीचे दिए गए VBA कोड को लिखें।

यह VBA कोड इस docs.microsoft.com से लिया गया है।
Sub CalendarMaker() ActiveSheet.Protect DrawingObjects:=False, Contents:=False, _ Scenarios:=False Application.ScreenUpdating = False On Error GoTo MyErrorTrap Range("a1:g14").Clear MyInput = InputBox("Type in months and years") If MyInput = "" Then Exit Sub StartDay = DateValue(MyInput) If Day(StartDay) <> 1 Then StartDay = DateValue(Month(StartDay) & "/1/" & _ Year(StartDay)) End If Range("a1").NumberFormat = "mmmm yyyy" With Range("a1:g1") .HorizontalAlignment = xlCenterAcrossSelection .VerticalAlignment = xlCenter .Font.Size = 18 .Font.Bold = True .RowHeight = 35 End With With Range("a2:g2") .ColumnWidth = 11 .VerticalAlignment = xlCenter .HorizontalAlignment = xlCenter .VerticalAlignment = xlCenter .Orientation = xlHorizontal .Font.Size = 12 .Font.Bold = True .RowHeight = 20 End With Range("a2") = "Sunday" Range("b2") = "Monday" Range("c2") = "Tuesday" Range("d2") = "Wednesday" Range("e2") = "Thursday" Range("f2") = "Friday" Range("g2") = "Saturday" With Range("a3:g8") .HorizontalAlignment = xlRight .VerticalAlignment = xlTop .Font.Size = 18 .Font.Bold = True .RowHeight = 21 End With Range("a1").Value = Application.Text(MyInput, "mmmm yyyy") DayofWeek = Weekday(StartDay) CurYear = Year(StartDay) CurMonth = Month(StartDay) FinalDay = DateSerial(CurYear, CurMonth + 1, 1) Select Case DayofWeek Case 1 Range("a3").Value = 1 Case 2 Range("b3").Value = 1 Case 3 Range("c3").Value = 1 Case 4 Range("d3").Value = 1 Case 5 Range("e3").Value = 1 Case 6 Range("f3").Value = 1 Case 7 Range("g3").Value = 1 End Select For Each cell In Range("a3:g8") RowCell = cell.Row ColCell = cell.Column If cell.Column = 1 And cell.Row = 3 Then ElseIf cell.Column <> 1 Then If cell.Offset(0, -1).Value >= 1 Then cell.Value = cell.Offset(0, -1).Value + 1 If cell.Value > (FinalDay - StartDay) Then cell.Value = "" Exit For End If End If ElseIf cell.Row > 3 And cell.Column = 1 Then cell.Value = cell.Offset(-1, 6).Value + 1 If cell.Value > (FinalDay - StartDay) Then cell.Value = "" Exit For End If End If Next For x = 0 To 5 Range("A4").Offset(x * 2, 0).EntireRow.Insert With Range("A4:G4").Offset(x * 2, 0) .RowHeight = 65 .HorizontalAlignment = xlCenter .VerticalAlignment = xlTop .WrapText = True .Font.Size = 10 .Font.Bold = False .Locked = False End With With Range("A3").Offset(x * 2, 0).Resize(2, _ 7).Borders(xlLeft) .Weight = xlThick .ColorIndex = xlAutomatic End With With Range("A3").Offset(x * 2, 0).Resize(2, _ 7).Borders(xlRight) .Weight = xlThick .ColorIndex = xlAutomatic End With Range("A3").Offset(x * 2, 0).Resize(2, 7).BorderAround _ Weight:=xlThick, ColorIndex:=xlAutomatic Next If Range("A13").Value = "" Then Range("A13").Offset(0, 0) _ .Resize(2, 8).EntireRow.Delete ActiveWindow.DisplayGridlines = False ActiveSheet.Protect DrawingObjects:=True, Contents:=True, _ Scenarios:=True ActiveWindow.WindowState = xlMaximized ActiveWindow.ScrollRow = 1 Application.ScreenUpdating = True Exit Sub MyErrorTrap: MsgBox "You may not have entered your Month and Year correctly." _ & Chr(13) & "Spell the Month correctly" _ & " (or use 3 letter abbreviation)" _ & Chr(13) & "and 4 digits for the Year" MyInput = InputBox("Type in Month and year for Calendar") If MyInput = "" Then Exit Sub Resume End Sub
- उसके बाद, Ctrl+S दबाएं।
- इस समय, एक माइक्रोसॉफ्ट एक्सेल डायलॉग बॉक्स दिखाई देगा। यहां नहीं बटन पर क्लिक करें।

- परिणामस्वरूप, इस रूप में सहेजें डायलॉग बॉक्स दिखाई देगा।
- बाद में, इस प्रकार सहेजें: विकल्प को .xlsm के रूप में चुनें और सहेजें बटन पर क्लिक करें।

- अब, कोड विंडो बंद करें और डेवलपर टैब >> मैक्रो टूल पर जाएं।

- परिणामस्वरूप, मैक्रो विंडो दिखाई देगी।
- इसके बाद, CalendarMaker मैक्रो चुनें और रन बटन पर क्लिक करें।

- परिणामस्वरूप, एक माइक्रोसॉफ्ट एक्सेल डायलॉग बॉक्स दिखाई देगा।
- यहां, महीने के पहले 3 अक्षर और वर्ष के 4 अंक लिखें।
- अंत में, OK बटन पर क्लिक करें।

इस प्रकार, आप देखेंगे कि आपके वर्कशीट में निम्न महीने का कैलेंडर बनाया गया है और परिणाम इस तरह दिखेगा।

फॉर्मूला के साथ एक्सेल में इंटरैक्टिव/डायनामिक कैलेंडर बनाएं
अब, यदि आप फॉर्मूला के साथ एक्सेल में एक इंटरैक्टिव/डायनामिक कैलेंडर बनाना चाहते हैं, तो आपको कई अतिरिक्त कार्य करने होंगे। इसे प्राप्त करने के लिए नीचे दिए गए चरणों को ध्यान से देखें।
📌 चरण:
- सबसे पहले, दो हेल्पर टेबल बनाएं, एक छुट्टी की सूची के साथ और दूसरा महीने के नाम की सूची के साथ।

- अब, अपनी पसंद के अनुसार एक कस्टम मासिक कैलेंडर टेम्पलेट बनाएं।
- अगला, डायनामिक उद्देश्यों के लिए, हम अब महीने के नाम को स्वचालित करना चाहते हैं।
- ऐसा करने के लिए, H4 सेल चुनें >> डेटा टैब >> डेटा टूल्स समूह >> डेटा वैलिडेशन टूल >> डेटा वैलिडेशन… विकल्प पर जाएं।

- बाद में, डेटा वैलिडेशन विंडो दिखाई देगी।
- उसके बाद, यहां सेटिंग्स टैब पर जाएं >> अनुमति: विकल्प सूची से सूची विकल्प चुनें >> स्रोत: टेक्स्ट बॉक्स में E5:E16 सेल देखें >> OK बटन पर क्लिक करें।

- परिणामस्वरूप, आप देखेंगे कि H4 सेल में एक ड्रॉपडाउन सूची होगी और आप क्लिक करके महीने का चयन कर सकते हैं।

- जनवरी के रूप में महीना चुनने के बाद, B6 सेल पर क्लिक करें और निम्न सूत्र डालें।
=IF(MONTH(DATE($D$4,MATCH($H$4,'Helper Columns'!$E$5:$E$16,0),1)+SEQUENCE(6,7)-WEEKDAY(DATE($D$4,MATCH($H$4,'Helper Columns'!$E$5:$E$16,0),1),2))=MATCH($H$4,'Helper Columns'!$E$5:$E$16,0),DATE($D$4,MATCH($H$4,'Helper Columns'!$E$5:$E$16,0),1)+SEQUENCE(6,7)-WEEKDAY(DATE($D$4,MATCH($H$4,'Helper Columns'!$E$5:$E$16,0),1),2),"")- बाद में, Enter बटन दबाएं।

- इस प्रकार, आप निम्न महीने के लिए सप्ताह के दिनों के अनुसार सभी तारीखें सही ढंग से प्राप्त कर सकते हैं।
- लेकिन, मान उचित प्रारूप में नहीं हैं।
- इसे ठीक करने के लिए, पूरे B6:H11 चयन पर राइट-क्लिक करें और संदर्भ मेनू से सेल फॉर्मेट… विकल्प चुनें।

- परिणामस्वरूप, सेल फॉर्मेट डायलॉग बॉक्स दिखाई देगा।
- संख्या टैब पर जाएं >> श्रेणी: फलक से कस्टम विकल्प चुनें >> प्रकार: टेक्स्ट बॉक्स में dd लिखें >> OK बटन पर क्लिक करें।

- इस प्रकार, आपके कैलेंडर की तारीखें ठीक से फॉर्मेट हैं और आप निम्न महीने के लिए पूरा कैलेंडर देख सकते हैं।

- अब, सप्ताहांत को अलग तरीके से चिह्नित करने के लिए, सप्ताहांत के सेल चुनें >> होम टैब >> फॉन्ट समूह >> फिल कलर आइकन >> नारंगी, एक्सेंट 2, लाइटर 40% रंग चुनें।

- अब, छुट्टियों को चिह्नित करने के लिए, B6:H11 सेल चुनें >> होम टैब >> सशर्त फॉर्मेटिंग टूल >> नया नियम… विकल्प।

- नतीजतन, फॉर्मेटिंग नियम संपादित करें विंडो दिखाई देगी।
- इसके बाद, नियम प्रकार चुनें: विकल्प सूची से अंतिम विकल्प चुनें >> नीचे दिए गए सूत्र को इस सूत्र के सत्य होने पर मान फॉर्मेट करें: फॉर्मूला बार में लिखें >> फॉर्मेट… विकल्प पर क्लिक करें।
=ISNUMBER(VLOOKUP('Dynamic Monthly Calender'!B6,'Helper Columns'!$C$5:$C$15,1,0))
- बाद में, दिखाई गई विंडो से भरण टैब पर जाएं >> लाल रंग चुनें >> OK बटन पर क्लिक करें।

- परिणामस्वरूप, फॉर्मेटिंग नियम संपादित करें विंडो पूर्वावलोकन के साथ फिर से दिखाई देगी। OK बटन पर क्लिक करें।

इस प्रकार, आपको अपना इंटरैक्टिव मासिक कैलेंडर मिलेगा जहां सप्ताहांत अलग रंगों में प्रदर्शित होते हैं और छुट्टियां भी अलग रंगों में प्रदर्शित होती हैं। आप H4 सेल में ड्रॉपडाउन द्वारा महीना बदल सकते हैं और इस प्रकार, सप्ताह के दिन, सप्ताहांत, और छुट्टियां भी डायनामिक रूप से बदल जाएंगी।

एक्सेल में वार्षिक कैलेंडर बनाएं
अब, यदि आप एक्सेल में वार्षिक कैलेंडर बनाना चाहते हैं, तो आप नीचे दिए गए चरणों का पालन कर सकते हैं।
📌 चरण:
- सबसे पहले, अपनी पसंद के अनुसार दिनों और महीनों के लिए एक टेम्पलेट बनाएं।

- उसके बाद, B6 सेल पर क्लिक करें और निम्न सूत्र डालें।
=IF(MONTH(DATE($B$3,MATCH($B$4,'Helper Columns'!$E$5:$E$16,0),1)+SEQUENCE(6,7)-WEEKDAY(DATE($B$3,MATCH($B$4,'Helper Columns'!$E$5:$E$16,0),1),2))=MATCH($B$4,'Helper Columns'!$E$5:$E$16,0),DATE($B$3,MATCH($B$4,'Helper Columns'!$E$5:$E$16,0),1)+SEQUENCE(6,7)-WEEKDAY(DATE($B$3,MATCH($B$4,'Helper Columns'!$E$5:$E$16,0),1),2),"")- बाद में, Enter बटन दबाएं।

- परिणामस्वरूप, आप देखेंगे कि तारीखें निम्न महीने के विशेष दिनों के अनुसार सेट होंगी।
- लेकिन, कम जगह और फॉर्मेटिंग मुद्दों के लिए, यह कभी-कभी ### दिखा सकता है।
- इसे ठीक करने के लिए, पूरे महीने के डेटासेट का चयन करें और सेल पर राइट-क्लिक करें।
- इसके बाद, सेल फॉर्मेट… विकल्प चुनें।

- नतीजतन, सेल फॉर्मेट विंडो दिखाई देगी।
- अब, संख्या टैब पर जाएं >> श्रेणी: फलक से कस्टम विकल्प चुनें >> प्रकार: टेक्स्ट बॉक्स में dd लिखें >> OK बटन पर क्लिक करें।

- अगले वर्ष के प्रत्येक महीने के लिए इन प्रक्रियाओं को दोहराएं।
- इस प्रकार, आपको पूरे वर्ष के लिए सप्ताह के दिनों के अनुसार तारीखें मिलेंगी।

- अब, सप्ताहांत को चिह्नित करने के लिए, सप्ताहांत के सेल चुनें >> होम टैब >> फॉन्ट समूह >> फिल कलर आइकन >> नारंगी, एक्सेंट 2, लाइटर 40% रंग चुनें।

- उसके बाद, जनवरी की छुट्टियों को चिह्नित करने के लिए, महीने के सभी दिनों का चयन करें >> होम टैब >> सशर्त फॉर्मेटिंग टूल >> नया नियम… विकल्प चुनें।

- परिणामस्वरूप, फॉर्मेटिंग नियम संपादित करें विंडो दिखाई देगी।
- इसके बाद, नियम प्रकार चुनें: विकल्पों से अंतिम विकल्प चुनें >> इस सूत्र के सत्य होने पर मान फॉर्मेट करें: टेक्स्ट बॉक्स में निम्न सूत्र डालें >> फॉर्मेट… बटन पर क्लिक करें।
=ISNUMBER(VLOOKUP(B6,'Helper Columns'!$C$5:$C$15,1,0))
- उसके बाद, भरण टैब पर जाएं >> लाल रंग चुनें >> OK बटन पर क्लिक करें।

- परिणामस्वरूप, फॉर्मेटिंग नियम संपादित करें विंडो पूर्वावलोकन के साथ फिर से दिखाई देगी। OK बटन पर क्लिक करें।

इसी सूत्र और फॉर्मेट का उपयोग करके अन्य सभी महीनों के लिए इन प्रक्रियाओं को डायनामिक रूप से दोहराएं और इस प्रकार आपको अपना डायनामिक वार्षिक कैलेंडर मिलेगा।

और पढ़ें: एक्सेल में साप्ताहिक कैलेंडर कैसे बनाएं (3 उपयुक्त तरीके)
एक्सेल में मासिक शेड्यूल कैसे बनाएं
आप एक्सेल में मासिक शेड्यूल भी आसानी से बना सकते हैं। ऐसा करने के लिए, नीचे दिए गए चरणों को ध्यान से देखें।
📌 चरण:
- प्रारंभ में, फाइल टैब पर जाएं।

- उसके बाद, विस्तारित फाइल टैब से नया विकल्प चुनें >> खोज बॉक्स में मासिक शेड्यूल लिखें >> खोज शुरू करें आइकन पर क्लिक करें।

- परिणामस्वरूप, कई टेम्पलेट दिखाई देंगे।
- इसके बाद, 12-महीना कैलेंडर टेम्पलेट पर क्लिक करें।

- उसके बाद, बनाएं बटन पर क्लिक करें।

परिणामस्वरूप, एक नई एक्सेल फाइल बनाई जाएगी, और इस प्रकार आपको एक्सेल में अपना वांछित मासिक शेड्यूल मिलेगा।

निष्कर्ष
तो, इस लेख में, मैंने आपको दिखाया है कि एक्सेल में मासिक कैलेंडर कैसे बनाएं। मेरा सुझाव है कि आप पूरा लेख ध्यान से पढ़ें और ज्ञान को अपनी आवश्यकताओं के लिए लागू करें। आप अभ्यास के लिए हमारी मुफ्त वर्कबुक भी डाउनलोड कर सकते हैं। मुझे आशा है कि आपको यह लेख उपयोगी और जानकारीपूर्ण लगा। यदि आपके पास कोई और प्रश्न या सिफारिशें हैं, तो कृपया यहां टिप्पणी करने के लिए स्वतंत्र महसूस करें।
और, ExcelDemy पर जाएं एक्सेल के बारे में अधिक चीजें सीखने के लिए! आपका दिन शुभ हो!
संबंधित लेख
- एक्सेल में ब्लैंक कैलेंडर कैसे बनाएं (मुफ्त टेम्पलेट डाउनलोड करें)