Ինչպե՞ս ստեղծել օրացույց Excel- ում:
Excel- ում օրացույցը օգտակար օբյեկտ է: Excel- ում օրացույցի միջոցով դուք կարող եք օրացույցում շատ հաղորդագրություններ գրանցել: Ինչպիսիք են `նոր աշխատողի ընկերությանը միանալու ամսաթիվը, ապրանքների առաքման ամսաթիվը և այլն: Օրացույցի միջոցով այս հաղորդագրությունները տեսողական և պարզ տեսք կունենան: Ինչպե՞ս Excel- ում ամսական կամ տարեկան օրացույց ստեղծել:
Ստեղծեք տարեկան օրացույց ՝ ներբեռնելով Excel Օրացույցի ձևանմուշները
Ստեղծեք ամսական օրացույց VBA կոդով
Excel- ի համար Kutools- ի միջոցով արագ ստեղծեք ամսական կամ տարեկան օրացույց
- Վերաօգտագործել ցանկացած բան. Ավելացրեք առավել օգտագործված կամ բարդ բանաձևերը, գծապատկերները և ցանկացած այլ բան ձեր նախընտրածներին և հետագայում արագորեն օգտագործեք դրանք:
- Ավելի քան 20 տեքստի առանձնահատկություններ. Հանեք համարը տեքստային տողից; Հանել կամ հեռացնել տեքստերի մի մասը; Թվերն ու արժույթները վերածեք անգլերեն բառերի:
- Միաձուլել գործիքներըԲազմաթիվ աշխատանքային գրքեր և թերթեր մեկում; Միավորել բազմաթիվ բջիջներ / տողեր / սյուններ ՝ առանց տվյալների կորստի: Միաձուլեք կրկնօրինակ տողերն ու գումարը:
- Պառակտման գործիքներՏվյալները պառակտել բազմակի թերթերի ՝ հիմնված արժեքի վրա. Մեկ աշխատանքային գրքույկ ՝ բազմակի Excel, PDF կամ CSV ֆայլեր; Մեկ սյունակ մի քանի սյունակներից:
- Կպցնել բաց թողնելը Թաքնված / Filտված շարքեր; Հաշվելը և գումարը ըստ Ֆոնի գույնի; Personalանգվածային տարբերակով ստացողներին ուղարկեք անհատականացված էլ.
- Սուպեր ֆիլտր Ստեղծեք զտման առաջադեմ սխեմաներ և կիրառեք ցանկացած թերթի վրա; Տեսակ ըստ շաբաթվա, օրվա, հաճախականության և ավելին; ֆիլտր համարձակ, բանաձևերով, մեկնաբանությամբ ...
- Ավելի քան 300 հզոր հատկություններ; Աշխատում է Office 2007-2021 և 365-ի հետ; Աջակցում է բոլոր լեզուներին; Հեշտ տեղակայում ձեր ձեռնարկությունում կամ կազմակերպությունում:
Ստեղծեք տարեկան օրացույց ՝ ներբեռնելով Excel Օրացույցի ձևանմուշները
Այս մեթոդով դուք պետք է վստահեցնեք, որ ձեր համակարգիչը միանում է ցանցին, որպեսզի կարողանաք ներբեռնել այն Օրացույցի ձևանմուշներ.
Գնալ ՖայլՀամար նոր ձախ կողմում և կտտացրեք Օրացույց - ից Office.com ձևանմուշներ, Տեսեք,
Դրանից հետո կարող եք ընտրել մեկ օրացույցի պանակ և կտտացնել դրա վրա, օրացույցի մի քանի ոճեր կլինեն, ընտրեք ձեզ դուր եկածը և կտտացրեք Բեռնել աջ պատուհանի կոճակ:
Օրացույցի ձևանմուշը ներբեռնելուց հետո դուք կստանաք օրացույցը նոր աշխատանքային գրքում:
Ստեղծեք ամսական օրացույց VBA կոդով
Հետևյալ VBA կոդով դուք կարող եք արագ ստեղծել ամսական օրացույց: Խնդրում ենք անել հետևյալը.
Սեղմել Երեվակիչ > Visual Basic, նոր Microsoft Visual Basic հավելվածների համար պատուհանը կցուցադրվի, կտտացրեք Տեղադրել > Մոդուլներ, և մուտքագրեք հետևյալ կոդը ՝ Մոդուլներ:
VBA. Excel- ում ստեղծեք ամսական օրացույց
Sub CalendarMaker ()
ActiveSheet. Պաշտպանեք նկարչության օբյեկտները. = Կեղծ, պարունակությունը ՝ = կեղծ, _
Սցենարներ. = Սուտ
Դիմում. ScreenUpdating = Սուտ է
GoTo MyErrorTrap- ի սխալի վրա
Շարքը («a1: g14»): Պարզ է
MyInput = InputBox («Մուտքագրեք ամսվա և տարվա օրացույցի համար»)
Եթե MyInput = "" ապա դուրս եկեք ենթ
StartDay = DateValue (MyInput)
Եթե օր (StartDay) <> 1 Ապա
StartDay = DateValue (ամիս (StartDay) & "/ 1 /" & _
Տարի (StartDay))
Վերջ: Եթե
Շարքը («a1»): NumberFormat = «մմմմ այյյ»
Range- ի հետ («a1: g1»)
.HorizontalAlignment = xlCenterAcrossSelection
. Ուղղահայաց հավասարեցում = xl կենտրոն
. Տառատեսակ. Չափս = 18
.Տառատեսակ. Bold = իշտ է
.Շարքի բարձրությունը = 35
Վերջ
Range- ի հետ («a2: g2»)
.Սյունի լայնությունը = 11
. Ուղղահայաց հավասարեցում = xl կենտրոն
.HorizontalAlignment = xlCenter
. Ուղղահայաց հավասարեցում = xl կենտրոն
.Կողմնորոշում = xl Հորիզոնական
. Տառատեսակ. Չափս = 12
.Տառատեսակ. Bold = իշտ է
.Շարքի բարձրությունը = 20
Վերջ
Range ("a2") = "Կիրակի"
Range ("b2") = "Երկուշաբթի"
Range ("c2") = "Երեքշաբթի"
Range ("d2") = "Չորեքշաբթի"
Range ("e2") = "Հինգշաբթի"
Range ("f2") = "Ուրբաթ"
Range ("g2") = "Շաբաթ"
Range- ի հետ («a3: g8»)
.HorizontalAlignment = xlRight
. Ուղղահայաց հավասարեցում = xl Վերև
. Տառատեսակ. Չափս = 18
.Տառատեսակ. Bold = իշտ է
.Շարքի բարձրությունը = 21
Վերջ
Range ("a1"). Արժեք = Application.Text (MyInput, "mmmm yyyy")
DayofWeek = Շաբաթվա օր (StartDay)
CurYear = Տարի (StartDay)
CurMonth = ամիս (StartDay)
FinalDay = DateSerial (CurYear, CurMonth + 1, 1)
Ընտրեք DayofWeek գործը
Case 1
Շարքը («a3»): Արժեք = 1
Case 2
Դաշտ («b3»): Արժեք = 1
Case 3
Դաշտ («c3»): Արժեք = 1
Case 4
Դաշտ («d3»): Արժեք = 1
Case 5
Դաշտ («e3»): Արժեք = 1
Case 6
Դաշտ («f3»): Արժեք = 1
Case 7
Դաշտ ("g3"): Արժեք = 1
Վերջ ընտրեք
Շարքում գտնվող յուրաքանչյուր բջիջի համար ("a3: g8")
RowCell = բջիջ: Տող
ColCell = բջիջ: Սյունակ
Եթե բջիջ: Սյունակ = 1 Եվ բջիջ: Տող = 3 Ապա
ElseIf բջիջ: Սյունակ <> 1 Ապա
Եթե բջիջ: Օֆսեթ (0, -1): Արժեք> = 1 Ապա
բջիջ: Արժեք = բջիջ: Օֆսեթ (0, -1): Արժեք + 1
Եթե բջիջ: Արժեք> (FinalDay - StartDay) Ապա
cell.Value = ""
Ելք For
Վերջ: Եթե
Վերջ: Եթե
ElseIf բջիջ: Տող> 3 Եվ բջիջ: Սյունակ = 1 Ապա
բջիջ: Արժեք = բջիջ: Օֆսեթ (-1, 6): Արժեք + 1
Եթե բջիջ: Արժեք> (FinalDay - StartDay) Ապա
cell.Value = ""
Ելք For
Վերջ: Եթե
Վերջ: Եթե
հաջորդ
X = 0- ի համար 5- ի համար
Շարքը («A4»): Օֆսեթ (x * 2, 0): EntireRow. Տեղադրել
Հեռավորությամբ («A4: G4»): Օֆսեթ (x * 2, 0)
.Շարքի բարձրությունը = 65
.HorizontalAlignment = xlCenter
. Ուղղահայաց հավասարեցում = xl Վերև
.WrapText = իշտ է
. Տառատեսակ. Չափս = 10
. Տառատեսակ. Թավ = կեղծ
.Փակված = Սուտ է
Վերջ
Տիրույթով («A3»): Օֆսեթ (x * 2, 0): Չափափոխել (2, _
7). Սահմաններ (xl ձախ)
.Կշիռ = xl Հաստ
.ColorIndex = xlAutomatic
Վերջ
Տիրույթով («A3»): Օֆսեթ (x * 2, 0): Չափափոխել (2, _
7). Սահմաններ (xl իրավունք)
.Կշիռ = xl Հաստ
.ColorIndex = xlAutomatic
Վերջ
Շարքը («A3»): Օֆսեթ (x * 2, 0): Չափափոխել (2, 7): Սահմանը `մոտ
Քաշ: = xl Հաստ, ColorIndex: = xl Ավտոմատ
հաջորդ
Եթե միջակայք ("A13"): Արժեք = "" Ապա միջակայք ("A13"): Օֆսեթ (0, 0) _
.Փոփոխել (2, 8): Ամբողջ շարքը: eնջել
ActiveWindow.DisplayGridlines = Կեղծ է
ActiveSheet.Protect DrawingObjects: = ueիշտ է, պարունակությունը ՝ = ueիշտ է, _
Սցենարներ. = Trիշտ է
ActiveWindow.WindowState = xl Առավելագույնի հասցված
ActiveWindow.ScrollRow = 1
Դիմում. ScreenUpdating = ueիշտ է
Ելք ենթ
MyErrorTrap:
MsgBox «Հնարավոր է ՝ դուք ճիշտ չեք մուտքագրել ձեր ամիսն ու տարին»: _
& Chr (13) & "Ուղղակի հեգել ամիսը" _
& "(կամ օգտագործել 3 տառի հապավում)" _
& Chr (13) & "և 4 նիշ տարվա համար"
MyInput = InputBox («Մուտքագրեք ամսվա և տարվա օրացույցի համար»)
Եթե MyInput = "" ապա դուրս եկեք ենթ
վերսկսել
Վերջ Sub
Այնուհետեւ կտտացրեք Կոդը գործարկելու կոճակը, և կհայտնվի հուշման տուփ, դուք կարող եք ամիսը և տարին մուտքագրել դատարկ վանդակում: Տեսեք,
Եվ հետո կտտացրեք OK, Եվ ընթացիկ աշխատանքային թերթում ստեղծվել է նոր ամսական օրացույց: Տեսեք,
VBA կոդը դժվար է մեզանից շատերի համար, և այս VBA կոդով դուք կարող եք ստեղծել միայն ամսական օրացույց, եթե ցանկանում եք արագ և հեշտությամբ ստեղծել տարեկան օրացույց, կա՞ դա անելու այլ պարզ մեթոդ
Excel- ի համար Kutools- ի միջոցով արագ ստեղծեք ամսական կամ տարեկան օրացույց
Մշտական օրացույց գործիք է Excel- ի համար kutools կարող է արագ ստեղծել նոր անհատականացված օրացույց կամ տարվա օրացույց նոր աշխատանքային գրքում, և յուրաքանչյուր ամսվա օրացույցը պարունակվում է նոր աշխատանքային թերթում:
Excel- ի համար նախատեսված գործիքներ. Excel- ի ավելի քան 300 հարմարավետ հավելումներով, 30 օրվա ընթացքում անվճար փորձեք առանց սահմանափակումների: Get it Now
Եթե տեղադրել եք Kutools Excel- ի համար, սեղմեք ձեռնարկություն > Աշխատաթերթի գործիքներ > Մշտական օրացույցԵւ Մշտական օրացույց կցուցադրվի երկխոսության տուփը: Եթե ցանկանում եք ստեղծել ընթացիկ ամսական օրացույց, պարզապես մուտքագրեք 1-ը Ամիսների քանակը տուփը և կտտացնելը Ստեղծել կոճակ Տեսեք,
Եվ այնուհետև ընթացիկ ամսական օրացույցը գեներացվել է նոր աշխատանքային գրքում:
Եվ եթե ցանկանում եք ստեղծել 2012-ի տարեկան օրացույց, խնդրում ենք մուտքագրել 12-րդ համարը Ամիսների քանակը տուփը և նշված է առաջին ամսվա համար January, 2012 ձախ պատուհանում: Տեսեք,
Այնուհետեւ կտտացրեք Ստեղծել կոճակը, այն կստեղծի 2012 տարվա օրացույցը նոր աշխատանքային գրքում:
Գրասենյակի արտադրողականության լավագույն գործիքները
Excel-ի համար Kutools-ը լուծում է ձեր խնդիրների մեծ մասը և բարձրացնում ձեր արտադրողականությունը 80%-ով
- Վերաօգտագործել: Արագ տեղադրեք բարդ բանաձևեր, գծապատկերներ և այն ամենը, ինչ դուք նախկինում օգտագործել եք. Ryածկագրել բջիջները գաղտնաբառով; Ստեղծեք փոստային ցուցակ և նամակներ ուղարկել ...
- Super Formula Bar (հեշտությամբ խմբագրեք տեքստի և բանաձևի բազմաթիվ տողեր); Ընթերցանության դասավորությունը (հեշտությամբ կարդալ և խմբագրել մեծ թվով բջիջներ); Տեղադրել ֆիլտրացված տիրույթում...
- Միաձուլել բջիջները / տողերը / սյունակները առանց տվյալների կորստի. Պառակտված բջիջների պարունակությունը; Միավորել կրկնօրինակ տողերը / սյունակները... Կանխել կրկնօրինակ բջիջները; Համեմատեք միջակայքերը...
- Ընտրեք Կրկնօրինակ կամ Եզակի Շարքեր; Ընտրեք դատարկ շարքեր (բոլոր բջիջները դատարկ են); Super Find և Fuzzy Find շատ աշխատանքային գրքույկներում; Պատահական ընտրություն ...
- Actշգրիտ պատճեն Բազմաթիվ բջիջներ ՝ առանց բանաձևի հղումը փոխելու; Ավտոմատ ստեղծեք հղումներ դեպի մի քանի թերթեր; Տեղադրեք փամփուշտներ, Տուփեր և ավելին ...
- Քաղվածք տեքստ, Տեքստ ավելացնել, հեռացնել ըստ դիրքի, Հեռացնել տարածությունը; Ստեղծել և տպել էջային ենթագոտիներ; Փոխարկել բջիջների բովանդակության և մեկնաբանությունների միջև...
- Սուպեր զտիչ (պահպանել և կիրառել ֆիլտրի սխեմաները այլ թերթերի վրա); Ընդլայնված տեսակավորում ըստ ամիս / շաբաթ / օր, հաճախականություն և ավելին; Հատուկ զտիչ համարձակ, շեղատառով ...
- Միավորել աշխատանքային տետրերը և աշխատանքային թերթերը; Միավորել աղյուսակները ՝ հիմնված հիմնական սյունակների վրա; Տվյալները բաժանեք մի քանի թերթերի; Խմբաքանակի փոխակերպում xls, xlsx և PDF...
- Ավելի քան 300 հզոր հատկություններ. Աջակցում է Office / Excel 2007-2021 և 365: Աջակցում է բոլոր լեզուներին: Հեշտ տեղակայում ձեր ձեռնարկությունում կամ կազմակերպությունում: Ամբողջական հնարավորություններ 30-օրյա անվճար փորձարկում: 60-օրյա գումարի վերադարձի երաշխիք:

Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք
- Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
- Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
- Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:



