ࡱ> bdfhj~  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`acdefghijklmnopqrstuvwxyz{|}~Root Entry FA0ZO]Workbook9 _VBA_PROJECT_CUR"76`cVBA \ YA\pAlexandre Pinho Ba=    ThisWorkbook=`T6)8X@"1(Arial1(Arial1(Arial1(Arial1(Arial1,(Lucida Console1(Arial1 (Arial1 (Arial1(Arial1(Arial1 (Arial1 (Arial1(Arial1$(Arial1 (Arial1(Arial1(Arial1 (Arial1 (Arial1(Arial1 (Arial1(Arial1(Arial1(Arial1(Arial1 (Arial1(Arial1 (Arial1 (Arial1 (Arial19(Arial1YArial1 YArial1YArial14YArial1 YArial1YArial1YArial1,8YArial18YArial18YArial1>YArial14YArial1<YArial1?YArial1h8YCambria1YArial1 YArial3#,##0\ " ";\-#,##0\ " "=#,##0\ " ";[Red]\-#,##0\ " "?#,##0.00\ " ";\-#,##0.00\ " "I"#,##0.00\ " ";[Red]\-#,##0.00\ " "q*6_-* #,##0\ " "_-;\-* #,##0\ " "_-;_-* "-"\ " "_-;_-@_-k)3_-* #,##0\ _ _-;\-* #,##0\ _ _-;_-* "-"\ _ _-;_-@_-,>_-* #,##0.00\ " "_-;\-* #,##0.00\ " "_-;_-* "-"??\ " "_-;_-@_-{+;_-* #,##0.00\ _ _-;\-* #,##0.00\ _ _-;_-* "-"??\ _ _-;_-@_-"#,##0\ "Esc.";\-#,##0\ "Esc."'"#,##0\ "Esc.";[Red]\-#,##0\ "Esc."(##,##0.00\ "Esc.";\-#,##0.00\ "Esc."-(#,##0.00\ "Esc.";[Red]\-#,##0.00\ "Esc."D?_-* #,##0\ "Esc."_-;\-* #,##0\ "Esc."_-;_-* "-"\ "Esc."_-;_-@_-JE_-* #,##0\ _E_s_c_._-;\-* #,##0\ _E_s_c_._-;_-* "-"\ _E_s_c_._-;_-@_-LG_-* #,##0.00\ "Esc."_-;\-* #,##0.00\ "Esc."_-;_-* "-"??\ "Esc."_-;_-@_-RM_-* #,##0.00\ _E_s_c_._-;\-* #,##0.00\ _E_s_c_._-;_-* "-"??\ _E_s_c_._-;_-@_-"$"#,##0_);\("$"#,##0\)!"$"#,##0_);[Red]\("$"#,##0\)""$"#,##0.00_);\("$"#,##0.00\)'""$"#,##0.00_);[Red]\("$"#,##0.00\)72_("$"* #,##0_);_("$"* \(#,##0\);_("$"* "-"_);_(@_).)_(* #,##0_);_(* \(#,##0\);_(* "-"_);_(@_)?:_("$"* #,##0.00_);_("$"* \(#,##0.00\);_("$"* "-"??_);_(@_)61_(* #,##0.00_);_(* \(#,##0.00\);_(* "-"??_);_(@_)50_-""* #,##0_-;\-""* #,##0_-;_-""* "-"_-;_-@_-,'_-* #,##0_-;\-* #,##0_-;_-* "-"_-;_-@_-=8_-""* #,##0.00_-;\-""* #,##0.00_-;_-""* "-"??_-;_-@_-4/_-* #,##0.00_-;\-* #,##0.00_-;_-* "-"??_-;_-@_-)$[$-816]dddd\,\ d" de "mmmm" de "yyyy[$-816]d/mmm;@"Sim";"Sim";"No"&!"Verdadeiro";"Verdadeiro";"Falso"(#"Activado";"Activado";"Desactivado" m/d/yyyy"Yes";"Yes";"No""True";"True";"False""On";"On";"Off"0.0                !  !  !  !  !  !  !  !  !  !  !  !  "  "  "  "  "  "  "  "  "  "  "  "  #  $   % ff     &  '  ( P ) P *  *   +   , ` -       .   / 0 a> 1  `   @ "x  `  `@@  `@ a"  @  a"  `@  h  ` "x  d  "x  `   h@ @   `@ @   d@ @  "P  D  `@ @ 2  `@ @ 0  `@ @   `@@  `@  `  @  `@  h  `   d  h@  h@  ` @   `   `  )x@ )x )x   h@  p@  x  p  p    h  x@  a" a" a"@ a"   @  a"   a"@  a"  a"  a! a"  h    h "x  a" @    h   a!   ` a"  a"   a#  `@ @  d@ @   l""@ @    x x@ x  x  x  "x@ @ "x@ @  "x@ @ "x@ @ + "x@ @   "x@ @ * a"@ a" a"   h   a"   a"   `@ @ 4  D (P  `@ @  "x@ @  x "x@ @ "x@ @   x x@ @ )p@@ )p@ )p  @  `@ @ > a    H   X a" a"  X   @   `@@   `@   `  @   `@   `  h   `   h@   d  h@   h   ` @    `    `   q"   H   h   H 1 x  q#""@ @ + q! q!  q"""@ @   q!""@ @ + q  x  H  q! @   q!   q!    h@  h@  q*@  q*  q*   h  h@  h  h@  q!  p@@   p @   t@@   t@@  p @  p@@  0 @  x@@   x @  "x"@@  "x"@  "x " @   a"@ "x@ @  a"@   a"@   a"   a"    a""@  a"@@  a"@  a"  @  !p x +  a" "x  "x  a"@  a"  a"    x  0 a@ @ a@  a@ a@  !x@ @ +  !x!@ @ +  x @ +  x +  x + "x@@  "x@  "x  @  !x@@  !x@  !x @   !x!@ @ +  !x!!@ @ +  q!"@@ +  q!"@ +  q! " @ + !x@ @  !x!@ @  q"@ q" q"   !x"@@ +  !x"@ +  !x " @ +  q"@  q"  q"   x@@+  x@+  x  @+ "x@ "x  "x"@@  "x"@  "x " @  "x@ "x "x   q*@  q*  q*   (p@  (0  (0  (0@  p@  p  p  q! ||*UI}<} ctivado"ef?_-;_-@_}<} ctivado"ef?_-;_-@_}<} ctivado"ef?_-;_-@_}<} ctivado"ef?_-;_-@_}<} ctivado"ef?_-;_-@_}<} ctivado"ef ?_-;_-@_}<} ctivado"L?_-;_-@_}<} ctivado"L?_-;_-@_}<} ctivado"L?_-;_-@_}<} ctivado"L?_-;_-@_}<} ctivado"L?_-;_-@_}<} ctivado"L ?_-;_-@_}<} ctivado"23?_-;_-@_}<} ctivado"23?_-;_-@_}<} ctivado"23?_-;_-@_}<} ctivado"23?_-;_-@_}<}  ctivado"23?_-;_-@_}<}! ctivado"23 ?_-;_-@_}<}" ctivado"?_-;_-@_}<}# ctivado"?_-;_-@_}<}$ ctivado"?_-;_-@_}<}% ctivado"?_-;_-@_}<}& ctivado"?_-;_-@_}<}' ctivado" ?_-;_-@_}<}( ctivado"?_-;_-@_}}) }ctivado"?_-;_-@__._-;_-@"??\ _-@_ }}* ctivado"?_-;_-@_???_._-;_-@???"??\ ???_-@_ ???}(}/ ctivado"}<}1 activado"?_-;_-@_}<}2 ctivado"?_-;_-@_}<}3 ctivado"??_-;_-@_}<}4 ctivado"23?_-;_-@_}(}5 ctivado"}}8 ??vctivado"̙?_-;_-@__._-;_-@"??\ _-@_ }<}9 }ctivado"?_-;_-@_}<}: ectivado"?_-;_-@_}x}<ctivado"?_-;_-@__._-;_-@ "??\ _-@_}}= ???ctivado"?_-;_-@_???_._-;_-@???"??\ ???_-@_ ???}-}? ctivado"}P}@ ctivado"?_-;_-@__._-;_-@}(}A ctivado"}(} ctivado" 20% - Accent1H 20% - Accent1 ef  20% - Accent2H" 20% - Accent2 ef  20% - Accent3H& 20% - Accent3 ef  20% - Accent4H* 20% - Accent4 ef  20% - Accent5H. 20% - Accent5 ef  20% - Accent6H2 20% - Accent6  ef  40% - Accent1H 40% - Accent1 L  40% - Accent2H# 40% - Accent2 L渷  40% - Accent3H' 40% - Accent3 L  40% - Accent4H+ 40% - Accent4 L  40% - Accent5H/ 40% - Accent5 L  40% - Accent6H3 40% - Accent6  Lմ  60% - Accent1H 60% - Accent1 23  60% - Accent2H$ 60% - Accent2 23ږ  60% - Accent3H( 60% - Accent3 23כ  60% - Accent4H, 60% - Accent4 23  60% - Accent5H0 60% - Accent5 23 ! 60% - Accent6H4 60% - Accent6  23  "Accent1<Accent1 O  #Accent2<!Accent2 PM  $Accent3<%Accent3 Y  %Accent4<)Accent4 d  &Accent5<-Accent5 K  'Accent6<1Accent6  F (Bad4Bad  ) Calculation| Calculation  } * Check Cellz Check Cell  ????????? ???+ Comma,( Comma [0]-&Currency.. Currency [0]/Explanatory TextB5Explanatory Text 0 : Followed Hyperlink 1Good6Good  a2 Heading 1B Heading 1 I}O3 Heading 2B Heading 2 I}?4 Heading 3B Heading 3 I}235 Heading 44 Heading 4 I}6( Hyperlink7 Hyperlink 2, Hyperlink 2 8InputpInput ̙ ??v 9 Linked CellF Linked Cell } :Neutral<Neutral  e"Normal ;Normal 2&Normal 2 <Noteb Note   =OutputrOutput  ???????????? ???>$Percent ?Title1Title I}% @TotalHTotal OOA Warning Text: Warning Text XTableStyleMedium9PivotStyleLight16` ]InputJ Config  HelpS Macro Configurations Demo Restrictions_>2Documents and SettingsTitonaDesktopBook26.xlsHelpY^XLCalendars25Demo.xlsInputConfigHelpMacro ConfigurationsDemo RestrictionsYY8  HEADDAYA3);05;05 ;05;',;', ;',;#;" ;## ;#;; ; HEADDAYA3);05;05 ;05;',;', ;',;#;" ;## ;#;; ; HEADDAYA3);05;05 ;05;',;', ;',;#;" ;## ;#;; ; HEADDAYA4);: :; ;;#;# ;#;',;'+ ;', ;'+:+;',;05;05 ;05 HEADDAYA4);: :; ;;#;# ;#;',;'+ ;', ;'+:+;',;05;05 ;05 HEADDAYA4);: :; ;;#;# ;#;',;'+ ;', ;'+:+;',;05;05 ;05 HEADWEEKA3);; ;;; ;;&&;&& ;&&;//;// ;// HEADWEEKA3);; ;;; ;;&&;&& ;&&;//;// ;// HEADWEEKA3);; ;;; ;;&&;&& ;&&;//;// ;// HEADWEEKA4);; ;;; ;;&&;&& ;&&;//;// ;// HEADWEEKA4);; ;;; ;;&&;&& ;&&;//;// ;// HEADWEEKA4);; ;;; ;;&&;&& ;&&;//;// ;// Main% Module5.InsertHolidays OutLookTest  ;e   ;#   ;   ;  ResetTaskListfNf8@Hb0;R3HV!Tң2KFHV!Tң2KJFIF``C   %# , #&')*)-0-(0%()(C   (((((((((((((((((((((((((((((((((((((((((((((((((((T" }!1AQa"q2#BR$3br %&'()*456789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz w!1AQaq"2B #3Rbr $4%&'()*56789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz ?+&k屲E76bR,  0bif ĀHn;OVus6ah e#=WКTiW RQcBdJPʫ1>lh cUԭ-YHեGURgOV89]>+ź ZvλY8}?٠lw5K>kM*kiIȕۓ@RwF56Z\C*FV(wG9NGL}E|O!;-aEsr '=qw ~xtjMX峖7i2 oCo@jډUmBQ$ vqQw>ḨqA6e=i"䌶ݑ]I|C[ɣz[oKE/]ی_1Tw8+|4'cm2Ḓ mI9͞093imtH2 Q&7G. J{]óEww;9]+]gҺM$^f%\]@|ܜɒ  tEflc$D31;*chPIB&j7#75O[{>~ҺEd~!;w}t8:6& jLNUqҀ<\H7H,ؖu&:3X<1vSÄR_Fצ;=0dsЌC^zݻD;,EΛ$y32rq4^sϨxR E$\uaᵅ)/l $vO{?|wCPҎ^PlbS"2}B޾N/SzE&55ůmFR"2(rN8“ҜSR洩i%o}?iZ&άY+x [qrU#bS )Cg>0wRNs0|;ӼKxW^SAnh|d݄qt_=+:NN>tFD&o=Ӽ[bI4Syƫf5=9J->G!_$s<~zt 8f~.=[:r=Jo/Gw|5 \^G|INeY hw }fK!_ݏS~=t_zaY % ʜ1眑2}-_#ezlb.ۆ?N_oOw:{v̶}FU~A=? >VP.ʆ3Mm,wGP:]ީsk7]/&Njw8ү#}?wZQꍤ;԰4?ӧ%ʒo=:*cI;yUw3< g!Sojծ.mat8ijH G!@A3ڨAIo`9 P|>/-e,"$۱zsؐv4 jV~KkY_cXyM/:=V\I"7c #Wt[WcQHYе~+cKr@„KqS<c?O=Y^#Yϋ~N/?jwD,xwa>Z€-x— i*c6/d9Z~x,kj+F$^ 'C)j~ -& 8f'I85`ZC1>7OܜC@zhw4|oWjE16g,}ggU ;|9R<=9|Q^?>M~Hݧ>Y^v>&+EZT} 14~7/Wj!apK@zIkԢǺo7o>m_3gz"u3?fn~_mEZ50` ~om^U7~6ME+'Cַ^Ru=/Ø<=P9Pƽ"h)֦Ko<5U#U9vxuo틻GUk h|CNTE d/jM'IS~l^/ޛҝ3h\7?'0ӈk?'ݷSp?otlXGMV6cou?i.1߇2Yhj_&GM'퍷/<ڡTO:7mgΕl-,~9˶J.5 7x,{nkOF7Nݤߟ97n_?bX]ni#R&KQx (ZTH{N߆%4dO]Fvs{zdϚ&^:bx}_OmXCI v :ŌdS@ j;u ۅА砎8"(ªJyԿo#Ftwc/o=Y iii?6wnXkǝg=]W\K jv"0.. 1N G;Hd3O-@0Sن~淅r~Ys\'D^kx[ϳ -Ү7Q4DݏE#ᯘ-5ٱ#ͬ]k_--r'ڭ~ӢiM| [u_+AIیgLw/Oɻ$!̮ ?[3 >/I$Sw97G!>?矡5 ,6iu)lqK$IPyDUN馗.U*mj||RnEl,$ r3ϝ_)xNӵ;9. *B1$>GﵬQ܌?\QϋYTP c/ݪNsVQiSkYQ_Z' cin.~?Ok_3Z/ %>P_ťCmviHvfg~+]LVg5cfO6kn"bΕ]73c>-|][WH^,>m??)j4_y4ٴbMoQ]zfkԬ~k ھplu |Gưd]_jey DD+SeWC->}:I7 UԳ;G-?v9Ni]~T0ߏ|bueF$ōYYQN@Q3k:wP`Bqd# AG4)/#Y]Ɲ V~Bn`>h}U4B]:]A"\m#DvaY1AɠH5/V_ֆCN#햟vGMZ k3eEVZr"3d s%pc$[k7j:kG2?dܟ`Wͮl3b R`v1N[ ƭxLAy'Q3pA7L8515ijrJ=5PqOW+j인$S]kK_֚-Zn>mOֲ?ZoN>3ʷuZ!t屌gʷ"?z~oʶ4&}MJxg'kY&#?7k&1۷Η7\&۟IYH<)lɷ m_kAM6?#?jٿL}/7w٠91iCmiw$}mʶZs_M*Zۭ7'6R%Gu?~L'IӍ6@MQs'-o\U'i6_?9/3+j인$S]kK_֚-Zn>mOֲ?ZyoyV|kS:N1Z VGG~mVO5KhtŤokKe=4o&&o GY9v7U4vF7^0#ɷoz-l>"ciWGֺ0,Ɲhʾ# \_֑/KlOAK%u{rB 1֞|[Q^F/>K f.Cm=W>gOqOV-f$;E]/O3x#LBIy: kwgAgbd%eI~Uv.P)BZOŹnw9.ovb( ?>_kf+jnc:bmI/5]AY؀hc5Y?w|== KGp:%(jrA:|( 7n m`)o3tQ@ OihҲ^k6#Z EZxIEmu%&vI,OE@Zټ+ڻ۷<Θ:dRKypl6vyv ([5hrd~БԖ/SRMF{ 62cOQE3  @@   }MayDoesn't work? Click HereNamewww.officehelp.bizHELP using this macro. Month NamesColor Start DateEnd DateJanuaryFebruaryMarchAprilJuneJulyAugust SeptemberOctoberNovemberDecemberYear Week Numbers Weekend DaysSunMonTueWedThuFriSatDayEasterNew Year's DayThanksgiving DayIndependence Day Columbus Day Veterans Day Halloween Labor DayCategoryMeetingsCoordination MeetingLegend John HolidaysBG PicNo Background Picture Usage HelpMacros are a very useful tool to automate tasks in Office. Unfortunately, like another programming language, it can be misused.AOfficeHelp macros are Virus Free and can be open with confidence.Office XP/2003 Warning: Macros may need to be activated. Follow instructions on the message Excel 2003 will show, if necessary.yOf course. It's an Excel Sheet like any other. There is nothing special once it's generated, only colored cells and data.(Back to the Main Display user interface.sAgain, of course. It's a regular Excel file. There are NO MACROS on the resulting plan, only on the generator file.7@Macro Configuration HelpMacros are a possible security threat. Therefore, they are disabled in many recent Microsoft Office Editions. Learn more on how to5configure them so that you can utilize this software.9Help - The button doesn't work but there are no warnings .How can I get Help configuring Macro Settings?There are Office Macro Virus, so Office can be configured to request permission to run macros. Only run macros from known sources.MWhy do I get a Macro security warning when opening the Traditional Calendar ?/What is a Background Picture? How does it work?You may insert a background picture on your calendar by selection "Use Background Picture" for this input cell (C7). By default it is disabled.ito read against a colored background. Font and background colors for several items are user configurable.uColor: Color to use for the dates background. Just change the cell background color using the taskbar button for that%Can I change the resulting calendar ?NCan I save the resulting Calendar with the events? Can I have several copies ?%What is the Legend? How does it work?-Days: Lists each individual event on the list~Categories: Only lists individual categories. Each category will have a single entry regardless of the number of events on it. .None: No Legend will be added to the Calendar. #How to personalize text and colors?mMonth Names: Insert the desired month names on each month cell, over the supplied ones (full name in English) BG Colors: Change the background of each cell, the color will be used for the appropriate calendar cells. Leave reference text as is. Font Colors: Change font color as desired. The color will be used for the appropriate Calendar font color. Leave reference text as is. oThe legend will add at the bottom of the resulting calendar a "Legend" of your Holidays & Special Dates events:If you activate this option, you will be prompted to select a picture file on your hard drive. The picture will be used as a Calendar backgroundboth on the screen and on paper (if printed). REMEMBER to change font and background colors appropriately or some text may be hardy Category: Insert the type of event (Holidays, Meetings, & ) for the Category Legend. Use the same color for each category. -Start Date: Date when the event should start. )End Date: Date when the event should end. ^ Day: Insert the specific name of event (holiday name, specific meeting, & ) for the Days Legend CSome text labels and font or background colors can be personalized:oWeekdays: Insert the desired weekday names on each weekday cell, over the supplied ones (short name in English) The macro will stop on the first line with no data on it. So if you leave a intermediate empty line, it will stop there even if more events exist after that line.John's HolidaysEvent CalendarFont'Define OUTLOOK ADVANCED import settingsYes#Import Completed Tasks (Tasks only)3Import Tasks without Start / Due dates (Tasks only)NoNImport Contact info (Protected by Outlook, user will need to grant permission)5Define Global Formatting for the Output Calendar Plan;Include Excel Default Gridlines on the Output Calendar Plan MAIN_TITLEMAIN_ENDCalendar Generation Finished.NThis macro is a member of www.OfficeHelp.Biz full family of Calendar Products.Calendar Plan PersonalizationOutlook Interface SettingsImport from this Outlook FolderEvents for the CalendarHDefine HOW Month Names and Weekdays should be identified on the CalendarCalendar CUSTOMIZATIONImported Events ColorQClick here to CUSTOMIZE your Calendar (Fonts, Colors, Month and Weekday names, & )Import from DateImport until DateWeekday / Header Labels>Category for Outlook Events (leave Blank to use standard ones)Date Format for Day's LEGENDSunday Calendar Type.Click here to configure the ADVANCED settingsxCustomize these messages to create YOUR OWN personalized Traditional Calendars for Excel. Ask for the Customized Edition7Configure Message Box Texts - BY SPECIAL REQUEST ONLYOffice Software Solutions Font OnlyFont & Background Colors Regular DaysApply Color to Weekend CellsAutomatic Holiday Settings%Category for Automatic Holiday EventsHolidaysAutomatic Holidays Events Color Insert Holidays into Events ListMartin Luther King DayPresidents ' Day Memorial Day: Christmas DayUSA + VH ValentinesStrategy MeetingsClient MeetingSteve HolidaysSteve's Holidays.If you can open the Excel file (both the DEMO and/or the commercial version) and get no warnings but the button just won't work, you have Macro support disabled on Excel. Please refer (click link below to the FREE PC Tip) to our article on Macro security issues for information on how to activate them.QOutput Calendars can be CUSTOMIZED on the CONFIG sheet, as can many other options. Holidays can be automatically inserted into the Events list.%How to input Events for the Calendar?@Insert data for the Events on the appropriate Input sheet table::regular meetings and team holidays, and to compare months.(Can I stop the macro while it's running?Yes. Press the ESC key and it will stop with a warning message that it was interrupted before finishing generating the calendar.BHow does the Traditional Calendar knows when the Events list end ?#What is the Insert Holidays Option?It allows Holidays for a specific country to be automatically added to the Events list. Just select the desired country and click on the button to add theEHolidays for the selected year. Currently only available for the USA.!Can I make all calendars at once?will be PERMANENTLY ERASED."What is the "Reset Events" button?The Reset tasks button will delete ALL events on the Events list. Therefore, you have to confirm TWICE the action. All existing Events(How to Import OUTLOOK Calendar and Tasks{To import Outlook Calendar or Tasks, all you need to do is to run the macro on the PC where the Outlook you want to sync isinstalled, and with the same account. For most cases, all you need to do is select the source and press the "Import Outlook" button.ZImport from this Outlook Folder: Select the source for import: Calendar (default) or Tasks :There are also some ADVANCED SETTINGS on the Config sheet:%-3mImport Completed Tasks: For Tasks only, define if tasks already completed should be imported. Default is Yes.Import Tasks without Start / Due dates: For Tasks only, define if tasks without a defined Start or End date should be imported.'< {Import Contact info (Protected by Outlook, user will need to grant permission): Define if the Contact info of the Calendar O |events or tasks should be imported. This will trigger an Outlook protection and will require the user to manually accept it..J }Color: Color to use for the Event. All Outlook imported events will have this color after import. You can manually change it.jCategory: Category to use for Outlook Imported Events. If left Blank, the default categories will be used. Import until Date: Limit the number of Events imported. Events will only be imported for the selected year and ending on this date. 7What are the customization options of the CONFIG sheet?eMonth names: Month names used on the calendars. Can be changed to personalize language or to shorten. ^Backgrounds and Fonts: Here you can decide how each area on your Calendar Plan can be colored. bGridlines: If Yes, the resulting Plan will have gridlines. Default is No, with a blank background. *Outlook: Check details on the title below.\The CONFIG sheet allows for several customizations of the Calendars generated by the macro:_Weekday names: As above but for weekdays. Can be changed to personalize language or to shorten.YThe macro will copy, for each area (week numbers, weekdays, headers,...) the cell formatsOin Background and fonts as indicated). Try different colors to see the results!`Automatic Holidays: Define the color and category to use for this automatically inserted events. 0Can I personalize (REBRAND) the POP-UP messages?ROnly by special Request. Use the link to request a contact from us on our website.cDate Format for Legend: Some countries use day/month, others month/day. Use the one that suits you. _Weekend color: Define if weekends days should have a special color or left blank like workdays. Traditional are calendars using the "traditional" month matrixes (1 per month). Events are shown as colored days. Useful for a full year view.Planning Calendars use a single matrix for the full year, with Months as rows and days as columns. They are useful to track repeated events likeStart of Week: Define if weeks start on Sunday or Monday. Different countries in the world has different definitions, use the one that suits you. Import from Date: Limit the number of Events imported. Events will only be imported for the selected year and starting from this date. 2Import Outlook Appointment Hours into Event Labels Start Only Start MonthCalendar[How do I make a "non-January" Calendar (Academic, Fiscal or other not starting in January)?It is now possible to use a different Starting Month by selecting the respective month number (1 to 12) on the "Start Month" (cell F9) input field.jThe Output Calendar will start on the indicated month and end on the previous month of the following year.is entered (must be exact) the indicated folder will be used instead. Allows data import from alternative Calendars / Tasks lists.FC(start only, start and end or none) to be added to the event label.xImport Outlook Appointment Hours into Event Labels: Allows the specification if the imported calendar appointment hours 4 tSub/Shared Folder name (secondary Calendar or Tasks List) name - If empty, the main Calendar / Task List is imported3Shared Task List are not supported (Only calendars)Sub/Shared Folder name - If empty, Task / Calendar events will be imported from the default calendar. If a sub-calendar (sub-Task list) folder name FStart of Week (only applies to Traditional and Monthly output formats)May not apply to all calendars.&Make your Calendar look like YOU want.5Annual formats have their own CONFIG Settings (Above)Weekdays (Short)Weekdays (Long)MondayTuesday WednesdayThursdayFridaySaturday@Replace the words on the yellow cells with your preferred names.Border ThicknessMedium!Border, Fonts & Background ColorsUse Event color on Label<Change the Background color and Font of each identified Cell. to customize the corresponding Calendar area.:Max number of Characters for Event Labels (0 for no limit)>Monthly / Table formats have their own CONFIG Settings (below)Month Names & Day NumbersColumn Width (Days) Title Font Legend FontRegular Days FontFonts & Background ColorsUse Event color TABLE FORMAT 'ANNUAL (TRADITIONAL & PLANNING) FORMATSMonth Title FontDay Numbers (Monthly only) FontWeekend Days BackgroundAll MONTHLY & MONTHLY (LIST) FORMATS]Illustrated, STEP-BY-STEP Tutorial on how to setup Excel macros, on our website: (Click Here)AThe Tutorial above will deal with all versions of Excel since 97.Warning - Excel may display no message indicating that macros are disabled. Excel 2007 has a different interface to deal with security.dd/mmFor Calendars (only), it can also be used to enter the name of a shared calendars (usually the exact name of the person sharing it).AQBoard Board MeetingMartha HolidaysMartha's HolidaysAirport John Arrival Categories)Get the Full (Unrestricted) Version Here!Limited DEMO VersionDemo Restrictions`This file is a FREE to download DEMO from OfficeHelp.Biz. It is restricted on its functionality..The following restrictions apply to this DEMO:J- Fully working for 2005 (test year with events) and 2004 (without events)"- Will not work for any other year+How to get the Full (unrestricted) Version?<Simply download it from OfficeHelp.Biz website on this link:The Traditional Calendars for Excel will create a Calendar of the selected style on a new Workbook using the supplied name (Input cell C5) for the Sheet.Weekdays and month names can be changed on the appropriate Input table, if you want to use alternate ones (foreign languages, shorter,...)gTable Calendars are a different 1 page annual format that will support multiple events on the same day.)What is the TRADITIONAL Calendars Format?&What is the PLANNING Calendars Format?#What is the TABLE Calendars Format?%What is the MONTHLY Calendars Format?Traditional 1 Month large format that supports multiple events per day. Uses one sheet per month therefore creating a workbook with 12 sheets.,What is the MONTHLY (List) Calendars Format?oAlternative Monthly format with one month per sheet. Days are listed as rows. Supports multiple events per day.All calendar formats will ALLWAYS have 12 months, but until now they would always be from January to December of the same year.;Yes, of course. Just select "All" on the Calendar Type box.!)6The Calendar will start on the Start Month (Cell F9) and post 12 months, usually January to December, starting with the year supplied on the Input cells C9 (Year).rSPECIFIC - There are some specific settings for the Monthly and Table formats, near the bottom of the CONFIG sheet V- The remaining months have text warnings indicating that they have not been generated - "ALL" Calendar Types mode onlyb- For speed reasons, the Monthly and Monthly (List) formats will only generate the first 3 months._- This restrictions does not apply when the formats are generated on their own (not with "ALL")" OfficeHelp'Traditional Calendars for Excel Vs 4.00MChange the Background color and Font of each identified Cell to customize theEof each identified Cell to customize the corresponding Calendar area.?If YES, Week numbers will be included on the TRADITIONAL formatHCopy the "INPUT" sheet Header & Footer (printer) to the Output CalendarssOffice 2007/2010 - A message will be shown just below the Ribbon. Click on the "Options" button to activate macros. +What is the MONTHLY 4-5-4 Calendars Format?Fiscal 4-5-4 format. Similar to the  Monthly format but with a different week split. The 3 months on every quarter always have 4 Weeks, 5 Weeks and 4 Weeks again.fMonths may be sp<lit in the calendar (the first or last day may be on the previous / next month sheet).?Can I set the printing Header / Footer on the output calendars? Yes. Set them on the  Input sheet of the macro file and they will be copied to the output sheets IF the option  Copy the "INPUT" sheet Header & Footer (printer)qB to the Output Calendars is active (cell H59 of the CONFIG sheet). MPrinter Header & Footer: Activate to YES to copy the ones on the Input sheet. GWhy do I get a Macro security warning when opening the Plan Generator ?Office XP/2003/2007/2010 Warning: Macros may need to be activated. Follow instructions on the message Excel displays, or follow this Tutorial:"> WWW.OFFICEHELP.BIZ - Traditional Calendars for Excel Vs 4.00"p qUqq#qVWrCsvxu/{ 9,g0`Ň<F̍C4U ?'{mޤ22Imcc PK![Content_Types].xmlN0EH-J@%ǎǢ|ș$زULTB l,3;rØJB+$G]7O٭VACMȉ<&J &M5BNe tY>?#!mfKx=[Ԃu}ˆ ~umoLz^W/}ةLo;9iwk/_tV[,ac߬56YvYp1ϡAz 9ۮ7ެe ."Zk1~EȰ RӔ/x$( :7vʗsSj{"bF^x^xz?>~,ɸ7Gg_zy5^|?}V I򋧿>O~I|SQ>19D{<Ÿ8ߊaG@tOE*\ʻ/ yToN:"1Q(v; y4<$jbRa|PŻǴI Y3wJG݈8b2(<& QHT^w/B(`Z!94[Mc˴j`jG7;Q]o YC5*CocU 9 IQ/ RV+`%*;æWѼ9/#~7qZ$*cߓrUngN>%OOi Dh[BvoLJƌB6>p&>w O]>_x.eywQ,5,^<ؾt&9 ԔEЇIIqhJ#f6kAS&2D)p3ӕ5teO`jvzEOG)9cshger-# ~fu-ԙՍh&9܊- 6 AлY3hX"M$#Fz6#b.w*lyhĭɾ̮]nR3+=,)'Kak.zi X 8Ka6!_ 5[ M܆< kW Ds/Z/j@&8?&5- C⫲K3Zw1K|D!`~J0A?Uֶy&,Xg1K#[y$[BTV)bBRvVt=낕@[\׶Dž8d4~_@`rx \kp*O69mY&ԧ HE]HKN!Vj%2BƣJԊ=" u\ӵC&Y0>g4&oN)j rihr"VTU,koy#ŬjQJpRk3܎Ws;ɢ!JT~u "֠ۀW_ Nq֙4)ڬuZˋw֒TvќXHegvtm,{2Da*20V=CoOQ2'@C8D.IrG[Ȥiࠆ)d͛|?&f9>b|w##(ɇ"C *_p=ce΂aenv*Wm瓗{va宁rAˇ$IDpKs6* ʢG0egAnlCYt֏$Ysă)2|FS` uz'Xr*󠍒F`Bi m/Ҷj9Xrmox86tFo˜ b`>ASDbƟPK! ѐ'theme/theme/_rels/themeManager.xml.relsM 0wooӺ&݈Э5 6?$Q ,.aic21h:qm@RN;d`o7gK(M&$R(.1r'JЊT8V"AȻHu}|$b{P8g/]QAsم(#L[PK-![Content_Types].xmlPK-!֧6 0_rels/.relsPK-!kytheme/theme/themeManager.xmlPK-!ÄA theme/theme/theme1.xmlPK-! ѐ' theme/theme/_rels/themeManager.xml.relsPK] Ncu-W YA C7!9 IY!i',y28=CH!NS1Y^AdiQotazq )9IYiyQ q9#(Y-!26;y@AE JNSaX)]afkIpuy~i1Qq9ɼY!yA a)Qa q #(,)159:>ICGYLPiUYy^cglp!uy1~AɋS۔eu -=M]m}% 5EU!%e*.u37< AEJN-SW=\`Mei]nrmw{}%5EͭUݶeu -=M]m }#%(,515E:>UCGeLPuUY^ cglp-uy=~łMՋ]m}%5EUeu - =M]!%m*.}38<AE%JN5SWE\`Ueienruw{ -=ŤMխ]m}%5EUeu  #-(,=15M:>]CGmLP}UZ^cg%lp5uyE~͂U݋eu -=M]m}%5 EUe!%u*.3 8<AE-JN=SWM\`]eimnr}w|%5EͤUݭeu -=M]m   dMbP?_*+%&?'?(?)?M*\\imomaia\MAIAHPIMOB02LC odXXLetterDINU"(d dc<C(SMTJHP LaserJet 4250 PCL 6InputBinFORMSOURCERESDLLUniresDLLResolution600dpiFastResTrueOrientationPORTRAITHPOrientRotate180FalseDuplexNONEHPDuplicateJobNameOverrideSWFWHPDocUISUITruePaperSizeA4MediaTypePLAINESPRITSupportedTrueCollateONOutputBinAutoStaplingNoneHPPaperSizeALMConstraintsENV_10EconomodeFalseTextAsBlackFalseHPEnableRAWSpoolingTrueTTAsBitmapsSettingTTModeOutlineRETChoiceTrueAlternateLetterHeadFalsePrintQualityGroupPQGroup_1HPDocPropResourceDatahpchl5r1.cabHPColorModeMONOCHROME_MODEHPContentOrientationHPContentOrientation_OptionHPPDLTypePDL_PCL6HPPJLEncodingUTF8HPJobAccountingHPJOBACCT_JOBACNTHPJobByJobOverrideJBJOHPPCL6PassThroughTrueHPSmartDuplexSinglePageJobTrueHPSmartDuplexOddPageJobTrueHPManualDuplexDialogItemsInstructionID_01_FACEDOWN-NOROTATEHPPaperSizeDuplexConstraintsA5HPMediaTypeDuplexConstraintsEXTRA_HEAVYHPManualFeedOrientationFACEDOWNHPOutputBinOrientationFACEDOWNHPManualDuplexDialogModelModelessHPManualDuplexPageOrderEvenPagesFirstHPMapManualFeedToTray1FalseHPManualDuplexPageRotateDriverRotateHPCustomDUplexableRange5.83x8.27_8.5x14HPPrintOnBothSidesManuallyFalseHPStraightPaperPathFalsePSAlignmentFileHPCLS5r1HPSmartHub_OnlinediagnostictoolsTRUEHPSmartHub_SupportandtroubleshootingTRUEHPSmartHub_ProductmanualsTRUEHPSmartHub_CheckfordriverupdatesTRUEPSServices_DeviceandSuppliesStatusTRUEHPSmartHubInet_SID_263_BID_276_HID_265PSServicesOptionPrnStat_SID_242_BID_270_HID_15521HPNUseDiffFirstPageChoiceTRUEHPPageExceptionsFileHPCPE5r1HPPageExceptionsInterfaceShowPageExceptionsHPPageExceptionsLowEndHPPageExceptionsLowEndVerHPPageExceptionsCoverInsertionJRConstraintsJRCHDPartialJRHDInstalledJRHDOffJRHDNotInstalledJRHDOffHPJobAccWoPinTrueHPConsumerCustomPaperHPCustomHPPreAnalysisTrueHPBornOnDateHPBODHPXMLFileUsedhpc42506.xmlHPLpiSelectionNoneIUPHx1o@N$DԢƒ2E ׹H!")T* J1 ڏX@Tlle;9vRg{|~w; [ |@Wj4+haC:#y`߇.c8rxuEZxr% -i %=+֊~dv5;^RbH[p(Q'c-d Q⩞v҃"nj#pٍE)KQ/06zM}Bd|9@Fk\!'ș*r3usXZ&m8/n_4gώ̙Ȋ-UW%¦)1F9~D~L/"UDPD~uCTuGU<{\|(o1lo0F7l4 |MvWmĢP;+T7eri{ix-Y,y(J`HBd9!])-_Yx[U?~>`ށ[\Sfn~pjnĭ !B!r ԎxX" dXX??&U} C} C} C} . C}  C} t C} 7C} EC} .C} . CC722@ 2 2 22@2Z@2@2K@ 2  2 2@ 2 2@  2@ 2 2<@<@  K@K@@ @   fDDDDDDDDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE1 FGGGG H IJ U K E zqJLKLLBJ - K, E z*  M JNKLLBMMM J~ T@ KL~ E@ z u     O  p  u E z~ vvw   s }  s   EEEEEo   cp qpppprp j sbcccct  dp uvvvvw u  zeyLz] uLL{Lz] u~ ,@ xk{Lz] uLL{LB] u~ /@ xl {| r] }PP~] ] f Q ' Q Q Q V (S@S@ RDX l"x",Lhd> `*,60$:$$. @ @ V ,,d !"#$%&'()*+,@-./0123456789:;<=>? V (  S@@S`@ R)!V !(!!S@@S@@ !R)"V "(""S@S@ "R)# #(##S@S@ #R$W $+$$S`@S@ $RT%X %%%S@S@ %R& &&&@@@@ &' '''S@@S@ 'R( (|(( @ @ ( ) )|)) @ @ )* *|**@@ *+ +|++@@ +, ,|,,@@ ,- -|-- @ @ -". .|..@@ .&/ /|//`@`@ /#0 0|00@@ 0!1 1|11`@`@ 1$2 2|22@@ 23 3|33@@ 34 4|44@@ 4%5 5|55@@ 5 6 6|66@@ 67 7|77@@ 78 8|88@@ 89 9|99@@@@ 9: :|::@@ :"; ;|;;@@ ;&< <|<< @ @ <#= =|==@@ =!> >|>>@@ >$? ?|??@@ ?D@ lFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_@ @|@@@@@@ @A A|AA @ @ A%BX BBB @ @ BCDEFGHSSRIJKLMNOPQRSTUVWXYZ[\]^_DlFFF`abcdefghijklmnopqrstuvwxyz{|}~`abcdefghijklmnopqrstuvwxyz{|}~D@lD@lD@lD@lD@l          D@l !"#$%&'()*+,-./0123456789:;<=>? !"#$%&'R(R)R*R+R,R-R.R/R0R1R2R3R4R5R6R7R8R9R:R;R<R=R>R?RD@l@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_@RARBRCRDRERFRGRHRIRJRKRLRMRNRORPRQRRRSRTRURVRWRXRYRZR[R\R]R^R_RD@l`abcdefghijklmnopqrstuvwxyz{|}~`RaRbRcRdReRfRgRhRiRjRkRlRmRnRoRpRqRrRsRtRuRvRwRxRyRzR{R|R}R~RRD@lRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRD@lRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRD@lRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRD@lRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRD@l     RRRRRRRRR R R R R RRRRRRRRRRRRRRRRRRRD@l !"#$%&'()*+,-./0123456789:;<=>? R!R"R#R$R%R&R'R(R)R*R+R,R-R.R/R0R1R2R3R4R5R6R7R8R9R:R;R<R=R>R?RD@l@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_@RARBRCRDRERFRGRHRIRJRKRLRMRNRORPRQRRRSRTRURVRWRXRYRZR[R\R]R^R_RD@l`abcdefghijklmnopqrstuvwxyz{|}~`RaRbRcRdReRfRgRhRiRjRkRlRmRnRoRpRqRrRsRtRuRvRwRxRyRzR{R|R}R~RRD@lRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRD@lRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRD@lRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRD@lRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRD@l     RRRRRRRRR R R R R RRRRRRRRRRRRRRRRRRRD@l !"#$%&'()*+,-./0123456789:;<=>? R!R"R#R$R%R&R'R(R)R*R+R,R-R.R/R0R1R2R3R4R5R6R7R8R9R:R;R<R=R>R?RD@l@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_@RARBRCRDRERFRGRHRIRJRKRLRMRNRORPRQRSSRRRSSRSRSSRTRSSRURSSRVRSSRWRSSRXRSSRYRSSRZRSSR[RSSR\RSSR]RSSR^RSSR_RSSRD@l`abcdefghijklmnopqrstuvwxyz{|}~`RSSRaRSSRbRSSRcRSSRdRSSReRSSRfRSSRgRSSRhRSSRiRSSRjRSSRkRSSRlRSSRmRSSRnRSSRoRSSRpRSSRqRSSRrRSSRsRSSRtRSSRuRSSRvRSSRwRSSRxRSSRyRSSRzRSSR{RSSR|RSSR}RSSR~RSSRRSSRD@lRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRD@lRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRD@lRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRD@lRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRD@l     RSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSR RSSR RSSR RSSR RSSR RSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRD@l !"#$%&'()*+,-./0123456789:;<=>? RSSR!RSSR"RSSR#RSSR$RSSR%RSSR&RSSR'RSSR(RSSR)RSSR*RSSR+RSSR,RSSR-RSSR.RSSR/RSSR0RSSR1RSSR2RSSR3RSSR4RSSR5RSSR6RSSR7RSSR8RSSR9RSSR:RSSR;RSSR<RSSR=RSSR>RSSR?RSSRD@l@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_@RSSRARSSRBRSSRCRSSRDRSSRERSSRFRSSRGRSSRHRSSRIRSSRJRSSRKRSSRLRSSRMRSSRNRSSRORSSRPRSSRQRSSRRRSSRSRSSRTRSSRURSSRVRSSRWRSSRXRSSRYRSSRZRSSR[RSSR\RSSR]RSSR^RSSR_RSSRD@l`abcdefghijklmnopqrstuvwxyz{|}~`RSSRaRSSRbRSSRcRSSRdRSSReRSSRfRSSRgRSSRhRSSRiRSSRjRSSRkRSSRlRSSRmRSSRnRSSRoRSSRpRSSRqRSSRrRSSRsRSSRtRSSRuRSSRvRSSRwRSSRxRSSRyRSSRzRSSR{RSSR|RSSR}RSSR~RSSRRSSRD@lRSSRRSSRRSSRRSSRRSSRR      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcefghijklmnopqrstuvwxyz{|}~SSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRD@lRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRD@lRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRD@lRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRD@l     RSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSR RSSR RSSR RSSR RSSR RSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRD@l !"#$%&'()*+,-./0123456789:;<=>? RSSR!RSSR"RSSR#RSSR$RSSR%RSSR&RSSR'RSSR(RSSR)RSSR*RSSR+RSSR,RSSR-RSSR.RSSR/RSSR0RSSR1RSSR2RSSR3RSSR4RSSR5RSSR6RSSR7RSSR8RSSR9RSSR:RSSR;RSSR<RSSR=RSSR>RSSR?RSSRD@l@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_@RSSRARSSRBRSSRCRSSRDRSSRERSSRFRSSRGRSSRHRSSRIRSSRJRSSRKRSSRLRSSRMRSSRNRSSRORSSRPRSSRQRSSRRRSSRSRSSRTRSSRURSSRVRSSRWRSSRXRSSRYRSSRZRSSR[RSSR\RSSR]RSSR^RSSR_RSSRD@l`abcdefghijklmnopqrstuvwxyz{|}~`RSSRaRSSRbRSSRcRSSRdRSSReRSSRfRSSRgRSSRhRSSRiRSSRjRSSRkRSSRlRSSRmRSSRnRSSRoRSSRpRSSRqRSSRrRSSRsRSSRtRSSRuRSSRvRSSRwRSSRxRSSRyRSSRzRSSR{RSSR|RSSR}RSSR~RSSRRSSRD@lRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRD@lRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSRRSSR T T T TD(l T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl      T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl !"#$%&'()*+,-./0123456789:;<=>? T !T "T #T $T %T &T 'T (T )T *T +T ,T -T .T /T 0T 1T 2T 3T 4T 5T 6T 7T 8T 9T :T ;T <T =T >T ?TDl@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ @T AT BT CT DT ET FT GT HT IT JT KT LT MT NT OT PT QT RT ST TT UT VT WT XT YT ZT [T \T ]T ^T _TDl`abcdefghijklmnopqrstuvwxyz{|}~ `T aT bT cT dT eT fT gT hT iT jT kT lT mT nT oT pT qT rT sT tT uT vT wT xT yT zT {T |T }T ~T TDl T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl      T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl !"#$%&'()*+,-./0123456789:;<=>? T !T "T #T $T %T &T 'T (T )T *T +T ,T -T .T /T 0T 1T 2T 3T 4T 5T 6T 7T 8T 9T :T ;T <T =T >T ?TDl@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ @T AT BT CT DT ET FT GT HT IT JT KT LT MT NT OT PT QT RT ST TT UT VT WT XT YT ZT [T \T ]T ^T _TDl`abcdefghijklmnopqrstuvwxyz{|}~ `T aT bT cT dT eT fT gT hT iT jT kT lT mT nT oT pT qT rT sT tT uT vT wT xT yT zT {T |T }T ~T TDl T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl      T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl !"#$%&'()*+,-./0123456789:;<=>? T !T "T #T $T %T &T 'T (T )T *T +T ,T -T .T /T 0T 1T 2T 3T 4T 5T 6T 7T 8T 9T :T ;T <T =T >T ?TDl@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ @T AT BT CT DT ET FT GT HT IT JT KT LT MT NT OT PT QT RT ST TT UT VT WT XT YT ZT [T \T ]T ^T _TDl`abcdefghijklmnopqrstuvwxyz{|}~ `T aT bT cT dT eT fT gT hT iT jT kT lT mT nT oT pT qT rT sT tT uT vT wT xT yT zT {T |T }T ~T TDl T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl                                 T  T  T  T  T  T  T  T  T T T T T T  T  T  T  T  T  T  T  T  T  T  T  T  T  T  T  T  T  TDl ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?  T ! T " T # T $ T % T & T ' T ( T ) T * T + T , T - T . T / T 0 T 1 T 2 T 3 T 4 T 5 T 6 T 7 T 8 T 9 T : T ; T < T = T > T ? TDl@ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _  @ T A T B T C T D T E T F T G T H T I T J T K T L T M T N T O T P T Q T R T S T T T U T V T W T X T Y T Z T [ T \ T ] T ^ T _ TDl` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~   ` T a T b T c T d T e T f T g T h T i T j T k T l T m T n T o T p T q T r T s T t T u T v T w T x T y T z T { T | T } T ~ T  TDl                                 T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl                                 T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl                                 T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl                                 T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl                                 T  T  T  T  T  T  T  T  T T T T T T  T  T  T  T  T  T  T  T  T  T  T  T  T  T  T  T  T  TDl ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?  T ! T " T # T $ T % T & T ' T ( T ) T * T + T , T - T . T / T 0 T 1 T 2 T 3 T 4 T 5 T 6 T 7 T 8 T 9 T : T ; T < T = T > T ? TDl@ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _  @ T A T B T C T D T E T F T G T H T I T J T K T L T M T N T O T P T Q T R T S T T T U T V T W T X T Y T Z T [ T \ T ] T ^ T _ TDl` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~   ` T a T b T c T d T e T f T g T h T i T j T k T l T m T n T o T p T q T r T s T t T u T v T w T x T y T z T { T | T } T ~ T  TDl                                 T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl                                 T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl                                 T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl                                 T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl                                 T  T  T  T  T  T  T  T  T T T T T T  T  T  T  T  T  T  T  T  T  T  T  T  T  T  T  T  T  TDl ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?  T ! T " T # T $ T % T & T ' T ( T ) T * T + T , T - T . T / T 0 T 1 T 2 T 3 T 4 T 5 T 6 T 7 T 8 T 9 T : T ; T < T = T > T ? TDl@ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _  @ T A T B T C T D T E T F T G T H T I T J T K T L T M T N T O T P T Q T R T S T T T U T V T W T X T Y T Z T [ T \ T ] T ^ T _ TDl` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~   ` T a T b T c T d T e T f T g T h T i T j T k T l T m T n T o T p T q T r T s T t T u T v T w T x T y T z T { T | T } T ~ T  TDl                                 T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl                                 T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl                                 T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl                                 T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T TDl                                 T  T  T  T  T  T  T  T  T T T T T TUU  TUU  TUU  TUU  TUU  TUU  TUU  TUU  TUU  TUU  TUU  TUU  TUU  TUU  TUU  TUU  TUU  TUU  TUUDl ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?  TUU ! TUU " TUU # TUU $ TUU % TUU & TUU ' TUU ( TUU ) TUU * TUU + TUU , TUU - TUU . TUU / TUU 0 TUU 1 TUU 2 TUU 3 TUU 4 TUU 5 TUU 6 TUU 7 TUU 8 TUU 9 TUU : TUU ; TUU < TUU = TUU > TUU ? TUUDl@ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _  @ TUU A TUU B TUU C TUU D TUU E TUU F TUU G TUU H TUU I TUU J TUU K TUU L TUU M TUU N TUU O TUU P TUU Q TUU R TUU S TUU T TUU U TUU V TUU W TUU X TUU Y TUU Z TUU [ TUU \ TUU ] TUU ^ TUU _ TUUDl` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~   ` TUU a TUU b TUU c TUU d TUU e TUU f TUU g TUU h TUU i TUU j TUU k TUU l TUU m TUU n TUU o TUU p TUU q TUU r TUU s TUU t TUU u TUU v TUU w TUU x TUU y TUU z TUU { TUU | TUU } TUU ~ TUU  TUUDl                                 TUU TUU TUU TUU TUU TUU TUU TUU TUU T T T                    DXl                                                                D@l                                                                D@l                                                                D@l                                                                                          D@l ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?   !  "  #  $  %  &  '  (  )  *  +  ,  -  .  /  0  1  2  3  4  5  6  7  8  9  :  ;  <  =  >  ? D@l@ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _  @  A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z  [  \  ]  ^  _ D@l` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~   `  a  b  c  d  e  f  g  h  i  j  k  l  m  n  o  p  q  r  s  t  u  v  w  x  y  z  {  |  }  ~   D@l                                                                D@l                                                                D@l                                                                D@l                                                                D@l                                     D@l !"#$%&'()*+,-./0123456789:;<=>?  ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?D@l@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ @ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _D@l`abcdefghijklmnopqrstuvwxyz{|}~ ` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~ D@l                                D@l                                D@l                                D@l                                D@l                                     D@l !"#$%&'()*+,-./0123456789:;<=>?  ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?D@l@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ @ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _D@l`abcdefghijklmnopqrstuvwxyz{|}~ ` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~ D@l                                D@l                                D@l                                D@l                                D@l                                     D@l !"#$%&'()*+,-./0123456789:;<=>?  ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?D@l@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ @ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _D@l`abcdefghijklmnopqrstuvwxyz{|}~ ` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~ D@l                                D@l                                DBl                                D@l                                DBl                                     D@l !"#$%&'()*+,-./0123456789:;<=>?  ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?D@l@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ @ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _D@l`abcdefghijklmnopqrstuvwxyz{|}~ ` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~ D@l                                D@l                                D@l                                D@l                                D@l           !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdeghijklmnopqrstuvwxyz{|}~                                D@l !"#$%&'()*+,-./0123456789:;<=>?  ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?D@l@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ @ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _D@l`abcdefghijklmnopqrstuvwxyz{|}~ ` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~ D@l                                D@l                                D@l                                D@l                                D@l                                     D@l !"#$%&'()*+,-./0123456789:;<=>?  ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?D@l@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ @ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _D@l`abcdefghijklmnopqrstuvwxyz{|}~ ` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~ D@l                                D@l                                D@l                                D@l                                D@l                                     D@l !"#$%&'()*+,-./0123456789:;<=>?  ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?D@l@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ @ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _D@l`abcdefghijklmnopqrstuvwxyz{|}~ ` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~ D@l                                D@l                                D@l                                D@l                                D@l                                     D@l !"#$%&'()*+,-./0123456789:;<=>?  ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?D@l@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ @ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _D@l`abcdefghijklmnopqrstuvwxyz{|}~ ` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~ D@l                                D@l                                D@l                                D@l                                D@l                                     D@l !"#$%&'()*+,-./0123456789:;<=>?  ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?D@l@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ @ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _D@l`abcdefghijklmnopqrstuvwxyz{|}~ ` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~ D@l                                D@l                                D@l                                D@l                                D@l                                     D@l !"#$%&'()*+,-./0123456789:;<=>?  ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?D@l@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ @ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _D@l`abcdefghijklmnopqrstuvwxyz{|}~ ` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~ D@l                                D@l                                D@l                                D@l                                D@l                                     D@l !"#$%&'()*+,-./0123456789:;<=>?  ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?D@l@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ @ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _D@l`abcdefghijklmnopqrstuvwxyz{|}~ ` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~ D@l                                D@l                                D@l                                D@l                                D@l                                     D@l !"#$%&'()*+,-./0123456789:;<=>?  ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?D@l@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ @ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _D@l`abcdefghijklmnopqrstuvwxyz{|}~ ` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~ D@l                                D@l                                D@l                                D@l                                D@l                                     D@l !"#$%&'()*+,-./0123456789:;<=>?  ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?D@l@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ @ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _D@l`abcdefghijklmnopqrstuvwxyz{|}~ ` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~ D@l                                D@l                                D@l                                D@l                                D@l                                     D@l !"#$%&'()*+,-./0123456789:;<=>?  ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?D@l@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ @ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _D@l`abcdefghijklmnopqrstuvwxyz{|}~ ` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~ D@l                                D@l                                D@l                                D@l                                D@l                                     D@l !"#$%&'()*+,-./0123456789:;<=>?  ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?D@l@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ @ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _D@l`abcdefghijklmnopqrstuvwxyz{|}~ ` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~ D@l                                D@l                                D@l                                D@l                                D@l                                     D@l !"#$%&'()*+,-./0123456789:;<=>?  ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?D@l@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ @ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _D@l`abcdefghijklmnopqrstuvwxyz{|}~ ` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~ D@l                                D@l                                D@l                                D@l                                D@l                                     D@l !"#$%&'()*+,-./0123456789:;<=>?  ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?D@l@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ @ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _D@l`abcdefghijklmnopqrstuvwxyz{|}~ ` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~ D@l                                D@l                                D@l                                D@l                                D@l                                     D@l !"#$%&'()*+,-./0123456789:;<=>?  ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?D@l@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ @ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _D@l`abcdefghijklmnopqrstuvwxyz{|}~ ` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~ D@l                                D@l                                D@l                                D@l                                D@l                                                                                          D@l ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9       !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefgijklmnopqrstuvwxyz{|}~: ; < = > ?   !  "  #  $  %  &  '  (  )  *  +  ,  -  .  /  0  1  2  3  4  5  6  7  8  9  :  ;  <  =  >  ? D@l@ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _  @  A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z  [  \  ]  ^  _ D@l` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~   `  a  b  c  d  e  f  g  h  i  j  k  l  m  n  o  p  q  r  s  t  u  v  w  x  y  z  {  |  }  ~   D@l                                                                D@l                                                                D@l                                                                D@l                                                                D@l!!!!!!!!! ! ! ! ! !!!!!!!!!!!!!!!!!!! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! !D@l !!!"!#!$!%!&!'!(!)!*!+!,!-!.!/!0!1!2!3!4!5!6!7!8!9!:!;!!?! ! !! "! #! $! %! &! '! (! )! *! +! ,! -! .! /! 0! 1! 2! 3! 4! 5! 6! 7! 8! 9! :! ;! ! ?!D@l@!A!B!C!D!E!F!G!H!I!J!K!L!M!N!O!P!Q!R!S!T!U!V!W!X!Y!Z![!\!]!^!_! @! A! B! C! D! E! F! G! H! I! J! K! L! M! N! O! P! Q! R! S! T! U! V! W! X! Y! Z! [! \! ]! ^! _!D@l`!a!b!c!d!e!f!g!h!i!j!k!l!m!n!o!p!q!r!s!t!u!v!w!x!y!z!{!|!}!~!! `! a! b! c! d! e! f! g! h! i! j! k! l! m! n! o! p! q! r! s! t! u! v! w! x! y! z! {! |! }! ~! !D@l!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! !D@l!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! !D@l!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! !D@l!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! !D@l""""""""" " " " " """"""""""""""""""" " " " " " " " " " " " " " " " " " " " " " " " " " " " " " " " "D@l "!"""#"$"%"&"'"(")"*"+","-"."/"0"1"2"3"4"5"6"7"8"9":";"<"=">"?" " !" "" #" $" %" &" '" (" )" *" +" ," -" ." /" 0" 1" 2" 3" 4" 5" 6" 7" 8" 9" :" ;" <" =" >" ?"D@l@"A"B"C"D"E"F"G"H"I"J"K"L"M"N"O"P"Q"R"S"T"U"V"W"X"Y"Z"["\"]"^"_" @" A" B" C" D" E" F" G" H" I" J" K" L" M" N" O" P" Q" R" S" T" U" V" W" X" Y" Z" [" \" ]" ^" _"D@l`"a"b"c"d"e"f"g"h"i"j"k"l"m"n"o"p"q"r"s"t"u"v"w"x"y"z"{"|"}"~"" `" a" b" c" d" e" f" g" h" i" j" k" l" m" n" o" p" q" r" s" t" u" v" w" x" y" z" {" |" }" ~" "D@l"""""""""""""""""""""""""""""""" " " " " " " " " " " " " " " " " " " " " " " " " " " " " " " " "D@l"""""""""""""""""""""""""""""""" " " " " " " " " " " " " " " " " " " " " " " " " " " " " " " " "D@l"""""""""""""""""""""""""""""""" " " " " " " " " " " " " " " " " " " " " " " " " " " " " " " " "D@l"""""""""""""""""""""""""""""""" " " " " " " " " " " " " " " " " " " " " " " " " " " " " " " " "D@l######### # # # # ################### # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #D@l #!#"###$#%#&#'#(#)#*#+#,#-#.#/#0#1#2#3#4#5#6#7#8#9#:#;#<#=#>#?# # !# "# ## $# %# &# '# (# )# *# +# ,# -# .# /# 0# 1# 2# 3# 4# 5# 6# 7# 8# 9# :# ;# <# =# ># ?#D@l@#A#B#C#D#E#F#G#H#I#J#K#L#M#N#O#P#Q#R#S#T#U#V#W#X#Y#Z#[#\#]#^#_# @# A# B# C# D# E# F# G# H# I# J# K# L# M# N# O# P# Q# R# S# T# U# V# W# X# Y# Z# [# \# ]# ^# _#D@l`#a#b#c#d#e#f#g#h#i#j#k#l#m#n#o#p#q#r#s#t#u#v#w#x#y#z#{#|#}#~## `# a# b# c# d# e# f# g# h# i# j# k# l# m# n# o# p# q# r# s# t# u# v# w# x# y# z# {# |# }# ~# #D@l################################ # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #D@l################################ # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #D@l################################ # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #D@l################################ # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #D@l$$$$$$$$$ $ $ $ $ $$$$$$$$$$$$$$$$$$$ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $D@l $!$"$#$$$%$&$'$($)$*$+$,$-$.$/$0$1$2$3$4$5$6$7$8$9$:$;$<$=$>$?$ $ !$ "$ #$ $$ %$ &$ '$ ($ )$ *$ +$ ,$ -$ .$ /$ 0$ 1$ 2$ 3$ 4$ 5$ 6$ 7$ 8$ 9$ :$ ;$ <$ =$ >$ ?$D@l@$A$B$C$D$E$F$G$H$I$J$K$L$M$N$O$P$Q$R$S$T$U$V$W$X$Y$Z$[$\$]$^$_$ @$ A$ B$ C$ D$ E$ F$ G$ H$ I$ J$ K$ L$ M$ N$ O$ P$ Q$ R$ S$ T$ U$ V$ W$ X$ Y$ Z$ [$ \$ ]$ ^$ _$D@l`$a$b$c$d$e$f$g$h$i$j$k$l$m$n$o$p$q$r$s$t$u$v$w$x$y$z${$|$}$~$$ `$ a$ b$ c$ d$ e$ f$ g$ h$ i$ j$ k$ l$ m$ n$ o$ p$ q$ r$ s$ t$ u$ v$ w$ x$ y$ z$ {$ |$ }$ ~$ $D@l$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $D@l$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $D@l$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $D@l$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $ $D@l%%%%%%%%% % % % % %%%%%%%%%%%%%%%%%%% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % %D@l %!%"%#%$%%%&%'%(%)%*%+%,%-%.%/%0%1%2%3%4%5%6%7%8%9%:%;%<%=%>%?% % !% "% #% $% %% &% '% (% )% *% +% ,% -% .% /% 0% 1% 2% 3% 4% 5% 6% 7% 8% 9% :% ;% <% =% >% ?%D@l@%A%B%C%D%E%F%G%H%I%J%K%L%M%N%O%P%Q%R%S%T%U%V%W%X%Y%Z%[%\%]%^%_% @% A% B% C% D% E% F% G% H% I% J% K% L% M% N% O% P% Q% R% S% T% U% V% W% X% Y% Z% [% \% ]% ^% _%D@l`%a%b%c%d%e%f%g%h%i%j%k%l%m%n%o%p%q%r%s%t%u%v%w%x%y%z%{%|%}%~%% `% a% b% c% d% e% f% g% h% i% j% k% l% m% n% o% p% q% r% s% t% u% v% w% x% y% z% {% |% }% ~% %D@l%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % %D@l%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % %D@l%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % %D@l%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % %D@l&&&&&&&&& & & & & &&&&&&&&&&&&&&&&&&& & & & & & & & & & & & & & & & & & & & & & & & & & & & & & & & &D@l &!&"&#&$&%&&&'&(&)&*&+&,&-&.&/&0&1&2&3&4&5&6&7&8&9&:&;&<&=&>&?& & !& "& #& $& %& && '& (& )& *& +& ,& -& .& /& 0& 1& 2& 3& 4& 5& 6& 7& 8& 9& :& ;& <& =& >& ?&D@l@&A&B&C&D&E&F&G&H&I&J&K&L&M&N&O&P&Q&R&S&T&U&V&W&X&Y&Z&[&\&]&^&_& @& A& B& C& D& E& F& G& H& I& J& K& L& M& N& O& P& Q& R& S& T& U& V& W& X& Y& Z& [& \& ]& ^& _&D@l`&a&b&c&d&e&f&g&h&i&j&k&l&m&n&o&p&q&r&s&t&u&v&w&x&y&z&{&|&}&~&& `& a& b& c& d& e& f& g& h& i& j& k& l& m& n& o& p& q& r& s& t& u& v& w& x& y& z& {& |& }& ~& &D@l&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& & & & & & & & & & & & & & & & & & & & & & & & & & & & & & & & &D@l&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& & & & & & & & & & & & & & & & & & & & & & & & & & & & & & & & &D@l&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& & & & & & & & & & & & & & & & & & & & & & & & & & & & & & & & &D@l&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& & & & & & & & & & & & & & & & & & & & & & & & & & & & & & & & &D@l''''''''' ' ' ' ' ''''''''''''''''''' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' 'D@l '!'"'#'$'%'&'''(')'*'+','-'.'/'0'1'2'3'4'5'6'7'8'9':';'<'='>'?' ' !' "' #' $' %' &' '' (' )' *' +' ,' -' .' /' 0' 1' 2' 3' 4' 5' 6' 7' 8' 9' :' ;' <' =' >' ?'D@l@'A'B'C'D'E'F'G'H'I'J'K'L'M'N'O'P'Q'R'S'T'U'V'W'X'Y'Z'['\']'^'_' @' A' B' C' D' E' F' G' H' I' J' K' L' M' N' O' P' Q' R' S' T' U' V' W' X' Y' Z' [' \' ]' ^' _'D@l`'a'b'c'd'e'f'g'h'i'j'k'l'm'n'o'p'q'r's't'u'v'w'x'y'z'{'|'}'~'' `' a' b' c' d' e' f' g' h' i' j' k' l' m' n' o' p' q' r' s' t' u' v' w' x' y' z' {' |' }' ~' 'D@l'''''''''''''''''''''''''''''''' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' 'D@l'''''''''''''''''''''''''''''''' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' 'D@l'''''''''''''''''''''''''''''''' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' 'D@l'''''''''''''''''''''''''''''''' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' 'D@l((((((((( ( ( ( ( ((((((((((((((((((( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( (D@l (!("(#($(%(&('((()(*(+(,(-(.(/(0(1(2(3(4(5(6(7(8(9(:(;(<(=(>(?( ( !( "( #( $( %( &( '( (( )( *( +( ,( -( .( /( 0( 1( 2( 3( 4( 5( 6( 7( 8( 9( :( ;( <( =( >( ?(D@l@(A(B(C(D(E(F(G(H(I(J(K(L(M(N(O(P(Q(R(S(T(U(V(W(X(Y(Z([(\(](^(_( @( A( B( C( D( E( F( G( H( I( J( K( L( M( N( O( P( Q( R( S( T( U( V( W( X( Y( Z( [( \( ]( ^( _(D@l`(a(b(c(d(e(f(g(h(i(j(k(l(m(n(o(p(q(r(s(t(u(v(w(x(y(z({(|(}(~(( `( a( b( c( d( e( f( g( h( i( j( k( l( m( n( o( p( q( r( s( t( u( v( w( x( y( z( {( |( }( ~( (D@l(((((((((((((((((((((((((((((((( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( (D@l(((((((((((((((((((((((((((((((( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( (D@l(((((((((((((((((((((((((((((((( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( (D@l(((((((((((((((((((((((((((((((( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( ( (D@l))))))))) ) ) ) ) ))))))))))))))))))) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) )D@l )!)")#)$)%)&)')()))*)+),)-).)/)0)1)2)3)4)5)6)7)8)9):);)<)=)>)?) ) !) ") #) $) %) &) ') () )) *) +) ,) -) .) /) 0) 1) 2) 3) 4) 5) 6) 7) 8) 9) :) ;) <) =) >) ?)D@l@)A)B)C)D)E)F)G)H)I)J)K)L)M)N)O)P)Q)R)S)T)U)V)W)X)Y)Z)[)\)])^)_) @) A) B) C) D) E) F) G) H) I) J) K) L) M) N) O) P) Q) R) S) T) U) V) W) X) Y) Z) [) \) ]) ^) _)D@l`)a)b)c)d)e)f)g)h)i)j)k)l)m)n)o)p)q)r)s)t)u)v)w)x)y)z){)|)})~)) `) a) b) c) d) e) f) g) h) i) j) k) l) m) n) o) p) q) r) s) t) u) v) w) x) y) z) {) |) }) ~) )D@l)))))))))))))))))))))))))))))))) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) )D@l)))))))))))))))))))))))))))))))) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) )D@l)))))))))))))))))))))))))))))))) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) )D@l)))))))))))))))))))))))))))))))) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) )D@l********* * * * * ******************* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *D@l *!*"*#*$*%*&*'*(*)***+*,*-*.*/*0*1*2*3*4*5*6*7*8*9*:*;*<*=*>*?* * !* "* #* $* %* &* '* (* )* ** +* ,* -* .* /* 0* 1* 2* 3* 4* 5* 6* 7* 8* 9* :* ;* <* =* >* ?*D@l@*A*B*C*D*E*F*G*H*I*J*K*L*M*N*O*P*Q*R*S*T*U*V*W*X*Y*Z*[*\*]*^*_* @* A* B* C* D* E* F* G* H* I* J* K* L* M* N* O* P* Q* R* S* T* U* V* W* X* Y* Z* [* \* ]* ^* _*D@l`*a*b*c*d*e*f*g*h*i*j*k*l*m*n*o*p*q*r*s*t*u*v*w*x*y*z*{*|*}*~** `* a* b* c* d* e* f* g* h* i* j* k* l* m* n* o* p* q* r* s* t* u* v* w* x* y* z* {* |* }* ~* *D@l******************************** * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *D@l******************************** * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *D@l******************************** * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *D@l******************************** * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *D@l+++++++++ + + + + +++++++++++++++++++ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +D@l +!+"+#+$+%+&+'+(+)+*+++,+-+.+/+0+1+2+3+4+5+6+7+8+9+:+;+<+=+>+?+ + !+ "+ #+ $+ %+ &+ '+ (+ )+ *+ ++ ,+ -+ .+ /+ 0+ 1+ 2+ 3+ 4+ 5+ 6+ 7+ 8+ 9+ :+ ;+ <+ =+ >+ ?+D@l@+A+B+C+D+E+F+G+H+I+J+K+L+M+N+O+P+Q+R+S+T+U+V+W+X+Y+Z+[+\+]+^+_+ @+ A+ B+ C+ D+ E+ F+ G+ H+ I+ J+ K+ L+ M+ N+ O+ P+ Q+ R+ S+ T+ U+ V+ W+ X+ Y+ Z+ [+ \+ ]+ ^+ _+D@l`+a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+q+r+s+t+u+v+w+x+y+z+{+|+}+~++ `+ a+ b+ c+ d+ e+ f+ g+ h+ i+ j+ k+ l+ m+ n+ o+ p+ q+ r+ s+ t+ u+ v+ w+ x+ y+ z+ {+ |+ }+ ~+ +D@l++++++++++++++++++++++++++++++++ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +D@l++++++++++++++++++++++++++++++++ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +D@l++++++++++++++++++++++++++++++++ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +D@l++++++++++++++++++++++++++++++++ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +D@l,,,,,,,,, , , , , ,,,,,,,,,,,,,,,,,,, , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , ,D@l ,!,",#,$,%,&,',(,),*,+,,,-,.,/,0,1,2,3,4,5,6,7,8,9,:,;,<,=,>,?, , !, ", #, $, %, &, ', (, ), *, +, ,, -, ., /, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, :, ;, <, =, >, ?,D@l@,A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W,X,Y,Z,[,\,],^,_, @, A, B, C, D, E, F, G, H, I, J, K, L, M, N, O, P, Q, R, S, T, U, V, W, X, Y, Z, [, \, ], ^, _,D@l`,a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z,{,|,},~,, `, a, b, c, d, e, f, g, h, i, j, k, l, m, n, o, p, q, r, s, t, u, v, w, x, y, z, {, |, }, ~, ,D@l,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,, , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , ,D@l,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,, , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , ,D@l,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,, , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , ,D@l,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,, , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , ,D@l--------- - - - - ------------------- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -D@l -!-"-#-$-%-&-'-(-)-*-+-,---.-/-0-1-2-3-4-5-6-7-8-9-:-;-<-=->-?- - !- "- #- $- %- &- '- (- )- *- +- ,- -- .- /- 0- 1- 2- 3- 4- 5- 6- 7- 8- 9- :- ;- <- =- >- ?-D@l@-A-B-C-D-E-F-G-H-I-J-K-L-M-N-O-P-Q-R-S-T-U-V-W-X-Y-Z-[-\-]-^-_- @- A- B- C- D- E- F- G- H- I- J- K- L- M- N- O- P- Q- R- S- T- U- V- W- X- Y- Z- [- \- ]- ^- _-D@l`-a-b-c-d-e-f-g-h-i-j-k-l-m-n-o-p-q-r-s-t-u-v-w-x-y-z-{-|-}-~-- `- a- b- c- d- e- f- g- h- i- j- k- l- m- n- o- p- q- r- s- t- u- v- w- x- y- z- {- |- }- ~- -D@l-------------------------------- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -D@l-------------------------------- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -D@l-------------------------------- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -D@l-------------------------------- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -D@l......... . . . . ................... . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .D@l .!.".#.$.%.&.'.(.).*.+.,.-.../.0.1.2.3.4.5.6.7.8.9.:.;.<.=.>.?. . !. ". #. $. %. &. '. (. ). *. +. ,. -. .. /. 0. 1. 2. 3. 4. 5. 6. 7. 8. 9. :. ;. <. =. >. ?.D@l@.A.B.C.D.E.F.G.H.I.J.K.L.M.N.O.P.Q.R.S.T.U.V.W.X.Y.      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghiklmnopqrstuvwxyz{|}~Z.[.\.].^._. @. A. B. C. D. E. F. G. H. I. J. K. L. M. N. O. P. Q. R. S. T. U. V. W. X. Y. Z. [. \. ]. ^. _.D@l`.a.b.c.d.e.f.g.h.i.j.k.l.m.n.o.p.q.r.s.t.u.v.w.x.y.z.{.|.}.~.. `. a. b. c. d. e. f. g. h. i. j. k. l. m. n. o. p. q. r. s. t. u. v. w. x. y. z. {. |. }. ~. .D@l................................ . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .D@l................................ . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .D@l................................ . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .D@l................................ . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .D@l///////// / / / / /////////////////// / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /D@l /!/"/#/$/%/&/'/(/)/*/+/,/-/.///0/1/2/3/4/5/6/7/8/9/:/;//?/ / !/ "/ #/ $/ %/ &/ '/ (/ )/ */ +/ ,/ -/ ./ // 0/ 1/ 2/ 3/ 4/ 5/ 6/ 7/ 8/ 9/ :/ ;/ / ?/D@l@/A/B/C/D/E/F/G/H/I/J/K/L/M/N/O/P/Q/R/S/T/U/V/W/X/Y/Z/[/\/]/^/_/ @/ A/ B/ C/ D/ E/ F/ G/ H/ I/ J/ K/ L/ M/ N/ O/ P/ Q/ R/ S/ T/ U/ V/ W/ X/ Y/ Z/ [/ \/ ]/ ^/ _/D@l`/a/b/c/d/e/f/g/h/i/j/k/l/m/n/o/p/q/r/s/t/u/v/w/x/y/z/{/|/}/~// `/ a/ b/ c/ d/ e/ f/ g/ h/ i/ j/ k/ l/ m/ n/ o/ p/ q/ r/ s/ t/ u/ v/ w/ x/ y/ z/ {/ |/ }/ ~/ /D@l//////////////////////////////// / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /D@l//////////////////////////////// / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /D@l//////////////////////////////// / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /D@l//////////////////////////////// / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /D@l000000000 0 0 0 0 0000000000000000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0D@l 0!0"0#0$0%0&0'0(0)0*0+0,0-0.0/000102030405060708090:0;0<0=0>0?0 0 !0 "0 #0 $0 %0 &0 '0 (0 )0 *0 +0 ,0 -0 .0 /0 00 10 20 30 40 50 60 70 80 90 :0 ;0 <0 =0 >0 ?0D@l@0A0B0C0D0E0F0G0H0I0J0K0L0M0N0O0P0Q0R0S0T0U0V0W0X0Y0Z0[0\0]0^0_0 @0 A0 B0 C0 D0 E0 F0 G0 H0 I0 J0 K0 L0 M0 N0 O0 P0 Q0 R0 S0 T0 U0 V0 W0 X0 Y0 Z0 [0 \0 ]0 ^0 _0D@l`0a0b0c0d0e0f0g0h0i0j0k0l0m0n0o0p0q0r0s0t0u0v0w0x0y0z0{0|0}0~00 `0 a0 b0 c0 d0 e0 f0 g0 h0 i0 j0 k0 l0 m0 n0 o0 p0 q0 r0 s0 t0 u0 v0 w0 x0 y0 z0 {0 |0 }0 ~0 0D@l00000000000000000000000000000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0D@l00000000000000000000000000000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0D@l00000000000000000000000000000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0D@l00000000000000000000000000000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0D@l111111111 1 1 1 1 1111111111111111111 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1D@l 1!1"1#1$1%1&1'1(1)1*1+1,1-1.1/101112131415161718191:1;1<1=1>1?1 1 !1 "1 #1 $1 %1 &1 '1 (1 )1 *1 +1 ,1 -1 .1 /1 01 11 21 31 41 51 61 71 81 91 :1 ;1 <1 =1 >1 ?1D@l@1A1B1C1D1E1F1G1H1I1J1K1L1M1N1O1P1Q1R1S1T1U1V1W1X1Y1Z1[1\1]1^1_1 @1 A1 B1 C1 D1 E1 F1 G1 H1 I1 J1 K1 L1 M1 N1 O1 P1 Q1 R1 S1 T1 U1 V1 W1 X1 Y1 Z1 [1 \1 ]1 ^1 _1D@l`1a1b1c1d1e1f1g1h1i1j1k1l1m1n1o1p1q1r1s1t1u1v1w1x1y1z1{1|1}1~11 `1 a1 b1 c1 d1 e1 f1 g1 h1 i1 j1 k1 l1 m1 n1 o1 p1 q1 r1 s1 t1 u1 v1 w1 x1 y1 z1 {1 |1 }1 ~1 1D@l11111111111111111111111111111111 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1D@l11111111111111111111111111111111 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1D@l11111111111111111111111111111111 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1D@l11111111111111111111111111111111 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1D@l222222222 2 2 2 2 2222222222222222222 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2D@l 2!2"2#2$2%2&2'2(2)2*2+2,2-2.2/202122232425262728292:2;2<2=2>2?2 2 !2 "2 #2 $2 %2 &2 '2 (2 )2 *2 +2 ,2 -2 .2 /2 02 12 22 32 42 52 62 72 82 92 :2 ;2 <2 =2 >2 ?2D@l@2A2B2C2D2E2F2G2H2I2J2K2L2M2N2O2P2Q2R2S2T2U2V2W2X2Y2Z2[2\2]2^2_2 @2 A2 B2 C2 D2 E2 F2 G2 H2 I2 J2 K2 L2 M2 N2 O2 P2 Q2 R2 S2 T2 U2 V2 W2 X2 Y2 Z2 [2 \2 ]2 ^2 _2D@l`2a2b2c2d2e2f2g2h2i2j2k2l2m2n2o2p2q2r2s2t2u2v2w2x2y2z2{2|2}2~22 `2 a2 b2 c2 d2 e2 f2 g2 h2 i2 j2 k2 l2 m2 n2 o2 p2 q2 r2 s2 t2 u2 v2 w2 x2 y2 z2 {2 |2 }2 ~2 2D@l22222222222222222222222222222222 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2D@l22222222222222222222222222222222 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2D@l22222222222222222222222222222222 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2D@l22222222222222222222222222222222 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2D@l333333333 3 3 3 3 3333333333333333333 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3D@l 3!3"3#3$3%3&3'3(3)3*3+3,3-3.3/303132333435363738393:3;3<3=3>3?3 3 !3 "3 #3 $3 %3 &3 '3 (3 )3 *3 +3 ,3 -3 .3 /3 03 13 23 33 43 53 63 73 83 93 :3 ;3 <3 =3 >3 ?3D@l@3A3B3C3D3E3F3G3H3I3J3K3L3M3N3O3P3Q3R3S3T3U3V3W3X3Y3Z3[3\3]3^3_3 @3 A3 B3 C3 D3 E3 F3 G3 H3 I3 J3 K3 L3 M3 N3 O3 P3 Q3 R3 S3 T3 U3 V3 W3 X3 Y3 Z3 [3 \3 ]3 ^3 _3D@l`3a3b3c3d3e3f3g3h3i3j3k3l3m3n3o3p3q3r3s3t3u3v3w3x3y3z3{3|3}3~33 `3 a3 b3 c3 d3 e3 f3 g3 h3 i3 j3 k3 l3 m3 n3 o3 p3 q3 r3 s3 t3 u3 v3 w3 x3 y3 z3 {3 |3 }3 ~3 3D@l33333333333333333333333333333333 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3D@l33333333333333333333333333333333 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3D@l33333333333333333333333333333333 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3D@l33333333333333333333333333333333 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3D@l444444444 4 4 4 4 4444444444444444444 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4D@l 4!4"4#4$4%4&4'4(4)4*4+4,4-4.4/404142434445464748494:4;4<4=4>4?4 4 !4 "4 #4 $4 %4 &4 '4 (4 )4 *4 +4 ,4 -4 .4 /4 04 14 24 34 44 54 64 74 84 94 :4 ;4 <4 =4 >4 ?4D@l@4A4B4C4D4E4F4G4H4I4J4K4L4M4N4O4P4Q4R4S4T4U4V4W4X4Y4Z4[4\4]4^4_4 @4 A4 B4 C4 D4 E4 F4 G4 H4 I4 J4 K4 L4 M4 N4 O4 P4 Q4 R4 S4 T4 U4 V4 W4 X4 Y4 Z4 [4 \4 ]4 ^4 _4D@l`4a4b4c4d4e4f4g4h4i4j4k4l4m4n4o4p4q4r4s4t4u4v4w4x4y4z4{4|4}4~44 `4 a4 b4 c4 d4 e4 f4 g4 h4 i4 j4 k4 l4 m4 n4 o4 p4 q4 r4 s4 t4 u4 v4 w4 x4 y4 z4 {4 |4 }4 ~4 4D@l44444444444444444444444444444444 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4D@l44444444444444444444444444444444 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4D@l44444444444444444444444444444444 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4D@l44444444444444444444444444444444 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4D@l555555555 5 5 5 5 5555555555555555555 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5D@l 5!5"5#5$5%5&5'5(5)5*5+5,5-5.5/505152535455565758595:5;5<5=5>5?5 5 !5 "5 #5 $5 %5 &5 '5 (5 )5 *5 +5 ,5 -5 .5 /5 05 15 25 35 45 55 65 75 85 95 :5 ;5 <5 =5 >5 ?5D@l@5A5B5C5D5E5F5G5H5I5J5K5L5M5N5O5P5Q5R5S5T5U5V5W5X5Y5Z5[5\5]5^5_5 @5 A5 B5 C5 D5 E5 F5 G5 H5 I5 J5 K5 L5 M5 N5 O5 P5 Q5 R5 S5 T5 U5 V5 W5 X5 Y5 Z5 [5 \5 ]5 ^5 _5DA&@l`5a5b5c5d5e5f5g5h5i5j5k5l5m5n5o5p5q5r5s5t5u5v5w5x5y5z5{5|5}5~55 `5 a5 b5 c5 d5 e5 f5 g5 h5 i5 j5 k5 l5 m5 n5 o5 p5 q5 r5 s5 t5 u5 v5 w5 x5 y5 z5 {5 |5 }5 ~5 5D@l55555555555555555555555555555555 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5D@l55555555555555555555555555555555 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5D@l55555555555555555555555555555555 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5D@l55555555555555555555555555555555 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5D@l666666666 6 6 6 6 6666666666666666666 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6D@l 6!6"6#6$6%6&6'6(6)6*6+6,6-6.6/606162636465666768696:6;6<6=6>6?6 6 !6 "6 #6 $6 %6 &6 '6 (6 )6 *6 +6 ,6 -6 .6 /6 06 16 26 36 46 56 66 76 86 96 :6 ;6 <6 =6 >6 ?6D@l@6A6B6C6D6E6F6G6H6I6J6K6L6M6N6O6P6Q6R6S6T6U6V6W6X6Y6Z6[6\6]6^6_6 @6 A6 B6 C6 D6 E6 F6 G6 H6 I6 J6 K6 L6 M6 N6 O6 P6 Q6 R6 S6 T6 U6 V6 W6 X6 Y6 Z6 [6 \6 ]6 ^6 _6D@l`6a6b6c6d6e6f6g6h6i6j6k6l6m6n6o6p6q6r6s6t6u6v6w6x6y6z6{6|6}6~66 `6 a6 b6 c6 d6 e6 f6 g6 h6 i6 j6 k6 l6 m6 n6 o6 p6 q6 r6 s6 t6 u6 v6 w6 x6 y6 z6 {6 |6 }6 ~6 6D@l66666666666666666666666666666666 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6D@l66666666666666666666666666666666 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6D@l66666666666666666666666666666666 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6D@l66666666666666666666666666666666 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6D@l777777777 7 7 7 7 7777777777777777777 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7D@l 7!7"7#7$7%7&7'7(7)7*7+7,7-7.7/707172737475767778797:7;7<7=7>7?7 7 !7 "7 #7 $7 %7 &7 '7 (7 )7 *7 +7 ,7 -7 .7 /7 07 17 27 37 47 57 67 77 87 97 :7 ;7 <7 =7 >7 ?7D@l@7A7B7 @7 A7 B7 f( a (   a zA?? officehelp4Picture 17officehelp4yK yK http://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=DemositeTCyX;H,]ą'cW 1]&a`xx  6ج_CC@tu&]*@  #  $<Run< xx  6Ȥ_CC@/Y],@< 9 $<Import from Outlook< xx  6_CC@Nb],@ 9 $<Reset Events<p xx * 6_CC@} ) ],*@ 9 $<Insert Holidays<\ >@.   !!  BB((""##$$%%&&''11--..//00))**++,,8899::;;223344556677EEFFGGHHCCDD<<==MMNN>>??@@AAIIJJUUVV[[\\WWXXYYZZeeff]]^^__``ccddaabbmmnnSSTTKKLLQQRROOPPgghhiijjkkllooppqqrruuvvsstt{{||}}~~wwxxyyzz          %%&&  !!"";;<<99::--..3344//00++,,556677881122EEFF##$$))**''((==>>??@@AABBCCDDGGHHIIJJMMNNKKLLSSTTUUVVOOPPQQRR]]^^YYZZWWXXmmnnccdd[[\\aabbgghhiijj__``eeffuuvv{{||wwxxsstt}}~~yyzzkkllqqrroopp            !!""%%&&##$$++,,--..''(())**55661122//00EEFF;;<<334499::??@@AABB7788==>>[[\\YYZZMMNNSSTTOOPPKKLLUUVVWWXXQQRReeffCCDDIIJJGGHH]]^^__``aabbccddgghhiijjmmnnkkllssttuuvvooppqqrr}}~~yyzzwwxx{{||          33441122%%&&++,,''((##$$--..//00))**==>>!!""  5566778899::;;<<??@@AABBEEFFCCDDKKLLMMNNGGHHIIJJUUVVQQRROOPPeeff[[\\SSTTYYZZ__``aabbWWXX]]^^{{||yyzzmmnnssttooppkklluuvvwwxxqqrrccddiijjgghh}}~~           ##$$%%&&  !!""--..))**''((==>>3344++,,1122778899:://005566SSTTQQRREEFFKKLLGGHHCCDDMMNNOOPPIIJJ]]^^;;<<AABB??@@UUVVWWXXYYZZ[[\\__``aabbeeffccddkkllmmnngghhiijjuuvvqqrroopp{{||ssttyyzzwwxx}}~~          ++,,))**##$$  %%&&''((!!""5566--..//0011223344778899::==>>;;<<CCDDEEFF??@@AABBMMNNIIJJGGHH]]^^SSTTKKLLQQRRWWXXYYZZOOPPUUVVssttqqrreeffkkllgghhccddmmnnooppiijj}}~~[[\\aabb__``uuvvwwxxyyzz{{||7yK www.officehelp.bizyK 6http://www.officehelp.biz/$yK www.officehelp.bizyK http://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=DemositeTCyX;H,]ą'cf yK HELP using this macro.Help!A1yK Doesn't work? Click Here'Macro Configurations'!A1yK 2Click here to configure the the ADVANCED settings Config!A1yK YClick here to PERSONALIZE your Calendar Plan (Fonts, Colors, Month and Weekday names, & ) Config!A1yK yK http://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=DemositeTCyK yK http://www.officehelp.biz/officehelp/NewContent.asp?ent=DemositeTC:yK *Get the Full (Unrestricted) Version Here!yK http://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=demosite37:yK *Get the Full (Unrestricted) Version Here!yK http://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=DemositeTCRyK *Get the Full (Unrestricted) Version Here!yK http://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=DemositeTCyX;H,]ą'cR yK *Get the Full (Unrestricted) Version Here!yK http://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=DemositeTCyX;H,]ą'cRyK *Get the Full (Unrestricted) Version Here!yK http://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=DemositeTCyX;H,]ą'czyK Demo Restrictions'Demo Restrictions'!A1z yK Demo Restrictions'Demo Restrictions'!A1  .Enter any date between 1/1/1905 and 12/31/3000CInvalid date. Please enter any date between 1/1/1905 and 12/31/3000K$ hTA JSelect Outlook folder to use as source for event import: Calendar or TasksPlease select option from list.1/TasksCalendarlL Invalid Date,Import Outlook Tasks / Events from this date)Please insert a valid date on this field.m L Invalid Date-Import Outlook Tasks / Events until this date)Please insert a valid date on this field. ; e-USA USA + VHNone    Invalid Year.!Enter year between 1905 and 3000.(Please enter year between 1905 and 3000.hiqld ? r.Days Categories NonerV 0r.-No Background Picture Use Background Picturesx 6Please select the first month for the Output Calendar.s1234567891011128r LseITraditional Planning Table Monthly Monthly (List) Monthly 4-5-4 All  Sheet1ggD YA  fRP [ d o Oq  dMbP?_*+%&?'?(?)?M6Microsoft XPS Document WriterX 4dXXA4DINU"L r SMTJMicrosoft XPS Document WriterInputBinFORMSOURCERESDLLUniresDLLInterleavingOFFImageTypeJPEGMedOrientationPORTRAITCollateOFFResolutionOption1PaperSizeLETTERColorMode24bpp MXDW" 4X??&U} . C} C} C} . C}  C} . C} . C}  C} . C} -C} . Cf                        6     Z*'Traditional Calendars for Excel Vs 4.00 YZZZZZZZZZZ[ h \E]EEEEEEEE^ h_]EEEEEEEE^ \_]EEEEEEEE^ g  \_]EEEEEEEE^  \    E    E   E  ^ \  E  E p E  ^ `  E  E  EE^  \  E  E  EE^ \  E  E  EE^ \  E  E  EE^ \  E  E  EE^ a  E  E  EE^ a EEEEEEEE^ a  EEEEEEE^ \  EEEEEEE^ \  EEEEEEE^ a  E EEEEEEE^ aEEEEEEEEEE^  \EEEEEEEEEE^ i w k v k  k  kkl iEEkkkkk  k  kkl i V j kk V k   kkl iEEkkkkkkkkl i V jm kk V *k  X    kl iEEkkkkk  kkl D ly"."."."hhbbbbbb6>>>L"."b8x"  ! " #  $  %  &  '  (  )  *  +  ,  -  .  /  0  1 @2 3  4  5  6  7  8  9  :  ; < =  >  ?   i V  kk V jx k jkl !\jjEEEEEEEE^ "W" #\jjEEEEEEEE^ $\ $X $Y$EEEEEEEE^ %\mmEEEEEEEE^ &\ &X &Z&EEEEEEEE^ '\mmEEEEEEEE^ (\ ([ (\(EEEEEEEE^ )\EEEEEEEE^ *\ *i*EEEEEEEE^ +\EEEEEEEE^ ,\ ,]n,EEEE^ -\jjEEEEEEEE^ .\ . ..EEEEEEEE^ /\jjEEEEEEEE^ 0\ 00EEEEEEEE^ 1\ 11EEEEEEEE^ 2]2 3\jjEEEEEEEE^ 4\ 4[ 4^4EEEEEEEE^ 5\EEEEEEEE^ 6\ 6p 66EEEEEEEE^ 7\jjEEEEEEEE^ 8\ 8 8o8EEEEEEEE^ 9\jjEEEEEEEE^ :\ :X :y :EEE :[ :: EEE^ ;\jjEEEE]EEE^ <z< =\jjEEEEEEEE^ >\ >}>EEEEEEEE^ ?\EEEEEEEE^ Dlx"."B"B"B"8"8"B"88."B"B"B"d"."8@  A B C D E F hG H 6I J 6K  L  M N O P Q R hS T 6U V W  X  Y Z [  \  ]  ^ _  @\ @|@ @]{@EEEE^ A\EEEEEEEE^ BB C\EEEEEEEEEE^ Di D Dk DV DjDk D k D kkl EiEEkkkkk E k E kkl Fi F Fj Fkk FV FjFkkkkl GiEEkkkkk G k G kkl Hi HV Hjm Hkk HV HjHk H H kkl IiEEkkkkk I kkl Ji Jj Jkk JV JJk J jkl K\jjEEEEEEEE^ L\ LX Lj LEE~ L LLEEEE^ M\jjEEEEEEEE^ NN O\EEEEEEEEEE^ Pi P Pk Pv Pk P P kkl QiEEkkkkk Q Q kkl Ri~ RY@ Rj Rkk RV RjRkkkl SiEEkkkkk S S kkl Ti TV Tj Tkk TV TjTkkkl UiEEkkkkk U U kkl Vi Vj Vkk VV VjVk V jkl W\jjEEEEEEEE^ X\ XX Xj XEE~ XX@ XjXEEEE^ Y\jjEEEEEEEE^ ZtZ [\jjEEEEEEEE^ \a_\j \\E^ ]ajEEEEEEEE^ ^`^ ^a^ _ _b_ D lL"."l8d8x*`"d"."b8d8d8`"d"."B"B` a b  c d 6e  `ajEEEEEEEE^ asa b cYnnZZZZZZZZ[ d 3d            ebccccccccccd \d"."".  cPH / 0(   >@. 3<< @@       dd  22 \\ aa BB ^^ ,,""    __ NN PPPPZZ DD        7aa yK yCustomize these messages to create YOUR OWN personalized Traditional Calendars for Excel. Ask for the Customized EditionyK http://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&pt=supportyX;H,]ą'cdd yK )Back to the Main Display user interface. Input!A1  Out-of-limits%If YES, weekend days will be colored.Please select option from list. tYesNoNXX::LL  Out-of-limits(Select the border size from the options.Please select option from list.ThinMediumThickmFF2 For RESOURCE field only Out-of-limitsIf YES, will import the name of the Task/Appointment owner in Outlook This information is protected by Outlook and will require the user to grant access permission on Outlook each time it is used.Please select option from list. yYesNoN((  Out-of-limitsNTasks only. If YES, will import Tasks without a valid Start and / or Due date.Please select option from list. otYesNoN&&  Out-of-limits0Tasks only. If YES, will import completed tasks.Please select option from list. asYesNoN$$  Out-of-limits1If YES, Excel default gridlines will be included.Please select option from list. sYesNoN44  Out-of-limits!Select weekday where week starts.Please select option from list.io SundayMondayo66y  Out-of-limitsSelect Date Format from ListPlease select option from list.st mm/dddd/mmd882 ts leTA  Out-of-limitsNone means no times will be added to event label. Start Only will only add the start hour of the event. Start and End will add both start and end times.Please select option from list.( O%None Start Only Start and End Hoursa.. Out-of-limitsmSub-Foler name (secondary Calendar or Tasks List) name - If empty, the main Calendar / Task List is imported.Please select option from list. tes00 @Insert number between 0 and 1000. 0 means that no limit is used.'Please insert number between 0 and 1000 iorLLXXp  Insert number between 1 and 100.&Please insert number between 1 and 100nsumdRR  Out-of-limits@If YES, Week numbers will be included on the TRADITIONAL format.Please select option from list. YesNoN   Out-of-limitsjIf YES, the printer Header & Footer defined for the INPUT sheet will be copied to the new output calendar.Please select option from list. .YesNoN:: Sheet6ggD YA (j c C  dMbP?_*+%&~?'~?(~?)~?M6Microsoft XPS Document WriterX 4dXXA4DINU"L r SMTJMicrosoft XPS Document WriterInputBinFORMSOURCERESDLLUniresDLLInterleavingOFFImageTypeJPEGMedOrientationPORTRAITCollateOFFResolutionOption1PaperSizeLETTERColorMode24bpp MXDW" @X `? `?&`U} }  . } .%} .                              @            Z*'Traditional Calendars for Excel Vs 4.00  .         ;    /  : 0 1             !             Dlo"."...."."....."."."."."..".  ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?    ! "" # $$ % && ' (( ) ** + ,, -- . // 0 11 22 33 4 55 6 77 8 99 : ;; << = >> ? Dl.".".".".".".."."..."."."."..".@ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _  @@ AA B CBCC D EJE F G GCG H HDH I IEI J K<K L M=M NKN OLO P>P Q RR S TT U V V?V W WMW X XNX Y YOY Z ZPZ [ \F\\ ] ^Q^ _ D l.."6"."666"."...."."."66666"6".` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~  ` `G` a aHa b bIb c cRc d ee f"Sf##########$ g%##########$ h i@i j k2k l mAm n o4o p qq r ss t uu v ww xx y zz { || } ~ ~~   Dl6666".."".".".".".".".".."."."6                                                                                   Dl68866666666".".".".."666"."6666                            3  666666""".  PH00(  >@. *    fg 7 yK )Back to the Main Display user interface. Input!A1| yK ;Check this FREE Online PC TIP on our website: (Click Here)yK http://www.officehelp.biz/officehelp/viewcontents.asp?cl=PC%20Tip&id=00004&ent=MacroHelp37yX;H,]ą'c2   TA)L   Sheet4ggD YA $  dMbP?_*+%&~?'~?(~?)~?M6Microsoft XPS Document WriterX 4dXXA4DINU"L r SMTJMicrosoft XPS Document WriterInputBinFORMSOURCERESDLLUniresDLLInterleavingOFFImageTypeJPEGMedOrientationPORTRAITCollateOFFResolutionOption1PaperSizeLETTERColorMode24bpp MXDW" @X `? `?&`U} . C} .C} . C$                          @ @ @ @    u@    @  @ @  Z*'Traditional Calendars for Excel Vs 4.00 YZZZZZZZZZZ[ 5 \E]EEEEEEEE^ \6_]EEEEEEEE^ \7_]EEEEEEEE^ \_]EEEEEEEE^ ` EEEEEEEEEE^  \EEEEEEEEEE^ \/ EEEEEEEEEE^ \: EEEEEEEEEE^ \0 EEEEEEEEEE^ aEEEEEEEEEE^ \EEEEEEEEEE^           !  a   \EEEEEEEEEE^ `8EEEEEEEEEE^ \EEEEEEEEEE^ &''''''''''( \EEEEEEEEEE^ `9EEEEEEEEEE^ \EEEEEEEEEE^           ! effffffffffg a   effffffffffg Dlo".".."."....".".6".".".".".6  ! " #    !3! "\]EEEEEEEEE^ #bccccccccccd <"."  cPH@0(  >@. 2   !!   7!! yK )Back to the Main Display user interface. Input!A1| yK ;Check this FREE Online PC TIP on our website: (Click Here)yK http://www.officehelp.biz/officehelp/viewcontents.asp?cl=PC%20Tip&id=00004&ent=MacroHelp37yX;H,]ą'c| yK ;Check this FREE Online PC TIP on our website: (Click Here)yK http://www.officehelp.biz/officehelp/viewcontents.asp?cl=PC%20Tip&id=00004&ent=MacroHelp37yX;H,]ą'c2   TA)L  Sheet5ggD YA <  dMbP?_*+%&?'?(?)?M6Microsoft XPS Document WriterX 4dXXA4DINU"L r SMTJMicrosoft XPS Document WriterInputBinFORMSOURCERESDLLUniresDLLInterleavingOFFImageTypeJPEGMedOrientationPORTRAITCollateOFFResolutionOption1PaperSizeLETTERColorMode24bpp MXDW" PX??&U} .                                6       Z*'Traditional Calendars for Excel Vs 4.00                                   ))))))   3 \]EEEEEEEEE^ bccccccccccd :o"."."."888688"."."6""."  cPHP0(  >@. "   7RyK *Get the Full (Unrestricted) Version Here!yK http://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=DemositeTCyX;H,]ą'c yK )Back to the Main Display user interface. Input!A1)L 2   TA Sheet7ggD Module1 __SRP_2iA__SRP_3ThisWorkbook-1  !"#$%&()*+,.0123456789:;<=>?@ACDEFHJKLMNOPQRSTUWXYZ[\]_`abcdefghijklmnoqrstvxyz{|}~R1*#13b*\R1*#126*\R0*#f*\R0*#1*\R0*#17*\R1*#2d*\R1*#3e4*\R1*#132*\R1*#121*\R1*#54*\R1*#13b$*\Rffff*0[58e648a2$*\Rffff*0W58e648a2$*\Rffff*0`58e648a2$*\Rffff*0_58e648a2$*\Rffff*0X58e648a2$*\Rffff*0c58e648a2*\R0*#14*\R0*#15*\R0*#16*\R1*#289*\R1*#285*\R1*#84*\R1*#57*\R1*#11*\R1*#51*\R0*#2*\R1*#a4*\R1*#32*\R1*#12e*\R1*#2e8*\R1*#12eH 0 0 P p J94LPR& 488p6R&8f`(L(@ h(*@*@&pL8          ( H &`         0 8 H ` p       "0 8 P  h  x    "O * 6 0 P &<`        $O "O !0 !H "O` $O       !"#$%'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdfghyjklmnopqrstuvwxez{|}~|MPOBydxME0b0x06> :LLLLP LLP<<<<<<<<<<<<<<<<<<<<<<<<<<<Hʐ(`Hʐ,P Hʐ. Hʐ2!Hʐ6x H ʐ8#H ʐ< H ʐ@@HʐB(#HʐFPHʐJ $HʐLx@$HʐP$HʐT0`HʐV$HʘZKʘ^Ba@Outlook Appointments% Outlook Tasks %%j"@n4$@ ' on line 003/pdfn tT' @z0\H) @&x&_%@pl %@\ %@X %@H %@%8 %ꀈ x0@ꀌ 2@ꀎH3@ꀒp5@ꀖ7@ꀘ8@ꀜ :@ꀠ<@ꀢ=@ꀦ?!@ꀪA#@ꀬ8B$@ꀰ`D&@ꀴF(@ꀶG)@ꀺI+@ꀾxK-@L.@N0@X%@(  @ %x$R4@ %,T6@WARNING - Outlook Security%@  %X"h%@@Y;@H Hp [=@hL\>@%T ^@@0%@% %@ %b bD@WARNING - Event List Reset  `0kH`x`t`p+ `+@k i `t`p`'l?`h   `0,o44@h ?@*X ? >p ` .8k0 -i@ P iB J `P/8k 3i@  iB P `0 k0  9iR `Tx`Vt ` `@2hk Fib  hp`(34k  JijE`h`d p``4k''Xir @iit p `6kP --i   `08k i  P `9k  i 0utLoiPookiptFiri(i (i MSGi$Outi(er2i,0Outli0olF+ `;Pk i e=`tcip`p G h `<k `xipie`tault`p `?k**IB luei  D+.`BPo )`ttO`(CpEndD`lTas`hartD`` ` Xner%`*(TName`"pR rcen $`EX+(  Fi&HǪi(USAH`h +*`Fp+Qi, i.DOW`0pkd; 2`hGkXn)5 x%)9%i:(`<xHLY1`>tST_M`@p_DEMWARNING 2 - Event List Reset ʐ$Hʐ*(Hʐ0xHʐ4H Hʐ:0#H ʐ>x#H ʐDh HʐHHʐN`$HʐR$HʐXXX%Hʘ\Ke@@fh @h !@l8#@pL%@rP&@vX(( @|X`h* @~d+ @h,@l-@ꀄp.@ꀆt/@ꀊ|1@ꀐH4@ꀔp6@ꀚ9@ꀞ ;@ꀤ8> @ꀨ`@"@ꀮC%@ꀲ E'@ꀸ( H*@ꀼPJ,@M/@((O1@PP2@0 `Q3@h(S5@0U7@4V8@8W9@< X:@ D Z<@x P ]?@X _A@\`B@ ` aC@ʐ"8Hx ' 0Px&'> WWW.OFFICEHELP.BIZ - Traditional Calendars for Excel Vs 4.00oCalendar Generation Finished. This macro is a member of www.OfficeHelp.Biz full family of Calendar Products.(Macro execution stopped by user request.@WARNING - Invalid Year. Please enter year between 1905 and 3000. EDEMO Version will only work for 2004 and 2005. Using 2005 instead of (OUTLOOK Task / Appointment Import Wizard +OUTLOOK Task / Appointment import finished.Event List has been erased.This is a LIMITED DEMO Edition. it will only work for 2004 and 2005. All other years will be replaced by 2005. To get the FULL UNLIMITED version, use the "GET THE FULL (UNRESTRICTED) VERSION HERE" links on the main INPUT sheet of this DEMO. membeThe Resource optional field is active. Importing the resource field from Outlook calendar appointments will fire a Warning message from Outlook stating that another application is trying to access Outlook addresses. It will only work IF you do ALLOW it to proceed.a LIMI*Import tasks starting on Excel row number? andEERROR: The indicated folder '[folder]' could not be found in Outlook.TZThe existing Event List will be COMPLETELY ERASED if you proceed. Do you want to clean it? of ?Are you sure you want to COMPLETELY ERASE the whole Event List?g the rAuto Holidays Insert WizardlenAuto Holidays Insert finished.3Insert Holiday Events starting on Excel row number?atiWARNING - Invalid Event DatesaThe START DATE for event 'IF yx is greater than its END DATE. The event will not be listed on the output Calendar. Press OK to proceed, CANCEL to stop.ed.?Removed invalid characters '/\:?[]*' in Plan Name. Changed to 'cated f@ ld nZ.,p.@`& Lis%rtvz|~RA%  y&&st0&ln y@ Y ER@& List@& has&&_ed.Z&&bidays @& '&esert f@@' iday'&eartingX'&irow nuH&jva@h' '@'vor eve@ r th'h'v DATE.h'z will ('ut@ OK t' CANCEL toto`xvali('rs '/\+Plan N@+d  pp8h(p@xPPP0Xx@(x 8h h  P`p HxH ``H( h0 X0@8 hP 8 8x p( h P 8 ,+ ('+(+ (@` ,+@P @@ + ,0----&,d.h@x @H-H ,*"02@`-8 @x-( @- @- @- @. @ -468:$<(@ @ 0 P . /..DF@x @/h @X @8/H @8 0P0 0/LF@x @80h @X @h0H @8 P 0 h h181(21P1 1@1p @l @h @1X @1H @18 @( @1$ @2 @ @ 232d@x @h X3 @404343@hl 33ln@H4T @D @4 505H5`555555@x v@t @x5d @5T @D @4 55@0`5@ @ P666@7h76X7v@x @7h @(7X @H @8 @7( 7@7@7$`7h7@7 77 @8`77 @ 87&@`8&8`999989F@x @9h @09X @H9H @8 @x9( @ @ 99@`9P0p0;:;:@;h;:X;F@x @:h @:X @:H @8 @(;( @ @ ;@;@`h;@; @ `<<<`<<x<`x<`<@` @P P8= >===>?,d><@>l @\ =B@D@>L @(>< @@>, @X> @p> @> @ @ @> @ @ @ =?H@?`@@Ax@F  @x @@h @@X @0@H @8 @A( ?@@ @`@?@@`@@@A @@ ?@@A`A0A@ B? @hA XAA@A`A@A@A ?AhA@B`?BA@A @ @8B (BA@@`B`BPBB@ xB8B@``BX@xCCCC(CD@C`.z BPC(CyDdRTV@hDL @CH @C8 ?@4 @D$ @ D @8D @E ?@PD E@D E@D @D @D @D @ ?`CP?@(E @@E @XE @pE ?@Ep C@` E@P h@F(HxF@FXF@$l hF@F??@X jC0G0GHG`*t?XG0GX H8HhHHj@PHl @H\ @HX ?@HH @D @H4 \>@$ @ B7c8  h8(HX*\R1*#3e5*\R1*#284*\R1*#3e3$*\Rffff*0T58e648a2*\R0*#e*\ 3  $&G( PX` h (W(W(W&R(W((WP&Rx&R&R&R&R @&RX&R(W&R,Z9( H<P px (W&R $O2Z&RP x2Z$O&R(W&R@&Rh&R$O  "L" ( PX6F` .h  (.h8.hh    2a$( ,] 2ZP$O.h.h0 ` h*Z*Z2Z2Z 2ZX ,](W (W($OP2Zx2Z2]$L 0DH$Lx0D,],Z 0(/82/` "  ,]  B  Jh  $)  $0  H P "X `  % "       3 $( PX(` " $ * 8@*H x3   $;  "   2(  '8 H " P X 2p  '  "    $   A 2!d!28!7H!`! " h! "p!! B !! !!!*"!$""  " (" " 0" 8";P" %p""""""";";"6"6";#;(#@#H#P# X# `##h# ## ### ####### $ $ " $ $'0$  H$3`$ %x$$$ $ %$$ $$$$$ 4$ 6 % 0X% 4% 6% 6% 0& P& (p& & "& & '  ' $8' `' ' ' ,' '.'(( (  ( " ((  0( (H(9p( *((( (9( (9( (9) )9() @) P) " X)  `)9x) *))) )9) ")9)=)9*=(*9@* "X* h* B p*x* ** *%** * * "* *+  + 8+ H+ X+  `+"6++ ,+"6+,  .0,6v`, , , ,,,<z,0- 38- P- " X- <`-<x-6---- -6---- -6.. .(. 0.68.P.X.`. h.p.8x. 6....  . 6....  .// >/ @P// B//// /6v/(0 @06tP0 0 0i0 0i0 0\1 h1x1811 11111 11 B 1 j1`2  h2("x2  2 2 B 2 <22 TJ3 X30/`3 33 33 33 44 44  4 (4 0484  @4H4P4  X4 `4 " h4 dp44 $45  (5  H5 h5 5"X5"X5"X5"X6"X@6"Xh6 6 D6 P6 TH7 R7 P7 TH8 R8 8 X9) (C) OfficeHelp 2006 - www.officehelp.biz COMMON CODE MODULE382 PLAN MSG - REMOVE UNUSED String Constants]$Calendar Generation Finished. & &NThis macro is a member of www.OfficeHelp.Biz full family of Calendar Products.8]$(Macro execution stopped by user request.]$@WARNING - Invalid Year. Please enter year between 1905 and 3000.`]$EDEMO Version will only work for 2004 and 2005. Using 2005 instead of (]$This is a LIMITED DEMO Edition. it will only work for 2004 and 2005. All other years will be replaced by 2005. To get the FULL UNLIMITED version, use the "GET THE FULL (UNRESTRICTED) VERSION HERE" links on the main INPUT sheet of this DEMO.P]$WARNING - Outlook Security?]$The Resource optional field is active. Importing the resource field from Outlook calendar appointments will fire a Warning message from Outlook stating that another application is trying to access Outlook addresses. It will only work IF you do ALLOW it to proceed.x]$(OUTLOOK Task / Appointment Import Wizard]$+OUTLOOK Task / Appointment import finished.]$*Import tasks starting on Excel row number?]$EERROR: The indicated folder '[folder]' could not be found in Outlook.]$WARNING - Event List Reset]$ZThe existing Event List will be COMPLETELY ERASED if you proceed. Do you want to clean it?]$WARNING 2 - Event List Reset]$?Are you sure you want to COMPLETELY ERASE the whole Event List?@]$Event List has been erased.(]$Outlook Appointmentsh]$ Outlook TasksP]$Auto Holidays Insert Wizard]$Auto Holidays Insert finished.]$3Insert Holiday Events starting on Excel row number?x]$WARNING - Invalid Event Dates]$The START DATE for event ']$ ' on line ]$x is greater than its END DATE. The event will not be listed on the output Calendar. Press OK to proceed, CANCEL to stop.0]$?Removed invalid characters '/\:?[]*' in Plan Name. Changed to '? Code Constants DEMO CONSTANTS]$X]$<>]$ Global variables] ] @hA] 8] `v?] 0X] ]  ?]  H] Hp] p] :] 8] `] 8] `A] ] (] Px|?] (] P0xh] 0B] @ H ] hx ׹4]  8 ]x    Technical InputsInput'Config' ' Main Inputs: Sheet NameC5  d%%!'f f$'% CVheck if it is valid $ f$ MsgBox SheetnameCNT X X  X '.   "A@A  'd  'k 'fk Other Main InputsC9  d%%!X 'h?F7  d%%!'1/1/ hX'12/31/ hX'F5  d%%!'C12  d%%!' Z .   "A@ h h TODOIf (InputSTDate >= 2011) Then , h.   "A@'hkPkH Config Output FormatsC29  d%%!! 'pC31  d%%!! 'rC33  d%%!! 'tG29  d%%!x.vG29  d%%!x! 'G31  d%%!x! 'G31  d%%!x.zC29  d%%!x.|lpC31  d%%!x.~C33  d%%!x.%G33  d%%!x. Monthly formatEG71  d%%!x.C73  d%%!x.C73  d%%!! 'G75  d%%!x.C71  d%%!X '$ $Thin$ ' $Thick$e 'd0 'k C75  d%%!! 'G73  d%%!x. z.R cG77  d%%!'qpC77  d%%!X Yes'$G69  d%%!x.% Table FormatC89  d%%!X Yes'$G89  d%%!'ldC85  d%%!x.5C87  d%%!! 'G83  d%%!x.G85  d%%!x.2G87  d%%!x. C83  d%%!'qT Loops and ConditionalsC7  d%%!'4] No Background Picture 2'dP $Image Files, *.bmp;*.gif;*.jpg;*.png %' k    'C   d%%! +l WK+n   'xF   d%%! +nI   d%%! +` ''0F9  d%%!X '^g   G'j9h OtherslC57  d%%!X 'C53  d%%!X Yes'LC55  d%%!'j= jMonday,%<WK+n  m  ')F   d%%! +ntI   d%%! + H Add missed SundayF12  d%%!+n PI12  d%%!+ ZkC59  d%%!X Yes'AJH59  d%%!X Yes'\'J31  d%%!X Yes' < Automatic HolidaysqpC65  d%%!X 'LC63  d%%!! ' Get Outlook DefaultsC43  d%%!! 'C23  d%%!'C37  d%%!X Yes'X5IC39  d%%!X Yes'%"bC41  d%%!X Yes'8̶C25  d%%!'va  G 'cG X'jC27  d%%!'  G 'cG X'jC45  d%%!X 'C47  d%%!X 'u|' $ START ONLYG'j $START AND END HOURSG'j Not used on this calendarsTa'O')C49  d%%!X '%o D Check if the name is a valid Sheet name - Remove invalid characters8q] 8 P h ZlH Set invalid char list/\:?[]*''  4  $ 'T  G  'jvj G $'jX*F 'iX  On Error Resume NextK1l"( & ($ll ((3]  '' ,.d  A@ .G|j hq h  *   "A@d Planning AllOt\A@0kP  Traditional AllA@2k Table AlllpA@4k Monthly AllCxA@6k Monthly (List) AllA@8kh  Monthly 4-5-4 All$ A@:k( $   "A@k|" <F (   "$'*F dko col = "C:F" h @$DB@H B F(Hp o`p col = "C:F" z @$LB@H B F(N o ]P h !X'T Sheet T'V  MsgBox SheetName T B@Z V$B@H T$^ V$B@\ V$B@H R V$( q oH b d(fV o( ]@X( jZ$lL< j$n'N d jZ$l A$l  'V V A $n'Z k 'hip Set Print Area r:  v!x(z  v!x 9|9~9999? %9? %9 %9 L  %9 R ? %9? %999 999 t$ LANDSCAPE < 9d 9k9.PaperSize = xlPaperA4Y p 9 99999qo Visible Sheet  vB@  Print Sheet  v!x!(  v!x 99q v!x 9|&G9~ 9999..LeftMargin = Application.InchesToPoints(0.75) /.RightMargin = Application.InchesToPoints(0.75)*.TopMargin = Application.InchesToPoints(1)-.BottomMargin = Application.InchesToPoints(1)/.HeaderMargin = Application.InchesToPoints(0.5)/.FooterMargin = Application.InchesToPoints(0.5).PrintHeadings = False.PrintGridlines = False".PrintComments = xlPrintNoComments.PrintQuality = 600*<2.CenterHorizontally = FalseJJ.CenterVertically = False.Orientation = xlPortrait.Draft = False.FirstPageNumber = xlAutomatic.Order = xlDownThenOver.BlackAndWhite = False .Zoom = 100%.PrintErrors = xlPrintErrorsDisplayed q v!x!ʁ@99qop Insert task cells!ThisBook.Sheets("Input").Activate $B@H F!9  9q $B@H  ( $B@H ( $B@H ( $B@H (oX Insert task cells $B@H F! 9  9q $B@H  ( $B@H X $X ( $B@H) X $X () $B@H-  (1o@P]" '  '  (5   $'k 'i Reset Full Task List56] 8P) Set Objects(56 ,.d ,.A@ Confirm Task List Erasing >    <$'  G|j% Confirm Task List Erasing - 2nd time B    @$'  G|j( Loop to insert blank lines on all tasksE   d%%!X ''  Delete content from row   A@  'E     d%%!X 'x D   <A@oXh   F%(   F%(  F% 9 B9 9 q  F% 9 B9 9 q  F% 9 B9 9 qx  F% 9 B9 9 q@  F!D!X   F% 9 9 9 q  F% 9 9 9 qkk7 Selection.Borders(xlInsideVertical).LineStyle = xlNone9 Selection.Borders(xlInsideHorizontal).LineStyle = xlNoneo](@Xp]'"E   d%%!X ' 'F' E   d%%!X ' E   d%%!X'F   d%%!X'    RG   d%%!X  T  V   P$'* * '"E $B@Hkkk  '  ' "'.i d Return the month number spaning more than one year. Returns negative if the year as to be increased]h & ( '  G  'j '$i 6 Calculates the last day of the month for a given date] , , , , , ,  , '0 , , ,  , e'0d  check leap years .  .d  . '0d '0k d '0kx dp '0k` kX 0'*iH ] Copy the Header & Footer of the designated source sheet into into the output workbook sheets] Return immediatly if disabled G|jMsgBox SH.Name, , WB.Name Copy Headers to New Book Sheet 1 - Plan Text Headers & Footers 4!x!| : 8%!x(| 4!x!~ : 8%!x(~ 4!x! : 8%!x( 4!x! : 8%!x( 4!x! : 8%!x( 4!x! : 8%!x( Picture Headers & Footers=MsgBox SH.PageSetup.CenterHeaderPicture.Filename, , "Picture"IWB.Sheets(1).PageSetup.LeftHeaderPicture = SH.PageSetup.LeftHeaderPictureMWB.Sheets(1).PageSetup.CenterHeaderPicture = SH.PageSetup.CenterHeaderPictureKWB.Sheets(1).PageSetup.RightHeaderPicture = SH.PageSetup.RightHeaderPictureIWB.Sheets(1).PageSetup.LeftFooterPicture = SH.PageSetup.LeftFooterPictureMWB.Sheets(1).PageSetup.CenterFooterPicture = SH.PageSetup.CenterFooterPictureKWB.Sheets(1).PageSetup.RightFooterPicture = SH.PageSetup.RightFooterPictureo]$> WWW.OFFICEHELP.BIZ - Traditional Calendars for Excel Vs 4.009Attribute VB_Name = "Module1" ' (C) OfficeHelp 2006 - wPww.oTh*. biz ZCOMMON CODE MODULE.PLAN MSGtREMOVE UNUSED:Sng Con@stantsP ublic C_MAIN_TITLE WWW.OFFICEHELP.BIZZTraditional Calendars for Excel Vs 4.00c]END- @Genera' Finished." & vbCrLf "This macro a membe0r of.Biz full family7Prcts.OCRO_ESCPM3execuNstopped by us:re quest#DATESWARNINdInvalid Year. Please (ent@y between 1905 and 3000)SG_Dw)Versc wiHOLIHDAYoAu@Honays Inrt8a_8?rt8z8st8l 8a|_$- 3}}D@9Oz31aThe ' MsgB$ox AIf CLng() !0) C_ERR_SHEETNAME & & "'.", vbExcla A +OKOnly, C_MAIN_TITLE i@+ 1Else_Gnd Ifj#  E$AiZ("FZgb12gB[ItsADemoHONMSG_DEMO_GENERIC!M#KB&H'&  9`32004gpo@ 05/pGO4DO$'03>= 20112270/7t K"28 Inf3? 2p !TF)= 5c ,9-N OutLg1Mbff[s?)(8IwL2-In@aior.IndexV`Qts 31 yl%3 TW33_ Se~tx! \GRvd_oo&a W$|! e/&{"A/#$"_C__me+!AS Regular`%GA C<a!E7!1ַoocC710c:8__Y99%&d/:7Ad ay%C("Qmr +w="n"yZ= xlA^ick9tck!xlMediumP$ba2OetAA_Go$1P =BU > [O' G7G(W= ("ٵThisBook.Sheets(@Config`Name).Range("C77").Value) = "Yes") Set FontMhlyEvents>%G69VA  ' TableUrmat   UseColorZ(CStr:(&8`UMaxCharsLabel)Z)(せC85r%WeekendD ay%Inte rior.'Index TTit= 83(|(mLeg@)*OG;J9l:G8A:CB#CellWidth(#C5B' Loops and ditionalsaux3PInputˀKIf "No BackgrouPicture"@aenCBGFileA"" ElseAp plica'.G@etOpenn("Imags, *.bmp;*.gif@jpg@pngE IfFor Aux`1 To 12C@2ax1 +B}b\(Hd" &2 Nex@|D ]day 0WK8JwA F!$ Long INA z1 Cal$_0`ttarc.CDbl("0-,NFh- @OSG < 0 Otr (>@=O=  ' Other_c|Datbe1mataa"{Q5uBbGridline [g5C `eѿ"6b`_SDS5B &q " _Tu CVGlW7cW!Hj2j MMsX X,Q;' Add missed SـMay 7B߆ՆF12S17 mtIUOPaintqk?(2tC5p-CopyPrerHead3@(-HZInser NumberOnTrajO"iJ31VQ?Auto@>ic Holi/@1Cp@gory0_@;6v6j0;6A@Q @q Outl Defaultp bϯů4TSource/(DC2F4TasksCompleto#o#=3UpEQNo1\.llowSecField444~4(2 \"oNullnd ImporBtbRealTr5$C(Q  t ff @4y r K= _ se[ s: ;7774; @w* Timq/sUCase3,START ONLYw+`{AND E0 HOURS/rt$3k' Not umon t@ calb xLev qjTD7_ OpdSubFolPapw8A0unc CheckG(sQk As3`ig)QRChDeck if the name is a valid Sheet- Removxnlcharacters Dim Aux As String, NotV&$llBLo>Out\ (' Soia listQ= "/\:?[]*"8MFFor k= 1 To Len(sN)G!= Mid$,, 1AIf Inf(;,p) = 0 Then 9& QexV"?) >= 3ALeft( ,À < ChǂY7% End Function|Sub Main(' O n Err}Re4suNE GohandleC ancel Applica .EnabEKeRyxlH rK Display@Alerts F0alseD, msg\"h7CNT@08~ThisBook@A9veWor kbGetInpuueC@ZNTaskDateF$CkExif0lMsgBox C_DATES_TITLE, vbOKOnly +Inf(ormT, MAIN CEI.alendarType>"Plann@"$C pAll"4$MakeYearlgIfPTradi?a  OkI TL_ & %  Monthly? _0*d (L)?2a`4-5-4454&a\END``ASs : `c<18_@c(C_MACRO_ESCExclaprcskq`qJif ColumnWidthT(cBSwADouBcol`"C:FCs).Selec[c. @wRowHeightYvfCSiz`Q?A4First 0 d (P -& %HIf  0ae UZ 0etList( 'Q1et FI  CNA ,CSf,5i'! Obj Y3 ]! Workb^ !Mai~nUob0aValue4'@E nfirm ExrasMsgBox(MSG_CLEANING_WARr@, vbExclamÄ+Cri OKCank, /TITLE3vb3r ExisTo te `2timo  G2/ / el/ R" 2? ? 5 q ELoop to i~blank ä60A'x"" & 2E R^).Range("EQSpecialDayStartԜ)."D ,= G0<> 'l Dc 0 frrow} p"4= A+ 1g!Bts(+Wen$c0?,0-3A$Inf`w0OKY_#W#@MakeBo(w, iRA3Ps&ection.Borders(xlDiagonalDown).LineStyle = xlNone Sel UpnWith xEdgeLe8ft)_c |Continuous"WeightwColorIndexAut@omatic"E8nd  TopGBoteI$R_$ .)mIf i The>npumnsunt > 1  ~Ins@ideVer@a~l6A ॆ ƧxlThi+F=  E0Horiz@1lRnIf8i'L3 1"Sub @ Fun CheckTaskDates() As Boolea :On Error Resume Next Dim !ÐString, llLoc2CNTsdA, ehmsg, fla-= TruD= "" & C@("@Ssk.Sheets@(InputbName).Ran ge("ESpeciayStartRow).`Value$e= : = 01c=Whi`G<>?`C ll?kA @/= CA/$ $@8 .F.u @>CˡaaE= MsgBox(MSG_DATES_TASKS_1@nG m20P & 3, vbExclaxon +OKCancel,ITLEC W @c vb1= Falsd0-aSd(I?=#/Q+< 1'"2@FWe|ndSF@< 5IIM@^hFɠ;itAReF' Jturn the m1 number spa&nI@rean year.A4s neg@v0e if a@s to b@ncreasep O8AuxUI!= In +@l+0z2b c-1 * (- 12D @#_T[GetDa0ys(nnY ]> ' Calcul^blast day, ocsf^a givent%QnNumu#4=Or T3 57810(= 3'E`04691=D]' casz Prp$x1Mod 40?SA100oS7P 29 U{ Uq8(ՌeM_ 0P3 Sub CopyPЊterHeadpFoo!s(SH-Works, WBbook, nc12G4a5design6d source  inEBJout0 w_3%Fqse, 1' Q6QimmediatlyNdisablLA%?beycKExpMC!S'!sw SH.q, oZ TNTewkT 31` - Pls T3pV& $3WB).PageSetup.QH.PageSetup.LeftHeader  WB.Sheets(n)@Center 8= S 6Ri|ghv HGFoo FE]#? $^$ #' Picture s & sMsgBox.Filenam@e, , " "!1 G O IZBLO[X=`4 Q4O End Sub l Jd`q(@ll [ 1t5@lpltg lhlt*1h lf`&lhJ!hMP@@ \ @`1h5@lhCx<4wxthp@dK% x8$9 :x <;x" x8$9 :x ;x :H#h x8$9 H:Qx ] ^ qє 3'':( N@:H_N88 68`0a0  bc0a0- de0a0P fg0a0s hi0a0 jk0a0 l3'':( N@:HmN88 68$ nxx olxU;'':( N0:HpN88^ iX68] d,hX x8`2 Fh%x8$9 `:x8qx58'kh%x 8$9 :xrx D`$w xH8`2 Fh%x8$9 :x8qx58'kh%x 8$9 :xsx D`$w xH8$lp8$9 :p 0llqxptlx#h*1t/hA$ '(%lxi8%'H%'X%p8$9 :p ()p$2$ltFX%p8$9 :p d$q)p$d$lxiX%p8$9 :p dQ$o %ltFH% 8$9 : duv)p 5 2$ltFX%p8$9 :p d$q)p$7 FH%$ltFX%p8$9 :p d$w)p$ip(wt$hp$  \("l @x8$9 D:x,x($w xx y.T zT`1h5Tv"x y{ yqd$:D{ldT zT4`1h6T4 lhFDl8 H,wlhT4h$; |*#x*rU~| i2222 3)39>QI3>i33334!4  A4q4444 5)5Q5q55555 6)6Q6y66666797Y7y777778A8a88?999:):I:a:y:::::;A;a;;;;;<!<A<a<<<<<=!=A====1?a??A@y@ACyDQFGHJJYAKiKKKLKD)HYLLAL9MQMMMM)NaNNNOIOOOOAPPP QIQQQ)RaRRRR)SISSATSTTAUUUUUa!ViiA9VQQVyVVVVWA  T| T xO:H%X|F\%l_ l dX(A`)lX6( 1p6pM\@( (MH@ @6(7<'':\ N0 lp*# *F( /6(+ lpTO:H %X|F\%l_ l dX(AF )lX6(O:H%X|F\%l_ l dX(A`)lX6(! #*#ɜ2! #*#ɜ2O:H%X|F\%l_ l dX(A`)lX6(O:H%X|F\%l_ l dX(A`)lX6(b3'':H N0:\N(( 6( ̔ `G'':\ N@ #*#*F( 26(  W:H%XF\%l_ l dX(=A"L)lX6(W:H%XF\%l_ l dX(=A"P)lX6(W:H%XF\%l_ l dX(=A"T)lX6(R:H%XF\%l_ l dX(AX)lX6(W:H%XF\%l_ l dX(=A")lX6(W:H%XF\%l_ l dX(=A")lX6(R:H%XF\%l_ l dX(A\)lX6(R:H%XF\%l_ l dX(A`)lX6(R:H%XF\%l_ l dX(Ad)lX6(R:H%XF\%l_ l dX(Ah)lX6(R:H%XF\%l_ l dX(Al)lX6(R:H %XF\%l_ l dX(A)lX6(R:H!%XF\%l_ l dX(A)lX6(W:H!%XF\%l_ l dX(=A")lX6(R:H"%XF\%l_ l dX(A )lX6(Z:#:H$%XF\%l_ l dX(AK1p)lX6(9pM\@( (:H%N 36( $H 9pM\@( (:H&N 36(: $H  $W:H'%XF\%l_ l dX(=A"()lX6(R:H(%XF\%l_ l dX(A0)lX6( \4O:H)%XF\%l_ l dX(A"8)lX6(Z:H*%XF\%l_ l dX(AK#+0</)lX6(R:H,%XF\%l_ l dX(A,)lX6(Z:H-%XF\%l_ l dX(AK#+0D/)lX6(O:H.%XF\%l_ l dX(A"@)lX6(R:H/%XF\%l_ l dX(AH)lX6(W:H0%XF\%l_ l dX(=A"L)lX6(R:H1%XF\%l_ l dX(AP)lX6(R:H2%XF\%l_ l dX(AT)lX6(R:H3%XF\%l_ l dX(AX)lX6(O:H4%XF\%l_ l dX(A"\)lX6(L:H5%X|F\%l_ l dX(A`1p)lX6( lp60 #T@F( '%'%'8%'H%:\7%l8$9 :l x;(`l5(x d lxqth<lt#*F(%XF\%l_ l dXA`#lx;2)lX6( xfW=4;xd lxqth>lt#*F(%XF\%l_ l dXA`#lx4;2)lX6(h?lt#*F(%XF\%l_ l dXA`#lx;2)lX6( xf p ta:@:HA%X|F\%l_ l dX(AH)lX6(є  ]:#:HB%XF\%l_ l dX(AK)lX6(Z:HC%XF\%l_ l dX(AK#+0/)lX6(O:HD%XF\%l_ l dX(A`)lX6(E0[=4;xd lxqth>lt#*F(%XF\%l_ l dXA`#lx4;2)lX6(h?lt#*F(%XF\%l_ l dXA`#lx;2)lX6( xfZ:HF%XF\%l_ l dX(A`#4;/)lX6(Z:HG%XF\%l_ l dX(A`#;/)lX6(Z:HH%XF\%l_ l dX(AK#+0/)lX6(Z:HI%XF\%l_ l dX(AK#+0`/)lX6(Z:HJ%XF\%l_ l dX(AK#+0b/)lX6(]:#:HK%XF\%l_ l dX(AK)lX6(W:HL%XF\%l_ l dX(=A")lX6(W:HM%XF\%l_ l dX(=A")lX6(O:HN%X|F\%l_ l dX(A`)lX6(Z:HO%XF\%l_ l dX(AK#+0/)lX6(Z:HP%XF\%l_ l dX(AK#+0/)lX6(]:HQ%XF\%l_ l dX(AK#+0/)lX6(L:HR%X|F\%l_ l dX(A`1p)lX6()lp#08lpFH]d\/(58Z f lpɜL:HS%X|F\%l_ l dX(A`1p)lX6()lp#08lpFH]d\/(58  lpɜ]:#:HT%XF\%l_ l dX(AK)lX6(Z:#:HU%XF\%l_ l dX(AK1p)lX6( #pM\@( (:HV]35( #pM\@( (:HW]35(   XT]:#:HY%XF\%l_ l dX(AK)lX6(,wp,lX(ZCp#ChFd%t8$9 @:tWD}C~/xt6dD%t8$9 @:tWd}44q0t:T#%l0C:T#%l0C:T#%l0C:T#%l0C:T#%l0C:T#%l0C; ?t8$9 :t ;okT%l0Ct; ?t8$9 :t ;okT%l0Ct6 9t8$9 :t ;okT%l0Ct6 9t8$9 :t ;okT%l0Ct; ?t8$9 :t ;okT%l0Ct; ?t8$9 :t ;okT%l0CtfT%l0CfT%l0CT%l0C cT%l0C cT%l0C#lMT@d d: ]35dT%l0CT%l0CfT%l0CT%l0CT%l0CfT%l0CfT%l0C(T%l0C(T%l0C q0d$(w4xtdD'l @x8$9 @:xx3 Fh%x8$9 @:xWX}=8Cx6X8%x8$9 @:xWX}((q$x:h#%l$C:h#%l$C q$%x8$9 @:xWX}qx:h#%lC:h%lC:h#%lC:h#%lC:h#%lC:h#%lC q.x8$9 @:xWX}A8qx5Xhʁ@%lC(h%lC qw0w(xX889 ih%(H%x8$9 X:xqx5*x 8$9 :xW(qx(h%lCh%lC q9 ih%(H%x8$9 X:xqx5 dh%x8$9 (:x,x9 ih%(H%x8$9 X:xqx5 dh%x8$9 (:x,x9 ih%(H%x8$9 X:xqx5 dh%x8$9 (:x,x9 ih%(H%x8$9 X:xqx5 dh%x8$9 (:x,xx(wx(89 ih%(H%x8$9 X:xqx5*x 8$9 :xW(qxih%lCh%lC q9 ih%(H%x8$9 X:xqx5"0Fh%x8$9 (:x,x9 ih%(H%x8$9 X:xqx5=hK #X%x8$9 (:x,2x9 ih%(H%x8$9 X:xqx5= hK #X%x8$9 (:x,2x9 ih%(H%x8$9 X:xqx5"$Fh%x8$9 (:x,x,8(w x(d CtltqplpT%lptM`@P \ P`1t5PltCxx,d,wxtP,l8$9 H:Qll8$9 H:Ql\ ]6'':,NA:LN<<^ qp6<lp6'':,NA:LN<<^ qp6<lpv#: #x#*F<%|FL%l_ l dAK#*1t2)l6 < qx lt#=xlxY lxqxz#: #xlx#*F<%|FL%l_ l dAK#*1t2)l6 <G3'':,N@:LN<< 6<x,,wt\,l<lp#L*F$%4|F8%H_ H d4ANtX/L)H46 $ o`oXlp#L*F$%4|F8%H_ H d4A'P'p:N1:#K#*#*#lp#*#*F^ qT2 L)H46$pPlTpR8H'8%lp#L*F$%8$9 :H/LH5$lhqhlpqpkRpz,D(wtLLH4$pPxD qhlh 0lh qh lhiXl$D(wl LJ ǀ ŀ ŀ ŀ ŀ ŀ Y qp , ǀ ŀ ŀ  qp d qp qp qp  qp lptt $w p( `XlH lla\`F4%DiH%XH X dDW}C)lXD6\4XlH lla\`F4%DiH%XH X dDW}C)lXD6\4XlH lla\`F4%DiH%XH X dDW}C)lXD6\4XlH lla\`F4%DiH%XH X dDW}C)lXD6\4XlH lla\`F4%DiH%XH X dDW}C)lXD6\4XlH lla\`F4%DiH%XH X dDW}C)lXD6\4_h($w $lXD\4     rU h$`(`0$`,`0+,!`0+(I`0(q`#(`!(0` 9IY000( `0( `(T9 `( !9Yy(((0//0+00(a `0$ `,`/#$`,`((,)`  ((@Q` Aq=!=Q(cn<jxOB#<q3i2Eط䭈Fk@$iA`wxk@$iA`wq3i2Eط䭈ME(SLSS6"N0{00020819-0000-0000-C000-000000000046}(%H` %B %`h8@HH0HX$*\Rffff*0U58e648a24xAttribute VB_Name = "ThisWorkbook" Bas0{00020P819-0C$0046} |GlobalSpacFalse dCreatablPredeclaIdTru BExposeTemplateDerivBustomizD2rU __SRP_14'`__SRP_15-BSheet12(/__SRP_16 BQsyss/4ss `rU @n<jxOB0#<s(IO2W F'@q@^难x'@q@^难s(IO2WME(SLSS6"N0{00020820-0000-0000-C000-000000000046}(%H` %D %`h8@``0HX$*\Rffff*0V58e648a24 xAttribute VB_Name = "She@et1" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2 rU Atitt 4tt`rU @n__SRP_17GBModule2__SRP_4dC__SRP_5IrU $`<`y(0(0(<`(0(0(4` !00=ID!` 9!Qi00(0((#,I`1*#13c*\R1*#13b*\R1*#126*\R1*#289*\R1*#42*\R0*#22*\R0*#f$*\Rffff*0[58e648a2*\R0*#13*\R0*#5*\R1*#11*\R1*#2f*\R1*#a4*\R1*#32*\R1*#2d 0 0 "PX2` & .>(0HP  &p. 16    8 P Xp x 8Ph  8Phd/-15OBW@xMEP@0x> LLLL A@8 @ @P < @h 8 :@ 4 @0 @ , A@  @x @  :@ @ @ `A $lvXZ\@ X;=@ ;?@H ?CA@ @ @ :@ @DbFdhfp@ `A0d2@ x``0x `P8h@P "lhjrt>@L @< @, P@ @ @ @ pz@ @ Hpn|~w@x pzP@ xzC@ @ wx$Px`0phj@4 @$ pz@  @ pz0@@@ wX@ @Hpzlh|@ @ w@ pz@ zC@ @( @@ pz@ @X @ h@Hz@@pAHpz0Pp`HF@xl @\ w@X pz@T `wxX8Fz@l @x\ @X @H pz@D `:(@4 PP@0`w8p  @ @ P@ !w@ `pz!@H w8&:@p`` &P@ zCH+w@`pzp+`P@w@ P0@(`w0@ @:@`:(:8F   z@ l @P\ @X @hH @8 @>@( @ w@(`@P @ @x`h( @ P@`x@>@ P@`w@@ P0@h`wX@ @Hpz@`h@ pz%@`%zC@0  *Hpz@X`H*@x pzp0/@t`X/@d 4P@``:4w@ P P9@HL`w89@p< ` >@8`H>w@( pzpG@$`wG@ L@8` ?(Lw@` PQ@`wx8Q@ `V@`Vw@ p[@`w[ex ! h!!@! 0!F@ l @\ 0@X @H @8 X!!0@4`5!@!@0 `Ph! 8H"`""x""x#"F   @x 0@h @(#X "x"@P#T`@#"P@"D @"4 0@#$ P@ @# Кh#(# P@#`#P# 0"<@# ##P@$`##P@0$  $#p@X$`H$$@ p$0$p@`X$ % 0 p%%%% %X%8%`xH% %dIB\@T P@%P @%@ C@< P@&, @ @& @0& @ x `   H 0 @ ''P'8'P)X((&8)'`\x'&лp(pF @h' p@' @( @( I@' @( 0@' @' @ @(( @ )  '  @ (X(C@|`P(C@(dz @x M@(h @)X @H @8 (@6 P** ***+*F  @8*l p@h*\ @X R@*H @8 з@( @+ **@@+`00+**@h+ X++ @+`U+@+ 0@+ 0+h+P@+`V++@ 0++@`W+P 8  HX*\R1*#284$*\Rffff*0W58e648a2$*\Rffff*0T58e648a2*\R1*#3e4*\R1*#132*\R(@ X hp48x./   8N*N8*Nh6N*N*N6N0*Nh*N8N*N*N0  `  J  10 .H 1` .x 1 .      8 P h          @  P ` ,@x  &4 G   ,@( X &4p G      "    ( H X x     2  (; "5 H(;P"5x  *68-  0(H(0h(0(   4(P@&h(%   "  "   @ `x  + ""08@%X$p   D40T` #    0T #(, 8h$V  $0T #H, X$V  $( 0 8 P X ` " h )p " !   "  ) "( +8+HX`hpx ! *  <(<@6X p x  6    6    6    ( 0<8P  X (h *     "  )<<6(08 @6H`hp x6 6 6 6(@HP X<`<x6 6 6 ( 068PX` h6p 6  )<<6 8@H P6Xpx 6 6 6 ( 08 " @ )H *Xhp x +           "   *  ( 0<8<P6h    6    6      6  (  0  8  @ H P B X ` x      ,[  *[!*[@!.cp! ! $!! !!!" "" B " " @"`" x" " " " "" "  "##(#8#H#X# h# x###### # #$$($8$H$X$h$ p$ $$$$$$$$ $ #%  % 0% 8@%X% 8`%x%!%+%+% % &S%% (S% &<(&<@&<X&<p&6& & & & &<&<&  &  ' ,[ ' P' *[h' *[' .c' *Z' *Z(( X( h( &x(<()( ( ( .) $8)<`) ).e)).e)* *-(* (8* H*<`* *** *****2D* &(+<P+)p+ + + .+ +<,  ,0,H,X, p,x,,,,, , ,, ,  , , 4, .0- 4`- " - 4- )-<-<.6.0.8.@.H. P.6X.p.x... .6..... .6...// / / (/) (C) OfficeHelp 2006 - www.officehelp.biz SPECIFIC CODE MODULE00]@]Xp Select Output SheetL f'H HGEvent Calendar'Hj  h -  h   H'Had h  H'H0k HG f'Hj500 CreateOutputSheet NewSheetName" T!Z.`e `B@Vtur `%B@Hes H `%(t Set Gridlines} GA@`j20 Set Generic Headingsead A:ADA@>ThInsert Month Names  With WeekNumbersC5:J5+Nill L5:S5+N To U5:AB5+NED vC14:J14+NHEL14:S14+NERU14:AB14+Ne C23:J23+NisL23:S23+NWAU23:AB23 +NtyC32:J32 +NL32:S32 +NU32:AB32 +N?dH Without WeekNumbersD5:J5+N?M5:S5+NV5:AB5+ND14:J14+NXM14:S14+NV14:AB14+NYD23:J23+NM23:S23+NV23:AB23 +ND32:J32 +NM32:S32 +N20V32:AB32 +Nk h'L'R   $$'Y  RY L 'LY'Rk G( L)'PcG'Pj3d $l  P $N vA@X Make MonthsXY $$CJ A@Z< January $$LS A@ZY $$UAB A@Z $$CJA@Z= Aprilas $$LSA@ZX $$UABA@Z//oned $$CJA@Z= Julyte $$LSA@Z7  $$UABA@Z  $$C!J'A@Z>October  $$L!S'A@Z=docum  $$U!AB'A@Z# Insert Special Day List *$\'J J(  'JResoD If Option to Remove Weekdays, remove columns and move month headers $ Remove Weekday columnsC:C$DB@H$ b` FB@^%K:K$DB@H b` FB@^S:S$DB@HLast b` FB@^/schem Redraw BorderuddoC6:I12A@d JanuaryK6:Q12A@dS6:Y12A@dC15:I21A@d AprilK15:Q21A@dS15:Y21A@d4&C24:I30A@d JulyK24:Q30A@dS24:Y30A@dtp://sC33:I39A@d OctoberK33:Q39A@d&S33:Y39A@d&k: If Option to Remove Weekdays, adjust title and print area h? Insert Title HB2:Z2Arial hA@f? Set Print AreaB2Z J LANDSCAPEA@p  d% `A@2d Insert Title HB2:AC2Arial hA@f Set Print AreaB2AC J LANDSCAPEA@p  d% `A@2k@ Set Background Picture G A@jo ]0]H`x]? Calculate Variables l nX 't p rX 'v p nX 'x p n X '| l$l $h n'z jSundayA l$l $h n X '~ l$l $h rX 'd l$l $h n X '~ l$l $h rX 'kX l rX ' Make Grid t: v t: xA@ t: vA@1 Make Grid BG White Paint Backgrounds z: x rA@ G |: v tA@j G ~:  tA@j t:  pA@E Place Headings - MsgBox ColLetter(Asc(TopCol) + Aux) & TopRow l$l  $h n$B@H $n ($ G |A@cG ~A@jP Insert Week and Day Numbers j l n p rA@C!o]qp]0H`lh]x Place Daysldi h'L  G L 'Lj%l 'j$ L$'m j  $' jSunday  $'d  $'C!k ' L$'hm j $'d $' $''F' <E   x Insert Week numberP       G  'j"OX l$l  $h n  $B@H  ( |A@  'd8  ' l   l$l  $h n  $B@H  ( $'< Get Special Date Color G A@j| $ $ A@UCd8 A@%hk  'd $'k d l$l  $h n  $B@H  (%l $'8 Get Special Date Color%x G A@j $ $%l A@%ld A@h k  'xd $'k k   G|jh o  $B@H  ( F 9 999999 99q FB@$ A@o $B@H  (W F!x(3 F!x( F 9 999999 99qP FB@\(h F!xfh 9 999999 9 9 q    F%(   F%(  F%%h 9 9 9 qp  F%% 9 9 9 q8  F%h 9 9 9 q  F%h 9 9 9 q   F%(6k $ ! Set BG Color if there is a color F! 9  9qHk@o8 $B@H   F%(   F%(  F%h 9 9 9 q  F%(U 9 9 9 q  F%W 9 9 9 qH  F% 9 9 9 q  F% 9 9 9 q  F%0Ot 9 9 9 q   F%(   F%(h  F%Kh 9 9 9 q8  F% d  9 9 9 q  F%= 9 9 9 q  F%l@*1T 9 9 9 q  F%@X 9 9 9 qX  F%d 9 9 9 q  $B@H   F%(   F%(  F%X0 9 9 9 q  F%d 9 9 9 qp  F%qH 9 9 9 q8  F% 0 9 9 9 q  F%0 9 9 9 qo8 $B@H F! 9  9q  F!x( F 9 999999 99qko F! 9  9q    F%(   F%(d  F%*#pl 9 9 9 q`  F%%`" 9 9 9 q(  F% #p 9 9 9 q  F% 9 9 9 qkoX]]  0 ''#' E X   d%%!X ' G'jE X   d%%!'F X   d%%!'B X   d%%!! '  X X X X 'kk  ' 'iH ]   0 ]H ` x   ]   ] @ x  ''#'' ',' Set Column LettersC+L+U+E+N+W+  Monthly - Change ColsD+F+T+V+k   Monthly (List)F+G+F+G+F+G+k  TableC+H+L+D+I+M+k'  $NONE Insert Label F $B@HdC $B@HkLegend ( F!x( F!x( F :G $B@HdC :AB $B@Hk   F%(   F%(   F%(   F%(  F% 9 9 9 q@   F%(   F%( List Days / Categories E X   d%%!X ' G'jE X   d%%!'F X   d%%!'B X   d%%!! 'G X   d%%!'C X   d%%!'  Days Insert label (day or category) $ $B@H'  ( zA@Selection.Font.Bold = True'Selection.Font.ColorIndex = ColorLegend Insert day (day or category) $ $B@H dd/mm' $/ $  (d0' $ / $ (k change font size to 8 F!x(  F( Insert Color $ $B@H A@  '   '   '  'kd, ,, , Insert label (day or category) $ $B@H'  ( zA@Selection.Font.Bold = True'Selection.Font.ColorIndex = ColorLegend Insert Color $ $B@H A@  ,'  '   '   '  'k`kXkPkH  '0k(   '\i. ---------------------------------------------( Functions for Option to Remove Weekdays. --------------------------------------------- . Applyes a large border over the selected area $B@H   F%(   F%(  F% 99 9 9q  F% 99 9 9qh  F% 99 9 9q(  F% 99 9 9qoAttribute VB_Name = "Module2" ' (C) OfficeHelp 2006 - wPww.oTh*. biz ZSPECIFIC CODE MODULE2Sub MakeCalendar() Dim NewSheetyAs S ngLines Long, Aux Year Position(14)L, ll &Labe,FlagBooleanY ' Select Output U  \= InPlafndIf o" Then Event 0StartMonth <> 0C-@STDa& "" & (CL + 1) " & BElse@nd If0Len( ) >= 32MAPPA9' Cre@6aa0SetAqkWorkbooks.Add".ActivKs(1).C}U= t GridlcCUse'Fa[Ã-AeC Ceneric Headin gsColu mnWid"A:AD", 4CCOn Error GoTo 0'Insert> KA$ CWeekNumber0OnTrakalP' Wia7kgr)`"C5X:J5\-2"L(5:S53"U58:ABU lC14:J14 5 5`Sv6C `AB7C23:JT23 8bL`Sv9bU`AB10C32:Jn3a'm(1|L-S#-UAB:out ?;UD>;M>;V?;D 2=;M`=;V`>;D 2=;M`=;V`m?;D1>;M>;V);@r$Abp= Tru`FPCs= 1 C<12T'=CIndex(Sjw}OQ1E <lAep k.4 XRE8{@ sAP2(1l& ")" A0:X=Tit leSrS(Abs(p)ubR6Pll), F|ba8WNext'c4U ($1)"C`6, "Jp12 ' Januaryo2bLd^Sb/3UABb pk 15 21 `April//th, 5R R 216   , 7s 24 ul_n!8B B 3d{9   Pf$33 9Octo_q_ hq1 r2 91(A C C'  Speci`Day List4N?aNQD0!CWh0atTop'2,+ 40p + 3Sf Op to @Removerd@ays, rcs aIm h erD=J= N~K  !Pss("C: ""B \G! ASub Month(M@ As Long@opColStCRowGLowL@H) Dim TelJA@ RightNext A!TGB,cond Se$LastInC AuxA ;CJ%AE' Calculate Vaoble6s#6%=b'& C(aow!e=,' ?!!J ! + 1 !#= Letu(Asc!)" ♃xDStart`"S@QayM#C-` @W "G?5B% + 6)wGk_yhMmBj('bq GridAsFh& ":StT8FPa@ Block70,Ҩ BG WhLitD ' _^ L,NorDILabelˏ`MendAen ";&pDzRv3 wy"P(8  I@B F8'Zv`{e tinBgDFor H= 0 7a2psgBox<<'`- owwRange(098J).SelectActiveQ . mOR1C11$Ahs(A70 aFfB; py Svp #$ qmlr$ol,QX]qJqInaAqqgow5Yq1Fw$EWTjEpInteger,1#di0Dpqq[a#p &~Rloop +bLCNT Y|eaP*Po- -=eSTQ tfp 0)3Ns%Z q]Ԥ0[ )Z _O[D[SZrnx`t = 69-USI2f Rloop = 1 Then If LCNT >= StartWeekRange(ColLetter(Asc(Top ) + C!) & Row)).Se0lectXActiveCell.FormulaR1C1Aux'5/{or(Ge t(gDate) ' Sp@ecial *,<> - Paintdion , F0alse(daFy LOr 7CopyFont endAFEZ(Reg_r Dand Ifnp1 j gAdd("d`", 1,å)E W;Jo=w ?Vl= =VU;UT CA SO?Sq,> Last n~ Exit Subb^Nex'   Public MakeMhTitlDe( Asringjel`iT"m#e@v^ With &c!$.Horiz@alAl ignme= HxlCerV erticBottomWrapT@$5l.Ori atA= 0Ind`LevelSBh(kToF@4=A-.Read,Orde Merg"s9&C&._5c"NyB  BGcu!Lo1# !StC$TSize!MKBo2Boolean_%_% _%tX%s!+.BoldTruxIta1= )c))}.)A,)) ) .)v.))x)C))r)on).a'*.Namelb$Pqa&kethrough`]=Superscript.Sub#.Outli nea.Shad=UBr@xlStyleNonY0!xT ;_V2{+C4s(xlDiagonalDowpn).L xlUp ,EdgeLe|ft@<&b$i`nuousq. WeighxlMediu[*xlAu] [cg?A 0W Torp ne7 1 om  B  or(0 R  g .xlInsideY//309oP0\' Set BG if there is a 0coloLIni &.$)"Pan>So8lid End Sub Publich MakeGrid(SelRange As String, Headeru X) .n).ect 6ion.Bors(xlDiagonalDown).LineStyle = x lNone9UpA7With vEdgeLeft[L >Conti`nuousAW eightNThin Color IndexAutomaticEJTopJIhJBot3%Q .?K@%Rc%%InsideVeral&&&Horiz@'c:_G凿elAHMediumz!_[ '!!yߓt%?ۦ??9CݿͿͿ9c@p,pp0]pthC3SSc( 5(/CN9/C & x /CȔ&p[o L/Еo h /C ^ ?Vp /C Mz&V~./C PaintBlockBG>LoFor+Boolean I>>>lInterior "n+= C+(@YsBook.Sheets(InputName).Range("E" & ()).VaHlueHyIfNull Then׉!=i!* $F3 #8  B InACor %b4%3a`(CET) >6#I)@U@<Ea1  IcUEga%U + DRWendQk` poaFq@Insertg^List(WTL s@ncj, `apCalTypbv!LegcM'F+pldpT ru<Italic^??1 ":G ct_ 3_owAҁ DiagonPown)|N c xlUpn?_O@֏(ڟ0ss7CoCideVi8cal' A\ys / `egorieh7ofx If Criteria = Null Then "" @DDateIThisBook.Sheets(InputName).Range("E" & CStr@dex)).ValueT E'TF"TColoJr'TB*Inodr.$In_[LPabel'1G[at')C!)<> <""2@w WTL"Days B' Insert l@(day Zcgory)B L@T(ET)@Out.@SelectActiveCell.FormulaR1C1,'ADCopyFont Leg(end ' ionnt.Bold@Tr 4 5or3 ERPQQzcy!)"N"dd/mm>A}0ay(c:"/2M.h.Elsla e| I`X|nd I"f@ ch faFsize to 8,FS= Horiz alAlignmeS = xlCero?slC)-bPaint DB , W`^qC+ 1O3 Or CalTypee43F(0 ACNTao`FEE7WIn!",`BeenDone!T,", DC`o&)0qx)W8W O5XX_X?_XX)orXKp&o/8/6bllo6 o6V$= %W$3.p:::;O;x o ;ӳ ? {0wp;C&jWc(  \SpecialjLis7P 2QAFunon' - ' slr OptЍlRemove WeeksSub RedoBorder(s1 As Oing' Applyes aArge b r the s2ed areaAQ36IvCs(xlDiagon`own).LineStyl!exxlNPWU pnDWith xlEdgeLeftC~`inuou% A_ .TwAndShad h3.Weigh!xlMediumc! @ Top E  >   pq Bottom CFgy/2ۯ /(R1 C   83 ]YL< ^<i,`1l6< v_`0 ; ]YL< ^<F `1d6< 5 ]YL< ^<F `1`6< |; ]YL< ^<F `1d6< 5 ]YL< ^<F `1`6< #P*1\/P6lxa*#lp*lxa*#Plt* b2P-+YLlxa*#Plt* c 2P(+dlla*#Plp* c 2PueM(+flha*#Plt* c 2Pue}(+flda*#Pl`* c 2P(+glxa*#Pl\* c 2PXd_P'% ]lXYL< ^<i,%$ 6<&lXhF,%$ ( ,lXK i jU k j Xflllll lxHw0 xd\`lThpt,P< PvqH &lHqH qDlH4 m4Otd54+dM$@lD9n4 o4Otd54 v_`0"dM$@4 p 4"qp54"dM$@4 p 4"qp54odt\lH4 m4Otd54%dM$@lD9n4 o4Otd54$dM$@9q4 o4Otd54dM$@4 r4Upn54 qx qLTdLPdBlPk&lTlLlplpvs{sT'% ]lPY4 ^4lTi$%$ 64#vsi$%$ ( , i jvs{s&lLqLlT lLlpT'% ]lPY4 ^4lTi$%$ 64#lxi$%$ ( , \^tqXlX6+X uV\M$@4 p 4(]/\M@ p (]/64 v j w jlxqx$\M$@9q4 o4Ot\54$T'% ]lPY4 ^4lTi$%$ 64#lxi$%$ ( , \^tqXrU~|  5AXPX!V?99Xp2AKD qa4Aaiaaaa!bYbbbb!cQcccc d TAdydddeAeqee[ e:ee!f fx!\afAfffff)gYggggAhqhhhi [1i!Q)HYihx QyiiYLi9MIq808A\i!]\X^P@H9YYY)RZjAZIjyZj 5 _y__A```__`q4QVyVVA4U`j9V 3)3I:Xjjj k!k9kWQka:ik9>kkkklq[(h!`q^Al H vCx lx0Cxvn>v#@*#,1:?%,$ ` ,,5.%, $ ,=>,1:@%,$ ` ,,5.%, $ ,=>,AC@@ B/@CC@@ B/@DC@@ B/@EC@@ B/@FC@@ B/@GC@@ B/@HC@@ B/@IC@@ B/@JC@@ B/@KC@@ B/@LC@@ B/@MC@@ B/@ um @+YYNC<<YOC@@x P2@<4QC44Rlt#@*8SC<< T 2@<84GvUF%,"VX  , d Y l=W X ),* @+YYNC<<YYC@@x P2@<4QC44Zlt#@*8SC<< T 2@<84GvUF%,"VX  , d Y l=W X ), v[=C [ \:H Xw@TroessgxH4 @<840,x#P*1x/P#P*1t/P#P*1p/P#P*1h/P2lX+X uV\M$@4 p 4(]/\M@ p (]/64 v j w jlxqx$\M$@9q4 o4Ot\54 lxkn8 Pf TfP(t$4d,)X'\%Fl%$ XX" Fl%X$ ( X,XX $ QXTl%Txl%Tyfl%Tz(l%T{fl%T|(l%T}fl%T~lv%Tfl%TcT!X $ XX l j4(,(wTX4)X'\%Fl%$ XX" Fl%X$ ( X,X+cl%X $ XWHCX5H+cl%X $ XWHCX5HX $ QXDl%Dxl%Dyfl%Dz(l%D{fl%D|(l%D}fl%D~lv%Dfl%DcD!X $ XX*X $ XWH44q0XFl%l0Cil%l0Cfl%l0Cfl%l0Cfl%l0Cfl%l0Cfl%l0Cl%l0C il%l0C q0$< %l%X $ XHCX5H< %l%X $ XHCX5H6l%X $ XHqXl%lCl%lCl%lC q6l%X $ XHqXl%lCl%lCl%lC q6l %X $ XHqXl%lCl%lCl%lC q6l %X $ XHqXl%lCl%lCl%lC q< %l %X $ XHCX5H,*X $ XWHqXil%lCl%lC q8 4@w(D4XH )X'\% Fl%$ XX?@BdCOEFGHIJKLMN=PRSUYVWX[r]^_`abcdefghijklmnopqZstuvwxyz{|}~WC5+c% $ WC5-S'%#*#*##*F%$ 25S'%4#*#*##*F%$ 25<%% $ C5<%% $ C5<%% $ C5<%% $ C56 % $ q|%l|C%l|C%l|C q|<% % $ C5<% % $ C5 ll= [lt#*F%xvUF%"VX   d xAhK1l/)x6hllF]d3Cl[lt#*F%xvUF%"VX   d xAhOt\/)x6h[lt#*F%xvUF%"VX   d xAhOtT/)x6hclt#*F%xvUF%"VX   d x=hAX"qd/)x6hXZlt#*F%xvUF%"VX   d xAh`1P/)x6hZ4lt#*F%xvUF%"VX   d xAh`1L/)x6h ll= 0E <'%l lD#*F%$ /5)lP*F%$ ( ,5  j<'%l(lD#*F%$ /5 v0e:\M@ r:h\M@X XH%$ ( ,6 hXHR e:\M@ :h\M@X rXH%$ ( ,6 hXH-(% $ WC5(% $ x<'%l(lD#*F%$ /5+6d ulqlǀ@ qlhqhlDqD Dl@*#*#lL*#*#2 <'%l lD#*F%$ /5)lL*F%$ ( ,5  j<'%l(lD#*F%$ /5+6d ul@lL*#*1@/lqlǀ qlhqhlDqDltqtblhqxH w|@HPl(H(L 6hX8 xhXH)X'\% Fl%$ XX LLLL  `tk++#i. ii(iHHPiJhpiL )N$%iP(B`Rp`Tl`8hC@VX 8`XT`ZP`\L`^H``D `b(@8 &`hkHHNi  i@i:`ihijil `Hxʐ HʐP HHH(@d @ T @P 0`$&@L EOmmitted for faster DEMO Results when generating ALL formats at once.YThis limitation is only active on the DEMO version with the "ALL" Calendar Type Selected.To get a full 12 month DEMO, select "Monthly (List)" at the Calendar Type cell near the Run Button (Cell F5 on the "Input" Sheet)p  8 @ < @ , @ @H  :` @ H @  @  ?@ H (?Xp@ ( h @ h"T`$@ h @ X @T @P B@ @ @ 0 :@ @P  h ( A@ Ex P P >= xpp @X`xj*fh`@h ?@H A@ E@ @ :@ @ @ ?@ @ (l`>JX@ @ ?@ A@ E@ @ :@| @l @ \ @8L @< lh0<F@, @( @H <@p``<P>LD@ @0 @ |@ HVP@`pVxz\Dp@ d2x$(Px@F   @x @h pz@X @H @8 @( @ h(@`pzP|@  @` zC@0   @X` H@ Xp0@` X@ pHpz@`p@ `(@hXF  @x @h @X @H @8 @( @ 8@@`h@@  @ `pz @H 8 @p`` @ H@` p0`HHxh8P8P`>x`8zCwdfdnz@0 @( @h @ @ ( @ @ @ @ @ @  @ @ p@ @8 @P @t @`  pfh`l`@8t @Pp @hl @h @d x@` @P P@L @X< @@(, @* @@ @ @ F@ @`@( &@P`@&@ h(50@`P5XHh(HX*\R1*#284$*\Rffff*0X58e648a2$*\Rffff*0T58e648a2$*\Rffff*0_58e648a2*\R1*#3e4*\R1*#132*\R1*#13c*\R1*#13b*\R1*#126*\R1*#289*\R0*#13$*\Rf *.( 8$H X7h$x       (  01P(h  "  0 &  0 P` x" ." ( 0 8X p& .>   ( H 3` *Vx         ( @  X  p   DT      .0 ` ,$h   *      ? ;   "H  @ 5P 0+p (# &! 0   40  h  x "\       *  . *8 Hhp  x .  (8 @4X   ;   0(H  `#x$4B$4B(  0P p "x <<6 6 6 8@H P6Xpx 6    "( <0<H6`x 6 6 6 (0 8 @ B H jP,  (0 8!@X,h  0i   $,@ H'X0ipE 4r ,5>H ` p    "  D8 @`&h .> 30*VH   x  7 & *  (08@H P7X &p *  7 & *  08HPX`hpx   (  ) (C) OfficeHelp 2008 - www.officehelp.biz MONTHLY (LIST) CODE MODULE046]$EOmmitted for faster DEMO Results when generating ALL formats at once.ut She]$YThis limitation is only active on the DEMO version with the "ALL" Calendar Type Selected.]$To get a full 12 month DEMO, select "Monthly (List)" at the Calendar Type cell near the Run Button (Cell F5 on the "Input" Sheet)H]Q Fast Demo Limitation - If it is a DEMO for "ALL" calendars, create only 3 months '  Z \ AllG ^' j kk Get Start Months h'  'B $"'# Create new workbook with 12 sheets T!Z.` `B@V: `!!X'  `!B@Z `!!X' Add Months to Sheets         A@$d@      A@&k  '  X'  'k Activate First Sheet `%B@HXA1$B@Hop]@Xp=82434 Get Start Months h'  'X $"'# Create new workbook with 12 sheetsXad=p T!Z.`X `B@VXX `!!X'  X `!B@ZX `!!X'p Add Months to SheetsX      A@$HX  'o0  u6St'  '%3k Activate First SheetX `%B@H~A1$B@H ox* Make the monthly style calendar - 1 month]`]x] 8p//]  G  'j6b 'j7  j$'X jSunday $',+6X+6um'8d0 $',$Weekday(Auxdate, vbMonday)+6te+6 D'8k ' Get Max days functionndar  $*'*eed, C Select Output Sheet?Re f'H HGEvent Calendar'Hje. ' h -  h   H'HNSd h  H'Hk HG f'Hjbal va Apply sheet name : `%B@HA $l-  : `%( Set Gridlines GA@`j Set Generic HeadingsA:AB\( @A@>B:BA@>C:C A@>D:DKA@>8E:E?A@>3:3@A@J Insert Title H -  $l ( )B2:D2 A@X Make Day Squares'.F'0F'2 . * 0 2$ 0 2 $$B@HA@<  ,$6 ,$6  Weekend T F!uts 9  9q0k( . 0 2$(pu 0 2$B@H Nam A@C5 ,$ 0 2 $(f$ A@ CVh 0: 0A@J$ .   0 2   $>': :-G'4cG :X '4j 4 :- 48  ) Multiline - Adjust row to shoe all lines 48 ts- This is the "No Color" code, not a multilined% 4'4!'d 0: 0$L!@B@B h 4'4F5 k@k8 4 $ Holiday - Color with category colorZ 0 2$ 0 2 $$B@H F! T 48 G 4'4j 49  9qkx , 8 0 $ 0 $$B@HorA@Dk  Next Row , ',p , G',j 0 '0r . '.d External BorderG2$ 0 2 $$B@H%A@D Insert Special Day List% .z ' $\'JG:G$D!FB@B 0 J G 0'Jj J 'JC3 .z% Return to cell A1A1$B@H! Set Print Area $NONEB2G JPORTRAITA@p  d% ` :A@2C7d B2D JPORTRAITA@p d  d% ` :A@2G7k Set Background Picture G A@jX o   F%(   F%(Th  F%' 9 9 9 q  F%! 9 9 9 q   F% z. 9 9 9 q   F%C77 9 9 9 qp   F%G6 9 9 9 q8  F 9 999999 99q o H   F%(C8   F%(!  F% d 9 9 9 qh   F%! 9 9 9 q0   F%G8 9 9 9 q   F%% 9 9 9 q o d Copy the Day tasks into the calendar slot - returns true if there is events of the holiday categoryFiles,]0H` ]x Set start variables 'Z'X'^   .$'R RX$d'T T,$f'V  Loop tasks   V VnG $VX   d%%!'b P '  Max lenght set - enforce b P G b P$'bjk X b'X' X $n'XslC $VX   d%%!'\ L \$ $B $VX   d%%!! 'Z!k ^ '^ X G X X $'Xj  X H J$( NA@% Z ^ -'`d%d` ^ G'^j A Z ^X '`k( `'>i> Insert coments on the non-generated months (for faster demos)] Select Output SheetYe f'H HGEvent Calendar'Hj ' h -  h   H'HYed( h  H'Hick HG f'Hjd% Apply sheet name : `%B@H% $l-  : `%(s Set Gridlines% GA@`j3 Insert Sentences$B@H d h F(! F!x'9Arial9d999999 9 9 q$B@H j F( d F!x!9Arial9 999999 9 9 9 q $B@H' l F(j F!x 9Arial9X 999999 9 9 qp Return to cell A1A1$B@HSTo80Attribute VB_Name = "Module7" ' (C) OfficeHelp 2008 - wPww.oTh*. biz ZMONTHLY (LIST) CODE MODULE>Public Const C_DEMOFAST_M-1yOmmitted for faster & Results when generati@ng ALL+maat onc,e.i2iTh`is lin$on only @active$ the=versBiwith "";"" Calendar Type Selec+]?3?oct a full 1`2 mon/v, s% " J(List)9qKGet Start B[.Y@BfSTD7CnM@ + 1FZ= #sPerDay(nYm#2 ' CLnew workbook sBS`NewB= WDs.AddsC .AAd`C= E#".CountWhileH0(1).Range("A1"y >ؕ_OLD_蓥6C'!k_u$<&_ut_u›_u_ux_u_u=:߼on/c nR5c? Out'z5= rPlanq6LmEvA0 Ҍ <>)\C & "p@"p(iQ)Cut/1 V Len(y) >= 35utppN n .M_`8r{/A.RP=/ӧ2 56^MultilineAdjust row to shoe all 00-r '`is @the "No '" code-ot a mE5aa = Ab` A&o 9 D).Entire.AutoFi ar%>`5H-C$ wAcategory%l͎ߟ} {d@Y-1 *4k%- A `ndBorderdD> 42: 4Em31, 4m1e_ @'0xt (7?]lRaUAT > 7 17|Pj+ )3 Wu#' Exkal '?:UQ 9Speci`[`rXLeg0 ]4jj3sNL N B`InputWhatToK s("G:|G"5CCkCV> >h\ qn Aux R' Return[2c AT"A1 >ePr` AreaS U Case(|) <>@\ONEk?%PB1ѩ"Gx , "PORTRAIT"GxARerHea8Foo%s@,isBook.ssֲ7dR3k`/ x "D/ / / ABTh/ t/ k, ՚C 'Ut Bac kgrouPic4BGFP!$ G aOSubP ` (sCw]6s(xlDiagonal@Down).2Sty= xlNon UpudgEdgeLXeft|Cinuou؇.WsO 0hdxl1}maticWb_ 'Q TopO yO O A11O t:oO h# O H Bot  a0   P+Rao o o ?o o iܶ th With Selection.Borders(xlInsideVertical).LineStyle = xlContinuousDWeight!>Thin2ColorIndexAutomab"End  HorizwalAlignmenkCer(&WrapTex"False Ori*PonX0 Addc=A LevelShrinkToFi6Readin|gOL;MergeCellNs; S@ub  Week('}Diagona@lDown)zNonFYUp KtHEdgeLeftMediumJw%Top%®%KBot&?K9R5?9u _Funš CopyTasksList(nDays As Long, nMhYhRowc7Use9Boolean, ssF@A, MaxLabelChar)St`g ' the  t intoBendar slot - returns truPe ifars nts oB holiday category Dim dDa, s"g, ll#ArrAuxnOutC G nMultilƈDC Aix' Set start vari0able= s= ""F=,teSe` l(nYa?`AU"= GetS#(C%(")@#Split(#, ","daLoop:#For,= LBound$` ) To Ut"% = LNk.Sheets(InputbName).Range("G" & C - (ll))).VHaluxnIf|*> 0@e{'QP len}s- enforcCqLen( ) >Then  _<3qAHIf!Ahr(10sv+C$@DBOr UCase()` #!H:w $/B t Int/or. xG 4+ 1CN։82 6, !)L1(nW8p )11\UYVSUA Ap > 1[sAHC-$CE?ZKbL= -62*$ ia lkMakeALLComKRSZk"@sC1V4C23` ' c@ coQdnhnon-genDerP^d mmhs (`? fas$ demosfNewvHq !] p+  =PlanM`L""S&mEv@ CaJs+4SdM <N\@T_E"*15Vc`0) [% [/i# 3y6= 3Z ut' A@pply sQc ^nb dnb).c/ts(%+2M"- |nY S}Grid4} SF_Peos. x+SencuE3, 2 ̂p2!GA ldTrsr.T"A&Sdiza14(8kethrough' 3up crip/ .Subs .@5RR=Ishad9e .Underline = xlhSty leNon CoPlorIxVAutomaticEnd WithCells(6, 2).Se0lect.io@n.Valuts,C2< Fon3.BoldvTru NamC"Arial"#G.Siz11 triketh rough%Fals &Super@scriptbq OutYhadow ƽy 3{9"?e `e|j?el?e?āO@C' Return to c ARange ("A1" D pSub$ x(Uqxh%lCVh%lCWh%lC3 q6h %x $ x(Uqxh%lCVh%lCWh%lC3 q6h %x $ x(Uqxh%lCVh%lCWh%lC3 qx $ Qxh%Xh%Yfh%Z(h%[fh%\(h%]fh%^hv%_fh%`cl|<w$x(XlTF%i%i%$ X0C550 l$ 7lPlHLCDtlHf qHlPlH1DlDCx$@w(xTL@lXD,0XvCx lx0Cxvn>v#t*#pv#l*#h*#dlx*1x2 tplhdv#t*#plx*1x2tplxJvCx3LiP%`" X  ` d L)`LV*#t #p*F<%LiP%`" X  ` d L2tp)`L5< u H +* !7(P%(%`$ X``5&FP%` $ `5`*` $ `Wk1oWYihx Q kQVyVV9YYY)RZjAZIjyZqjio 3?L:@X 5 _ [_A```__`P qh31 v01 qhvqtvqp t^ql.P 'T%d$ d (QP d " X 0 $Ld" X  d 0 lLqxdlx *7P '%',%'<%'T%d" X  d ( )dP$Ld" X  d 0 lLqxdx dlxlhpllxYLpt = CC  ClxYLpt 2 lpqplp  qpltqt xf?1P(T%d" X  d d P)dP(d'<%:T%$ ddtP$w  dPvqtvqp t^ql.T 'X%h$ h (QT h " X 0 $Ph" X  h 0 lPqxhlx 7T ' %'0%'@%'X%h" X  h ( )hT$Ph" X  h 0 lPqxhx dhllxYPpt lpqplp \ qpltqt xf 1T(X%h" X  h d T)hT(h'@%:X%$ hhd$w hT $   qXlX  Ot\5 v0"\M@  "qp5 q"\M@  "qp5 q o\l l qtvCx lx0-Cxv|>v#*#v#*#*#lx*1x2 v#*#lx*1x2lxJvCx3i%" X   d )V*# #*F%i%" X   d 2)5 u V + ! \( @ɤ"C #/ɤ$C #/ ɤ%C #/Kɤ&C #/ ?ɤ'C #/ @ɤ(C )/T*+Clx*#*#,*# #*#-*Ǡ . 2 ql qh qd llltlhi%ldi%$ Xlhil%ldiL%$ X,(,$ ()(6, /$u0lplp* $ W1qv2i%lC3%lC4 q?llil%lhi%ldi%$ XC55;lhi%ldi%$ X,5, 6 7Hlp8Fl%lhi%ldi%$ XC55 9 75ɤlh#:*#lh#* )2+;9<ldYhl ll = 1 l 0 q0 l Pq0!l0l 0l08l0- l0q0\lh#:*#lh#*F%$ ,=>?26, l0q0l0lhi%ldi%$ Xlhil%ldiL%$ X,(,$ ()(6,* $ W1ql08l0q0l0i%lC3%lC4 qlpllhX(%(%$ Xlhil%(L%$ X,(,$ ()(6, @lpqplp qplhqhllqlv(%(%$ Xlhil%ldiL%$ X,(,$ ()(6, @ vABYYC^D qT;:E%$ `=F?6 lhlT lhqTlTqT vGB('%:%$ #CM@ H:I]@5 4JCKlT#*LC M 2BvNF%"OX   d l l=P(( Q )( 4JCRlT#*LC M 2BvNF%"OX   d l l=P(( Q )( vS= S T LLLL L@  ) M@  w to@(  8@@  is t@  not @ '@ @ B@B@ F5 @ @ ay -@ col@`  @ @  T Fr~4@x 9@x 8@h @X $@H @pD `Row',p@4 ,j@''0r@0`('ernal Hhf$l @, @( @$ l Da@ '@ J@ B@( @@ @ @X @ @ `p>@8 G@`G@ (O@` PO@t x8Y@p``YPp|  `@` d@@\`0dlh@hL Xi@H`@i@8 hn@4`n@$ s@ ` s@0 Hz@ X0z0~Dd\d@J` @ h2@ H F  @l @`\ @X @H @8 8@4` @$ @x @ @  @ `  @H 8@p`` @ H@`p@ @`@8 (@``P@ x8#@``#@| *@x`*@(h /@Pd`@/@xT h(4@P`P4@@ x9@<`9@, >@@(`0>@h XC@`@C@ hM@`M@ R@0` R@X HW@`p0W@ X\@`\@ a@`ahH(h@Ft@T @P @L 0@@H X@hD X@@4 @$ @ @ @ @ @ @ @ @ @@`h@  P@hhpPdZ@( @ @8 @  @ @ @ @ @@ @X @ @ @ @x @p @h @X @T only@D 005.pP#X!! h#p"H!"`! F@!L is i@!< tion@0!, for @" ther@p! ced !H!o get @" ersi"p!e "GET@! TED)@! on @! of @X" e Re@" d is@(" he r@@" utlo@ ents@ mes@# atin"p"ther a@(#` to ""look a#p!It wil IF you dAL@ LIMI@t ing @##"ow num@p` ind#(#"der '[@` e fo@\ `e exh#&nt Lis(HhH$$`$x&(&P&0$@&vAu H@ %x hed.@x$h nts @$X w nu@$H Inva@$8 e ST@$( IF y@8% ts E@% ill @% out@% OK t@P% sto@h% vali@% *' i@% to @% @% .,@& @ z@p @` @P h&(&@L`P&Y ER@D ListH'`'x'0'Fva@@x @'@'h @X ATE.@H PH   HX*\R1*#284$*\Rffff*0[58e648a2$*\Rffff*0T58e648a2*\R0*#13*\R0*#1*\R0*#17*\R1*#3e4*\R1*#132*\R1*#13c*\R1*#13b*\R.>P 2U 16( @X  p:G4A&B6^0hpx  *   6A 0,@H  x^   6^ H #Xh,Rp8^       *( 8 @  H  P  `   Bx $       (  (H h  "p  *       *   X^ <X <p 6     6     6     ( 60 H P X  `  h  b )   0  08  h   4_  4_ X `8_p 8_ 8_ 88_H     1    J h. "3G  7( @ " H )P ` *x  <<6 6 (0 86@X`h p6x 6 6 < <86Phpx 6 6 6  (60HPX `6h   )<<6    6( @ H P X6` x   6    6     "  0 H%`  8g &V   8 @"NX * $    "  0P p x!"' *[,c@*[p*[*[ Hh(Xp *(X *   04:P6s,c*[ *[@*[p (X *(X *8X`   "  .@Xp   6 J   8X%p* .+ "(  *8  H  P  X  `  h (0  )  2  *  !  ! !! !(!0!8!@!H! P!X!`! h! " p! x!!:! %!!!!""";";0"6H"6`";x";"""""""" "#### #(# 0#8# @# " H# (P# 6x#6#6#6#6#6#6$6 $68$6P$6h$6$6$ $ $) (C) OfficeHelp 2006 - www.officehelp.biz Version Code! YEARLY PLAN SPECIFIC CODE MODULE New Calendar Style]@XpH h't h'v Demo Restrictions TODO demo Z t  v .com x h$z and  |$z.   ~A@'t'vkkIf ItsADemo ThenSc If (eYear >= 2011) ThenX~ MsgBox MSG_YEAR_DEMO & Year(InputSTDate) & " and " & Year(InputEDDate) & ".", vbOKOnly + vbInformation, MSG_MAIN_TITLE sYear = 2010| eYear = 2010 End IfEnd If% Make calendars for each year on list v t . t v .A@k Set Background Picture G A@jo]0H`x]] 8]p Select Output Sheet`AWorkbook' f'H HGEvent Calendar'Hj  h -  h    H'Hdx h  H'HkX HG f'Hj  WorkbookG T!Z.`j `B@V `%B@H H `%( Set Gridlines GA@`j Set Generic Headings  WorkbookGARQ@A@>j  WorkbookGBA@>jMonthB  $(B  :B  $B@H F 9 999999qP F! r9  9q( ~A@ A@  WorkbookGC:AGA@>j Insert Title HB2:AG2Arial hA@f Make GridB  :AG  B  :AG  A@ rA@ Insert Year$C  :C  $B@H A@Z  ( Id'  -  h  ((kXC  :AG  $B@H F 9 999999q F!C:C r9  9q ~A@% Insert Month Namesb` '  DB@B   :B   $B@HA@d   $$' 'L $l'P A@d  G L 'Ljd P ( L)'Pk P ( F!K24: p9  9qX |A@tp://s   +<ober G L'jS33:B  :B  $B@HB Make gross border on months   F%(Ti   F%(  F%hA@ 9 9 9 q@  F% LA 9 9 9 q  F% 9 9 9 q  F%l 9 9 9 q Insert Day Numbers LA  dC$l  $h  :C$l  $h  $B@H  ( A@H* ---------- CHANGE TO MONTH AND YEAR ORDER Paint Inexistent days't  p nFebruary has 29 days'|AF$<:AG$<$B@HAdFebruary has 28 days'~AE$<:AG$<$B@H$lk rA@ AG$<:AG$<$B@H rA@'AG$<:AG$<$B@H rA@AG $<:AG $<$B@H rA@undsAG $<:AG $<$B@H rA@j G A@j   <A@j Freeze TakspC:C$DB@H Hea d( Increment PlanCountC If InputSplitByLayer <> "Workbook" Then PlanCount = PlanCount + 18  Insert Special Day List   $\'JS Set Print Areaf J !A@W  d% `A@2 Move cursor to topc$B@Hqo $B@H Set BG Color F! 9  9q`   F%(lh   F%(   F%lh 9 9 9 q   F% 9 9 9 q   F% 9 9 9 q   F%+ 9 9 9 qP   F% 9 9 9 q   F%"Y 9 9 9 q   F%(   F%(@  F% O 9 9 9 qx   F%06 9 9 9 q@   F%$ 9 9 9 q   F% 9 9 9 q   F%$ X 9 9 9 q   F%) 9 9 9 q`  $B@H   F%(U   F%(  F%Xf 9 9 9 q   F% \ ] 9 9 9 q   F%ql 9 9 9 qh   F%qd 9 9 9 q0   F%lh 9 9 9 q k o ]h] Set Start Date   $'lh  `  $ $G'cG'j    $!! '  =j Is valid day v  Is Weekend    $!H' F! t9  9qXkPd $'k0( o]`x ] ]8Ph6L]<>) ' Set Main Dates   $'>= 3   $'r{/d $'S' Get Task Data'FaG   d%%!X 'P"A:B   d%%!! 'C:CE   d%%!X'4 X X G 'jh F   d%%!X'Y ) ' X X G 'js nC   d%%!X '= n8Ma Check for empty tasks), 'E   d%%!'  G'jF   d%%!'  G'j  'F'ueAG   Insert main cells data  X X X X   X <A@ st(G   d%%!X 'B   d%%!! '56ҶE   d%%!X'00 X X G 'j codF   d%%!X' D)C   d%%!X '-C Check for empty tasks 'E   d%%!'  G'jF   d%%!'  G'j ' X X G 'j[  '4j  ' Z  G'jk80o(]Xpurn]P( Check if task is within calendar limits   G|jIT"G   G|j@,isB   G|jdR3 G|j/ AB Calculate Loop Bd  $'.!$D if task is one or more years, then dates are wrong or empty - leaveon .mG|jLXeft Loop each task daydxl1}m  .Q TopOd  $' $ 'a0' CalRow = PlanCount + 5 + Month(CalDay) S $ $<'lIn Paint BG Color on the cell  $  $$B@H F! 9  9q Deadline marker  Gd $'j   $ $ ( F! 9  9q F 9 999999qkko Set Print Areah r $!:  $! v!x(z v!x9|9~9999? %9? %9 %9 %9? %9? %999 999 99.PaperSize = xlPaperA4 9 99999qo! Apply supplied font to selection ! F!x( ! F!x( !  F!x(  ! F!x( ! F!x( ! F!x( ! F!x( ! F!x( ! F!x( ! F!x( ! F!x( ! F!x( ! F!x(oH@Attribute VB_Name = "Module3" ' (C) OfficeHelp 2006 - wPww.oTh*. biz ZVersion Code"YEARLY PLAN SPECIFIC CODE MODULE%New Calendar Styl=Sub MakeYearlPlan() Dim n As Lonpg, s /N`Lineso 3= InputSTDat9   ' Demo Resctts TODO dIf ItsAThen ! (=<4r (:>5) MsgBox MSG__DEMO &* {(`) " and "EDo.", vbOKOnly +InformaA3,MAIN_TITfEL^43AL@5GEY!If'G'AAGB=C11 CBA C@{tC!C109C AI cs d @each y @listŮ@I>=ľKForo B CPQjgNex` !I' Set Backgrou@ ""YSheetG! }A~"~yi{MaxDayFz, Ss, AuL@Finc!`axStart9ll@ Lo|opcsplitByLayerM"Labe (y(1# F>EventF -@Month F0Lb- { @&Els$VC Tț!Len( ) }s3S2((+Ckt0 OrIH)4ka B`67s.Add t.AvFݥ!s(1).Se";;5= CAGr8idl)C@UseF Fa` >e9SSeneric HeadingvpOR|Oc,&ColumnWid`&"App2.29_r]0 "1_QBQ33Range("B$4 )f ).Vxalu0/t0( (:(5;|Wi0CЉS.. Horiz5al@AlignmQ8= xlCer9tiphojWrapTexQ*Ori@qq(Indp]ShrinkToFi? .Merg@eCellsT|ru;Ac! .Int#o Aip orxWeekda0ZXt&PatnxlSolit5 CopyF@  }Bord`xlMedium, ('''nau 7-C:AG('s'Csert Tit1 <, "B2215Arial%6Bl,  <YRq/,"1 ,(17,b/Paint&/lor3fYЕ#7Ct)70Xl= Ml WB,.mulaR1C1%"S{i"'a Anp1В1*u_PfzG/Fp'qb/F/F/F./FH ./F 1./Fo/F./F8/F`~/F/Fd RE/F/F%./FB/F/F1 -O{L= &' For ll = 0 To 11 Range("B" & (6 + PlanCount,ll)X"::).Select!AuxMMonthIndex@(Start,!+ 1) .Ye4ar1y La be;Names(Aba)BIf b <>xhenJL< <L A& " (')"End IfActiveCell.mulaR1C1w(With ion.Interiorc.Color"WeekNumbersPat!nxlSol "" The("().ぇo;>a??*@-zA!z____2"Hk+! $I ?@y@ `y! 4 >K{b. If qSub h ` PWeekends(yYear As Longp`Dim Cloop5H, R elMWsDateq, WEFlagBool,ea0I<'PUt Start S=Seria*l ,Mh + 1, 1jsFor = 0 To 111ѳ = 13CTday()A01 Or ^7rUU = True Else'FaCf= s(6@ , 2 ).Int0or8 <Z^1' Is valid 0 +s[b52!Q_ Y a?141/0qD Dayu.(PatnSo?Q2A q4u)+Add("d"), ${=Next4:{:TasksYRAk:, Auxqs5Va2nѸ9Nam8String, 1p>E llQ?, CNT=S9aqCE/SD0lPQ qW`PercDʑD oubleCResourc~ CPFpgory Cnt! Real? kEmptITes"G!RowcK= Spec0K? a"NMainM*#NtN edUR@D@QR_Z6*-T `' Getb"A a_C $P>(sk.Sheets(InputNa۵me).Range("G" & StartTaskRow).Value) PColor = ThisBook.Sheets@(InputN aBInte rior.Index^SDate^C($dE8If N`) *<sg)fen o? KE-KFKReal9-;Z) >Z|edZ! ZC!gory\St r%C-' Ch eck fempty tUsE= FalseTest@"tGK"" OroNullt#Tru#r# ,= + 1: CNT@M0WhileB:Y@' Insert main cells aC DrawNsYR,JaLg)S,B yCDeadlineEj]), AuxLF !`9x& CV"Fgll+% B@  b a v Qj~-?A;(Ł"\! ?"q ze+S\BM|99-g%), ]= Max1&s[AwEnd IfWend Sub l `N(3%As lean, 2O q4, BO13>b[#FaPLong[PStriq;FQVariant@Dim DLooFpascntnDays !xCal@10Xal5  59if} is withqdalar limitD[@=uo  alculP AS= Abs(Diff("d"/#"1)' !hone more years, tq2s a9Pwr@ 1- =&vć3p/365.; eachdayFs!= 0 To O = A|dd  != 2@#(!S$= PlanCPount50Month Q'-~(Pt BG P on7 3C1,ool)).Select7W- Cion.}}.BG(LPatpnIxlSxoliH1HNex' ՑPprkerc`!C x<> [B.<12W=On1pUCas01E > A1Active .(m5R1C1JoK!% MaaBGo1 "@; .Horiz-alAlignme/= xlC'Eq.VicBottom.WrapT!#Oriat*P4=* _gkToF`YZٓG .MergeCells = False End WitfhTDIf<  Sub  SetPrintAreaYR(a As L@ong, bc d )Az'C D EpOn Error Resume NextActiveSheet.Pageup. (a).Address & ":" c, d +} -U.LeftHeaHder3"" C enter Righ(Foo( ( (Margin(Application.InchesToPo@ks(0.7>5`A5B61To p 1 Bottom CW 0. 7J0BingCGridlineCommdxlNoorizontal,lypL.ÙVertvOri@B}xlLandscap~.Dr(aft ' jperSizeBPrA4FirsBtnNumb`xXlAu9 cOrdxlDownThenOverBlackAn`dWhit Zoom.FitC`X~sWid1h T'agFGoTo 0ᐃCopyF`0(F!W' iy sujed f  to sele`on%S.A.Bold!,Col ."wIndexb Sty^l"+rI`Mic CNaA2Out`A gLF.3hadow SBtrikethrpough)su@bscripb`.@?t@bU4r!!bc F %X $ XH=C>X5H<%l%X $ XH=C>X5H6l%X $ XH=qXl%lC>l%lC?l%lC( q6l%X $ XH=qXl%lC>l%lC?l%lC( q6l %X $ XH=qXl%lC>l%lC?l%lC( q6l %X $ XH=qXl%lC>l%lC?l%lC( q6l %X $ XH=qXl%lC>l%lC?l%lC( q6l %X $ XH=qXl%lC>l%lC?l%lC( q<%l%X $ XH=C>X5H<%l%X $ XH=C>X5H6l%X $ XH=||qxXl%lxC>l%lxC?l%lxC( qx6l%X $ XH=hhqdXl%ldC>l%ldC?l%ldC( qd6l %X $ XH=TTqPXl%lPC>l%lPC?l%lPC( qP6l %X $ XH=@@q<Xl%ll%ll%l(C?l%l(C( q(6l %X $ XH=qXl%lC>l%lC?l%lC( q = )X'\%Fl%$ XX<%l%X $ XH=C>X5H<%l%X $ XH=C>X5H6l%X $ XH=qXl%lC>l%lC?l%lC( q6l%X $ XH=qXl%lC>l%lC?l%lC( qrU~| YW1W >5WAXPX!V?99Xp2AKD qALXXY9YYY)RZAZyZA4q4U8Z [Z!1[:Q[q[[[0QVyVVYL9MH[[\8!!\xqhx QA\\X!]`W 3)39VI:I]^q^9>^QMMMM)NaNNN9OIOOOOAPPP QIQQaRRRR)SISS 5 _)_I_y____A````XvqtvqpltlpfML@<  'l'@\<,: : 6<, l qt qp lpltltxlpdd x  xfd v=  0w\,<, lp CLv Ct lt0' Ctv v>v# *#v#*#*# lt*1t2  v#*#lt*1t2ltJv Ct'(]/lL 05. '%$  (Q "X 01(%"X  d)6ltF%(%"X  d) u + '(]/lL 05 RQ@ɘC /'(]/lL 05ɘC /B:%'%:(%$ ,6^'x%:(:h(XH%$ 6 hXH $ QD%D%D f%D!(%D"f%D#f%D$ c%D%cD* $ W&44q0v'i%l0C(%l0C) q0 * ++ ,5'(]/lL 05ɘ-C /@+Y$Y(.CY,/Ct 02:(x:1(`:(:1h(XH` 226hXH+' 3^'x%:4(:5h(XH%$ 6 hXHv o# i%$ (,R6 #*# *#v#*F%$ (,25^'x%:4(:1h(XH%$ 6 hXH $ Q%% f%!(%"f%#f%$ c%%c* $ W&qv'i%lC(%lC) q * + q X d x'%:(lXih:X(xHlXi%$ 6hHX$lXY,  7 "qH5 q@ lH8CDv 1lH l@q@(lD9*#l@#*#:*1D2"lDF%$ (,* $ W&ttqpv;i%lpC(%lpC) qp < +*(lXi"lH(6lHl@q Xf.^'x%:(:h(XH%$ 6 hXH<%% $ =C>5<%% $ =C>56% $ =``q\%l\C>%l\C?%l\C( q\6% $ =LLqH%lHC>%lHC?%lHC( qH6 % $ =88q4%l4C>%l4C?%l4C( q46 % $ =$$q %l C>%l C?%l C( q Xd '%4 @lXY, A(h:BX4 @lXY(H AH(%$ 6hXH)lXi%$ (, C + Xf l  _'%D(#*#1*#(#*F%$ 25q _'%E(#*#1*#(#*F%$ 25+' 3_'%F(#*#1*#(#*F%$ 25+' 3_'%F(#*#1*#(#*F%$ 25+' 3_'%F (#*#1*# (#*F%$ 25+' 3_'%F (#*#1*# (#*F%$ 25+' 3uGL l H(Y,M`l I1:J%$ `5c%$ D,.Y(("Y,K^L i53!Y("Y$Y(Y, M5GvNF%"OX  dY,l=P Q )7(%(%$ X5X|wpD4t`L8$tD(%XF\LT hXH| )X'\% Fl%$ XX*X $ XWH&88q4X $l4C(l%l4C) q4<%l6l %X $ XH=qXl%lC>l%lC?l%lC( q6l %X $ XH=qXl%lC>l%lC?l%lC( q6l %X $ XH=qXl%lC>l%lC?l%lC( q  pwX8|hT@,$XHT%v  T RTOth5Tt dLxdDVhM4@T S T($]/hM@ S (]/6TpfpfVlti4%lxi%$ XT=&A("qp6TlpkfNlti4%lxi%$ XTA"qp6T* $ WT&qvTi4%lC(4%lC) q$hM4@9UT VTOth5T xfDQ tfL<($TPvWq!v   R 'v   R 9U V [Xl#*F %vNF%"OX  dYAZK1x/)6 cl#*F %vNF%"OX  dY=&A("qX/)6 [#*F %vNF%"OX  dYAZNtd/)6 odN Otd[\l#*F %vNF%"OX  dYAZNt\/)6 o\t4o\N Ot\[4l#*F %vNF%"OX  dYAZK1@/)6 p2X#*F %vNF%"OX  dYAZ /)6 # :]/  d/p2X\l#*F %vNF%"OX  dYAZ /)6 # :]/  d/p2lqp ql k2J:lo4hTXo\podxNɀNɈ2 ]$s:XXlp#*F %vNF%"OX  dYAZK#T*1x2T)6 clp#*F %vNF%"OX  dY=&A("qX/)6 [p#*F %vNF%"OX  dYAZNtd/)6 odN% Otd[\lp#*F %vNF%"OX  dYAZNt\/)6 [4lp#*F %vNF%"OX  dYAZK1@/)6 p2Xp#*F %vNF%"OX  dYAZ /)6 # :]/  d/dp2X\lp#*F %vNF%"OX  dYAZ /)6 # :]/  d/p2o\t4o\N Ot\lpqpllqlClli]DZCCt 8PHw0 tD D@Tx,T |    / :6lM<@lML@U, ^,"ql5,llmxlld%lML@lx9U, V,Otd5,*(<dML@, _,"q\6,+dML@, `,l,"q`6,l`iL%l\i%$ X,l`i%l\i%$ X,$ )6,* $ W,&q iL%lC(L%lC) q xf od(,$dML@9U, V,Otd5, od(v)$*F, a:L]@6,t2l$ML@, a,$ (,5,* $ W,&ttqp `lpC(L%lpC) qp $ Q\L%\L%\ fL%\!(L%\"fL%\#fL%\$fL%\%c\( |4w\t`$,`K ih%iH%x$ Xx(Ab:Bi%i%$ XAb%$ @W`cCd)x6(`%x$ @xW(cPPqLx:h%lLCe:h%lLCf:h%lLCg:h%lLCh:h%lLCi:h%lLCj;D ?x$ x koDkh%lLClx;D ?x$ x koDkh%lLCmx6D 9x$ x koDkh%lLCnx6D 9x$ x koDkh%lLCox;D ?x$ x koDkh%lLCpx;D ?x$ x koDkh%lLCqxfh%lLCrfh%lLCsh%lLCtfh%lLCufh%lLCvh%lLC"fh%lLCwh%lLCxh%lLCyfh%lLCzfh%lLC{(h%lLC|(h%lLC} qLK8`(P4 x(`6H ah`%x $ xWH~Cx6hH6H ahc%x $ xWH~Cx6hH6H aha%x $ xWH~C(x6hH6H ah%x $ xWH~Cx6hH6H ahe%x $ xWH~Cx6hH6H ahn%x $ xWH~Cx6hH6H ah%x $ xWH~Cx6hH6H ahh%x $ xWH~Cx6hH6H ahg%x $ xWH~Cx6hH6H ahi%x $ xWH~Cx6hH6H ah%x $ xWH~Cx6hH6H ah%x $ xWH~Cx6hH6H ahj%x $ xWH~Cx6hHf4$w xhHHrU $`(`(,`00(`(,!` (/PI`$)Iay #,,,,(0,/8q`9I)9((((,`i=InrU $ `$ `0 `  ,,(0 `  ,,(0! `  ,,((I `((q `! 0nQzYzModule4c__SRP_a#__SRP_bModule5";13a 0 0 H N` "  %    0@  HCXp   2  &(Ph 3p   $1 ' Z8@ H BP *X  :6s  0<w@    "  <,  8 X p x 4   h 3@(KOBGxME<> LL LLL< p`h ho''`t`ptr+` k/`tDE`pDE`lwi 0`@o8ZZ?i XlcnixiMLSc`xx Xc`t c`p `l `h |`Xd lcn`` 9`\tp:/`8Xom/2`(T/Arr`XP$`L$`Hn`D4` @` <`p8 68`opPPi ii`x `t `p H`l ent `h `d  ``X `p\ `HX`xTok A`P Exc`L`H` D@`@  `tox[[i . IiOOK_i`x d is`t lend`p mes`l ok S`h `d `` k Ob`\k.Ap`xXP`hT.`PA@`L!`:H`<P@A@`>8 T`4d fo`@0 `( `B8& !`DX der]`F( "`H ` +Lx`t+@Dib `t+*`PkSiV %`xt`Xpp8x0` %@ 8 h &,d84@x @`  6@ P @ @ @ 0 @ @  @ @( @@ @X @p @ @ @ @ 4@ P <@x @*Xh  h 8 `x d@ h @P d @ T @P @ @ @ 0 @ @ @ @ @ @`H20@( @ @( @@ @X @p @ @ @( <: "@ @ @ @? x5@@ @Xx @h (,*.F@d @` @\ j@X @T @P @0L @@H Xp2 C@@@ Q @``0pXHF20@00 @ @ @ @ @ @ @ @ H(<: "@ X@ p@ ,*@ @ @t @8d h@T @ D @P4 @h$ \@ @ @@ @? 8/@ @ @ @  @8 P@P @h @ x2@P@ G@xph20@ %@ @ @ @ @  @@8 @ @>@ `<: "L@ @| @x (@t? 'PH2R@``LxH x`*x x @` @P px8   HX$*\Rffff*0]58e648a2*\R1*#54*\R1*#3e4*\R1*#132*\R1*#121$*\Rffff*0T58e648a2*\R0*#17*\R0*#1*\R0*#14*\R0*#15*\R0*#16*\R1*#13b*\R1*#126*\R0*#f*\R0*#`  h$ $( $8 ` h $ $.Q     (  &8 ` .p  P `  0x   @b 6  8 H  ` Lp        *   ( H@    (F       .8    R8            "  < &`            h( 3  $0 HXhpx$ .Q     & 8 HX   0 @H 6X   L ( 08 *@ p  H   (F0 8@ RH     "   <(,h &   (08  @ hP 3 $(@ Xhx$ .Q     0  PX 6h   L (8 @HPX @`   N X %x  "    8@"P  x   D]   0  8X`hpx B   ((&$ &H p x B  %   ) (C) OfficeHelp 2006 - www.officehelp.biz Version Code MOD OUTLOOK SYNC CODEG Vs 2.0a - Includes Outlook Appointment Hours on Imported Events Labels0 On Error Resume Next00 & ($0\]@X Import Outlook Values ,.d ,.A@$' 8 4 $' G|j0 X ' G 'j Calendar+ Import from Outlooks Calendar Appointments Y   X A@vbOKd Import from Outlooks Task List   X A@k 6   4A@|ph <    4$'*ch y < eS MsgBox Err.Description, vbCritical + vbOKOnly, " 2005 WWW.OFFICEHELP.BIZ - ERROR"und Pikop$ Detect the first free task list rowH]3 Loop from first task row until a free one is foundpE   d%%!X 'H' ent  'E     d%%!X 'Hx   'Hi`6 Imports Outlook Appointment data into Excel task list]( `]@Xp] Set Constantsj ' ' ' '. If Cat = "" Then Cat = C_OUTLOOK_CALENDAR_CAT>  a Resource Field is not used on this calendar - if active, Show message box about Outlook Security 2    0A@k Create Outlook ObjectsOutlook.Application$.PMAPI %.  %.A@ A@ !.d  %.A@ <!  Test if is is a shared folderAr  %. M   %. <! :[folder] $    "A@ | d !.kd !.kk ("  Restrict and Sort appointments .(oItemsRestrict.IncludeRecurrences = True(Set oItemsRestrict = oItems.Restrict("[Start] > '" & Format(DateAdd("d", -1, StartDate), "ddddd") & "' AND [End] < '" & Format(DateAdd("d", 1, EndDate), "ddddd") & "'") ("%[Start] B@$me* Loop to insert outlook tasks on task list'  :B !&d $ !d $  0 Delete content from row (start with blank line)   A@  Get from Calendar F Resource Field is not used on this calendar - if active, execute line  !('+d('k $ Add event time acordingly to option   Start & End Mak ( !&$,$* -  !$,$*)'  e Start Only9 ( !&$,$*)' d ' k G !0$.' cG' j G F' j      !&$2 !$2 !4   A@   'd If cnt = 30 Then Exit Fork80 Release Outlook Objects....o06 Imports Outlook Appointment data into Excel task listD YE]0Ht]`x]|]  Set Constants ' ' ' ' G F'j AE a Resource Field is not used on this calendar - if active, Show message box about Outlook Security 2    0A@A@kH Create Outlook ObjectsOutlook.Application$.MAPI %.  %.$  %.unds < !.d  %.j <! :[folder] $    "A@|(d !.(kk ("- M Restrict and Sort appointmentsop .l$l ("h [Start] > 'd $ddddd$' AND [End] < 'd $ddddd$' %8. p ("C![Start] B@$* Loop to insert outlook tasks on task list'  0 Delete content from row (start with blank line)   A@ Get from Calendar ' F Resource Field is not used on this calendar - if active, execute line !(''d 'k $ Add event time acordingly to option'   Start & End$ ( !&$,$* -  !$,$*)'  e Start Onlyert We ( !&$,$*)' d ' k      !&$2 !$2 !4   A@   'If cnt = 30 Then Exit For(  Release Outlook Objects....o 86 Imports Outlook Appointment data into Excel task list] 8Ph]](@Xp]d] Set Constants$l ' ' ' '   a Resource Field is not used on this calendar - if active, Show message box about Outlook Security 2    0A@k  Create Outlook ObjectsOutlook.Application$.'MAPI %.  %.  !.d x  %.9 <! :[folder] $    "A@| d !.kk ("$* Loop to insert outlook tasks on task list'  0 Delete content from row (start with blank line)   A@ Get from Tasks! 9 F Resource Field is not used on this calendar - if active, execute line !J'%d'k'H 9 Category Field is allways used on this calendar - get it !N$L'@9d@'@k0 @G H'@j G '@j G Perc done Field is not used on this calendar - if active, execute line  Perc Done Field is active0 !PXd'F!d`'kP !R'B@ B G'HjB@H !X 'D D D 01-01-4501  'D G'Hj9k !TX 'F F F 01-01-45019  'F G'Hjk` H9       D$2 F$2 !4   @A@   'kIf cnt = 20 Then Exit For Release Outlook Objects ....o]` (Not Defined)'h bGTask Not Started'j bGTask In Progress'j bG Task Complete'j bG Task Waiting'j bG Task Deferred'j 'Lix] V:'X X V:'X9 V X $' '*iAttribute VB_Name = "Module4" ' (C) OfficeHelp 2006 - wPww.oTh*. biz ZVersion Code"OUTLOOK SYNC CODEPs 2.0aIncludes Outlook Appointment Hours PImported Evs LabelsKPublic SubALATest()On Erro@r ResuN ext GoTo handleCancelAL A*ate.EnabKey)xl*Hr Dim Aux As Sng",RowLongS ' cuValuecSet ThisB= ActiveWorkb Main EGetInpe E; i8: 6 f@?18;msg@#BMMACRO_ESCAExcla?CP`-,d > 3HC ' .Descripz Critical "A5 WWW.OFFICEHELP.BIZ@ERROR4?*`?,~Fu^nxrnǃ'r the f!s free taCl`C rowCNT , aCIndem' ae!p `aC until acone is foundG# {& C("x.Shee8ts(Bb).Range("EaSpecialDayW{).B#e!= 0cWhile<> "D/Ac+ 1#?k?& /D WC 3o`[ACDC F~E(%Da`,  %*?@*ōA3data o 6el&S&4Objb, oF older/r2:Items APP>s@5sctolXquW0eQ 3afoUseONDI4,iAzq|strPePpaB ^Ti CKobjR/&p "' ~Constantge qF= 9 @s`%13| = SQ =jegory "fpt0Ys?~i_ {;!$S Y\Q 8q%Repl#?FOLDER_!`, "[]";vF!)r`S_MAINi2DˣKU2L&9&Ge81er< c..4urreQYTruľNl S ah@So@43'-' .("[] > '" & Format(DateAdd("d", -1, StartT), $"d")"' AND [End] <D~ ") oItemsRestrict.IncludeRecurrences @= True-S@ort "[]""' Loop to inse%outlook tasks on listCNT40@ Each N u0 And  Then13' Delete content from @row (s with blankine@CleanT|L(ineR+ z GeDCal`endar  bw Aa$ReplQ'2FOLDER_ERR[fr_]@&Crit l&%C_MAIN$1k 1Oer9ru*ksѻ2Xaabx-S[pI(_ .(u@//te//_/d$6 //0f/ ////k SQ"'tRow + CNT ' Get from CalendarpIf AllowOutlookSecureFields And False Thenf' Resource Z is not used on( thcn - if acti@ve, exdt@e line TstrU= oItem.OrganhizeE8"J"EaIf' Add event timeJordingly to optiouImportT= 3Start & G98Aux" ("No onds(Va0lue(y#))"7) | IT/2X/Only?/#k SaveTaskDet`ails BI,* iLvlFColorFDeadA, Date\ V,DSubj ecxs, 0,j Ȭ,t, V=1'@ec @@0b Exit FoDNex Alea@D8 O!sSINongF`olderQ APPU`I  a2s(1* As=+,` F6@Lo@ng) 'd s7 Appointm!tdata o`$cel t?s$DimGb"@5$ $F2fa !I$) @triA& olc BNT&oU@=@ DONDISa;A N0GQ #, dp0d 70V)PercDoneaDoublCompleBooSn, b*E C&Dxisa ! & CatEZ' a]Constantc_.= 9,= 13-6 =Kegorw?2f? +Shmessage box `about_iBtMsgBMSG_OUTLOOK_WARNING_0, vbExclamao JvbInforIOK`, /G_TITLE !v' CreU #7dCE)("t.@licb "BteK `Na`pace@("MAPIo]82p.D@efault(6" Subss "",! rWs;.BdZOn@ Errorau?`W^ 4s(  p.Numbp^<> 3e#1 ReplC!FOLDER_ERR, "[fb]"r)"Critpl"!C_MAIN ERmOer9%.Inc ludeRrenceTru' Loopᱞinse4esGf1c|0APz Each# In-' DeQcont1lr<(pKwith blankCaTaHL`,(K IF߿5 Iif@V1.OwnOc= Wc=S OX II\gallwa\ysˑҀXgi7$ r=0otusH/?j x azpFTrueBEnd xF /x6tW&4l5 c%l. qXllhttlXY| 5f'hWL`145 C4p0hWM"Y| N105: C0 l0 0QOC0 l =flC0%: hWPHdt(6t(hWQVp&5k&uRphWSK1 5l  0l T0  1 uU phWVK15l 0lT0S 1 uUSp k]l  @l @hWA04(`xBCDlXY| E(/x6lXqX hutchctcdcx<dwLtp4hL 0dlx`tH$xWCt  XCt 6YCt LZCt bt x\CtltCx,wxt d ]qplp ]qp%lpl M`@P ^ P`1t5PltCx,d,wxtPM)4t5$  lQv%*+ ,1'':-N>F /6tW&4l5tW&4l5 c%l. ll` c%`.:/%`0 qXl`htbhW1l M@92 3phW4lM@92*#17*\R0*#1*\R0*#14*\R0*#15*\R0*#16 0 0 H B h &p  *5.5  Dh( p x B  25@?:?$0P @x8K654?(6?`:?2545H05P05   B 2  8:$PX-2!@ `p"  B be P B X H`rU~|  _?999x ) w5y:v ! i >JJ9V`h2 3)31 wq{wAxxxxyayyAA|QzYzzzX!]zz[|q X[{!}}I{9~A~~i~q[~YyI 9{AI19M?DK]% x$ x <xx$ HQxx$ HQx`  ^qpC''''pM@:0N  :PN@@ 1t6 @ lt 0 lt*#P1t/lt3 lp1t v  0ltPY  %ltPY  3'':0N  @:PN@@ 6@ $ xx lx1'' :PN@@0x^ih6@ $ xx lx 4Zth`x,x@ |(s : v#h*F@%PvFT%d"X d dP AK#*1p2h)dP6 @ qt lp =ltqtw : vlt#h*F@%PvFT%d"X d dP AK#*1p2h)dP6 @  vltqx((wp,hdP@   q\ qTl\qPvCD(f'k3'':Np:N 6   ! 4x5:"%x#4d5P@d$4p5 v% 0pW&4l5K%@p'4t5$  lK%@d(485$8 @\@d)4t5$  lQv%*+ ,1'':-N>F /6tW&4l5tW&4l5 c%l. ll` c%`.:/%`0 qXl`htbhW1l M@92 3phW4lM@92 3cx'h6lXY 5(f'hW6`1H5 CHv78hW1 9`d :#`*#\;*#PhW4X 9`T :#L*#H<*1@2d`\XTPLH6v7F8hW1 9`d :#`*#\<*1@2d`\6 C@ lD 09 hW= >`1<6A C< l< 0V?C<hW1 @hW4d @hWA<H@l@Fx``BCDlXY E(2d`6 xlXqX humchctcdcx6C< `wHp@H<hL(dDlx8`tPd`\XTPLHxh q` qXl`qTvCH lH 0;?CH0f '3'':Np: N 6   ! 4x5: "%x#4h5T@h$4t5T@h$4@5 v% 0@W&4p5K%@@'4t5$  lQv%*+ ,1'': -N>F /6tW&4p5 c %p. lpd c %d.l M @92 3lM@92t 3:F:GN H:I:dGNTTtD HD4:$J%pK4d6tTD4 c %d.: /%d0 q\ldltl\Y 50f 'lW6`1L5) CLv78lW1 9` :#*#;*#lW4 9` :#*#<*1D26 v7F8lW1 9` :#*#<*1D26  CDlW1 @lW4 @lWAHLlDF t`BCDl\Y E(26 tl\q\ luclctchcxXw@ @D    y !"#$z&;()*+,-./0123456789:%<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`ace.fghtjklmnopqrsbuvwx{}(S/OB)xME8> LL L<<<P+\`k@i^ `i`tib+`0` ki wiid `t+hP`X Tkp/il `r`np`pn`l`rj`th`vfE=``dstri+f`` kAil {ivinix j0` 4kP Giperiaiz{ii|p`d`~``\`T% `do##d`t`p `dk--i i i`x`t`p`l`d`\`XX`@T `P `H`D`@`<`4`2 ` ``H ` `p 00P Zx%`@ p X8`\xH `b@d @T @D @ 4 @2 @ @   ``x\? ::fhj?@8 d @P T @h D @ 4 @$ @ " @  @  @ @ @  @(  @@  @  8p H 0  `ht@> ::?@T  P 8  `ft( >:@h d @ T @ D @ 4 @$ @  @ P@jl : ?@D @4 pP0h&,dNJ@x @` HhL@HP @`@ Z@x0 @ Z@ @ @ @ )@ @  @8 @ @ @ @ @ <g #8a@t @*d `x0 (@X\f2@ @ @ @ @ @ P6[@ @h @@ 8hZ@ @x Zg @t @ p @h )@d h( 2 dLe6f-@ F8AkE@loD[Ak, SpeciaDaysBoolean qh5@aiG& DateSerPial(`1>& "@New $'s y|PNDow(CLng), 3, 2) Martin Luther King'2 Presidents '@OEt|er4 %"1'CD@O15, 4G1H:QALeMonth!)o!h1j*7I ndepenc6e 92LaborA90 F!Columbu/AA@)5ThanksgivXA5 1 1@rKVetnvJ2dChristmalyfJ5 D14cValVixneseFd.3$HalloIfŋL dyAIntege.rB!'ccH, NkijlMd#c@y \ 100cN@9 *T (B9k@("c17)@25#ic`4UBk!31NKi30 i30 ! A(h28)1! 269 +(2]!N*j0 y@ 4pi02^cpr aj`7Ցj7ljsM (l4044dIQ28p31M4 2y, M, d=jPublic ek BF#_1|#DOWX' #, (q Week`( 12(1 8)b)((N04* 7)@ o k o\"P wm]C|NT Qturn o  ,4LT < 1Sd6=``c Q91Add("d", - Y`DEPa\Ra5O{PS= $CWhileq) < RZ!ќ<= 31= & R1 !1=p7 40W! *Po.' In0sert; q4=Subs(' On ErrResu0NextUGoTo |dleCalIH App`Ba.EnDabKey xlHan@RowE-u,1 mpo 0look uue@ SetisaAveWorkb!Main'Uo QInput$ *@ctFirstEmpty 100Box(MSG_HOLIDAYS_ROWQTITLE, 3%@"TExi 3' Box Err.Description, vbCritical +0OKOnly, " 2005 WWW.OFFICEHELP.BIZ - ERROR" Resume Next En0d If0Su b InsertEvents(yYear As Long, UseHoBlStriL`ineTo$) Dim TaskNaq;+Index @lN1^CNTF"SDXate ,,Ea ColoT5DpeadlOAAuxDays 92PercDon4ouble5ourc cCJ0gory .:Cnt .Real YEmpt BooleaTesVarian@kS-Li2i , oop Dl}' Main Code l - simil|to iBt@rs() but uses l"from hoxlidSCE*=6 ( , g@AIfB,= "" ThenA' No active % Exit SAA Else#?= Split(sD'|" SetCFsCs= C("1/ 1/" &3edw1D Add("d", -1,   c$= k: c= 0F]uxL6Bound) To U*ca F("`Aa ) #@%#!Rx O(1)#p=:to =bρ ye$(0 B,) </0@ Eb K Cn[ ! fyD| ky=gGJ) >D;\G =>G' Dele`cont bmrow (start with blank`qne0CAF ll m~@cells Ua!'SaveADetaill, >08 CTaVValue(a/`FCaG"A-\+ 1]c __SRP_c!x__SRP_dModule6'x__SRP_e &i+rU~|  759>y Aу?A\ ! iɆ YA\X!]?999x )wy:0q >JJ io3ɈH@}9,Ct#l Md@T T:D]35T?+2l 1t#l Md@T T:D]35Tt+2l 1tBtMd@T  T:D]/4ltJ '6T <JtMd@T  T`1t5TltCx l,wxtT4XCt5ltFT d dD:4 $`1t6dD$?ltFT+++ +" 4d: D`1t6dD?ltFT+++ +" 4d: D`1t6dD0ltFT +" 4d: D`1t6dDKltFTYYY Yd dD:4$`1t6dD$5ltFT d dD:4$`1t6dD$?ltFT++ + +" 4d: D`1t6dD?ltFT++ + +" 4d: D`1t6dD?ltFT++ + +" 4d: D`1t6dD5ltFT d dD:4$`1t6dD$5ltFT d dD:4$`1t6dD$5ltFT d dD:4$`1t6dD$5ltFT d dD:4$`1t6dD$ltCx ,wxtdD$L  dpr  ppkrpn$krkrkrknkpplklklpl-klklklklkp pl!  klkrkrpjkjkjpj klkjphkh(,pfkhkfpdkdkf T TOtt5T ($w Tle d (DdT  T4D$U  Ott6dTxl$w dT4T \%D DOtd5D$dM4@9D DOtd5D#D DOtd5D$dM4@9D DOtd5DodtT q`l`l`>"dM4@D  D"q\5D l\odtTl`q`$dM4@9D DOtd5D oT4ldHT(wlD(KA% x$ x <xx$ HQx x$ HQx` ! ^"qpC''''pM@:0#N  :P$N@@ %1t6 @ lt0&lt*#P1t/lt3 lp1t ltPYv'Cv(Y ) /3'':0#N  @:P*N@@ +6@ $ ,xx -lx1'' :P#N@@0t^+id6@ $ ,xx -lx 4td`t,x@ hl ' .1 l0%S,:Nl /5"0 #*#2(0 #*#29 qp ql5IL5IdbI@:1Nx /x /6(% K1x5v2qX(% Ntd5odN Otd(% Nt\5v3C@o\t4o\N Ot\ p 4lod# 5o\# 5@CddhxCppXYtp 6(2pd6lpqpllql fThP8 t D @Tx(pdxMrU , `9 0(, `Y (#( `y  &8 `y     &&&&8! `   (((($I `0q `   (0(nrU $`$`8$*\Rffff*0_58e648a2$*\Rffff*0T58e648a2*\R1*#3e4*\R1*#132*\R1*#13c*\R1*#13b*\R1*#126$*\Rffff*0X58e648a2*\R1*#289*\R0*#13*\R0*#5$*\Rffff*0W58e648a2*\R1*#11$*\Rffff*0[58e648a2*\R0*#f*\R1*#303*\R1*#a4*\R1*#32 0 "0 RXf "  X (0 8X` h   *. $ 7$(8 @`x  $= ')d`OBxMEL@8x> LLLL   X@ @ @( @ %@ ,@@H @ @ %`D@ DJFzC@ L@ H0L@@ @Xt C@pd @T C@D @4 C@$ @ C@h F@ `Xe z\p~ @ @@d28Ph8pP`"x`8(@ @P @@@ H p@(XXp`xX %d@T @P @ @ @< @@8, @h @>@P @ @ @ H(08PX8@P`x`8dfd@8 @0 H@h @ @  ( @ @D P@ @ @ @ @ @ %@ @ p@ @( ?@p| Hp@x %@h @X @T @D @4 @0 `0`dxHda@X @HT @xD @@ @0 @ @ @ @ ` 0`F@l @D@\ @X @T `x@D @4 @$ x  @ ` @`@ @(`@P @!@x`h(! @ P& @`x&@ C0@` 08aHxlAue|F h @! !!!F  @x PU@h T@!X 0! @!T`!!@X!D @p!4 h@!$ Ȩ@ @" M!! L@0"`PM "! Q@X" QH""Q@"`p"0"@" "X"@"`""h@ h""(@`"h(  H #($##|LpLK@x 0L@#h @#X pO@$H N@X$8 @@$( 0R@p$ U@ @ hp Hp   HX*\R1*#284     (  01P(h  "    *.  0$@ P7`$p        (1H(` x "  0 &   @P h""    8X&` .>  3( *V@   p         8 P h          ( DT@         0 H (#`            40 h  x   4 ,$ (8 @P`(%h  *(%?.(X`hpx   .0=@ `px   5    (!8X p  (  &4B  0 P B X >`   ( 8H$`x     B  <  8 @ H  X,[h*[*[*Z @ $P6Xx   B  j&`  !,   0i@4rp   $,B(J@0i$<    B  NXp    ,[*[*[( X $h ,5   "  ) "(  8X`hpx !  <<6   ( @ H6P h p  6    6    <(@  H (X *     "   *  <<6  8 @ X `6h    6    6   0 8@H " P (X NNNNN N N@ N` N N N N N!  ! 0!) (C) OfficeHelp 2008 - www.officehelp.biz MONTHLY (LARGE) CODE MODULELOOK S]$EOmmitted for faster DEMO Results when generating ALL formats at once.p ^$]$YThis limitation is only active on the DEMO version with the "ALL" Calendar Type Selected. ]$zTo get a full 12 month DEMO, select "Monthly" at the Calendar Type cell near the Run Button (Cell F5 on the "Input" Sheet)H]Q Fast Demo Limitation - If it is a DEMO for "ALL" calendars, create only 3 months '  Z \ AllG ^' jkk Get Start Months h'  ' $"'# Create new workbook with 12 sheetsn T!Z.` `B@Vx `!!X'  `!B@Z `!!X' Add Months to Sheets  z   {    A@dH      A@&k  '  '  'k Activate First Sheet `%B@HA1$B@Hox]@Xp Get Start Months h'  ' $"'# Create new workbook with 12 sheets T!Z.` `B@V `!!X'  `!B@Z `!!X'x Add Months to Sheets     A@  '  '  'k Activate First Sheet `%B@HA1$B@Ho* Make the monthly style calendar - 1 month]`]x] 8p]  G  'j 'j  j$' jSunday $',+6+6dH  $',+6+6k ' Get Max days function  $*'*?? Select Output Sheet f'H HGEvent Calendar'Hj:  h -  h   H'H?d0 h  H'Hk HG f'Hj<> Apply sheet name : `%B@H $l-  : `%( Set Gridlines GA@`j Set Generic HeadingsA:AB\( @A@>A:AA@>AB:BA@>F:FA@>J:JA@>:N:NA@>R:RA@>V:VA@>EZ:ZA@>E:E?A@>I:I?A@>M:M?A@>Q:Q?A@>U:U?A@>Y:Y?A@> Insert Title H -  $l ( )B2:AB2 A@XInsert Month NamesB4:D5+NF4:H5+NJ4:L5+NN4:P5+NR4:T5+NV4:X5+NAZ4:AB5+N  $ $N   A@p Make Day Squares6:6A@JCB'.F'0F'2 . *  .  ,  First Row 0 2$ 0  2 $$B@H A@d Next Row . * Day 0 2$ 0  2 $$B@H  ,$6 ,$6 Weekend  A@d Weekday A@k .   0 2 $'4 4 $ Holiday - Color with category color 4 A@ .   0 2 $'4k . 0 2$( 0 2$ 0 2$$B@H F 9 999999 99qP A@ , ', , G',jd Notes 0 2$ 0  $$B@HLa A@Notes 0 2$( + 1 A@ Iyk . '.kh 2 '2SP 0   '0 0: 0A@JW 0 '0 '2 Insert Special Day List .zB@  0 $\'J$ 0 J  'JG Co .z F! Return to cell A1A1$B@HF% Set Print AreaB2AC J LANDSCAPEA@p  d% ` :A@2  Set Background Picture G A@j%o 8 Calculates the maximun number of tasks in a single day. Holidays are discounted]8Ph9 'ZF' $'  $'   $'  Z G 'Zjd $'  Minimum Rows Z G'Zj Z'"i@ 5 Counts number of individual tasks for the given date](9]@Xp ''#' 9  E X   d%%!X '9  G'jE X   d%%!' F X   d%%!'9C X   d%%!'\ \ ] 9 X X X Xql \ \$ $G  'jkH k@  '( 'i c Copy the Day taks into the calendar slot - returns true if there is events of the holiday categoryate]]0 Set start variables$'Z$   .$'RG RX$d'T T,$f'V! Loop tasks=j  V VG $VX   d%%!'XB $VX   d%%!! 'X P d  Max lenght set - enforce X P G X P$'Xjk X H  J$( H  J A@ G  H  J$ H  J $$!( jtesC $VX   d%%!'\ \$ $G 'Zj  Z'iHG Returns a list of tasks for the given date (in a CSV string of RowIDs)]C:C] ''`#'4  E X   d%%!X ' G'jE X   d%%!' F X   d%%!'ck for ), X X X X ` ,'`kPkH  '0 ` G ` ` $'`jj `'di  $B@H  ( ISelection.Font = TFont  F 9 999999 99qP FB@' A@     F%(6   F%(  F%00 9 9xlMediumod 9 q  F%X' 9 9xlMedium 9 qh  F%ck for 9 9xlMedium 9 q   F% 9 9xlMedium 9 q   F%(k j! Set BG Color if there is a color F!4j 9  9qXkPoH(  F!0 9  9q    F%(   F%(f   F%endar 9 9xlThin"G 9 q  F%G| 9 9xlThin C 9 qP  F%' 9 9xlThine or 9 q  F%or emp 9 9xlThinG| 9 qko ! Apply supplied font to selection ! H J$!x(0 ! H J$!x(+ !  H J$!x(  ! H J$!x(ne ! H J$!x( ! H J$!x( ! H J$!x( ! H J$!x( ! H J$!x( ! H J$!x( ! H J$!x( ! H J$!x( ! H J$!x(oAttribute VB_Name = "Module6" ' (C) OfficeHelp 2008 - wPww.oTh*. biz ZMONTHLY (LARGE) CODE MODULE@Public Const C_DEMOFAST_61|Ommitted for faster ( Results when generati@ng ALL+maat onc,e.k2kTh`is li8%on only @active% the>versBiwith ""<"" Calendar Type Selec+^@3@oet a full 1`2 mon0x,d s& " ly6pI :ce neA Run ButtV(C F5d""Input#Sheet) Sub MakeMAly() Dim As Lon@g, nY MTaskRowsaxE~ ' Fs Demo LG]- If itA_a[~W cDWs, cr,eah3Is nM=@O@ItsATC As ?BsAll" A~ DAPE,1`e1El seo CommXentnP,23N!GF@13p#k;}$YOI\Ne&xD=' C F(1 ).#Rang@e("A1"  >_OLD6tt$n& t ttte,tt@1 5 _:es_:r4= ^:8vnY8Rg r,@/U/ BRQY/Z//U//s/7zIP_-9y7w}/b'rly styP[ew~1vÀ bSyУngq`h9Wxeek H 0IndeCol*Auxdgqr, MNumw`NLinePosit(14>) [4d BG cT a @, (2ᏕgTD$\Cg & "8"p(i@J)C|ut/1 O Len(y) >= 3@\0utRppF!R n .E3r/A.H=r7!- nY S't GridlCC UseF'Fa@eFSS0pHead{@Fu mnWid"A:AB", 8.~4d B:4cF:FGJ:J olumnWidth "N:N"@, 4 SetC R:RpV:V8Z:Z8E:E0.5uI:IM:MQ:QU:UY:Y P' Insert Title Make Month NewSheetName & " 2-&  s(HnM) ("n Y)5"B2:hAB2F&ly3@@ ( AuxPosition(1) = "B4:D5"2F4:HB3BJ4:LQ4BN4:PQ5BPR4:TQ6BV(4:XQ7BZ4@For ll21 To 7C2A\Heading Weekda yLongWll8), IC@orBGD s, YGTrue, BorderThic knessNeLxtCC'  Day Squa re RowHeight "6T:6@r3 n s1: nIndtex7%2 While <= nMaxOA?EIf=@ 1 AndP< nAI@ ThenG a' Fi0rst `Range(Cell@W, n%- + nTask-2)).Selec$*`Paint`XArea 15, 83Elsdq%'@qxt$,t#C o`'/#A# #A+> #a $9ends;(f;`E$s(0) Or'?1)) 'Bk AP6lyCor8 d9@~LEI0? %EgIf nBGxCopy]cA.bM`Y`d/a^|,lyzCharsLapbel) Te > 05Holi"wicategory color  ߟQ=ko\7H).ValueBV_?A=0[I,= 1 N WN?.HorizalAlig nment xlCe6.VpdicontoV .WrapT o@ FaU .Ori@a!0O .Add _8 .Leve_.ShrinkToFi!{RO!~ P}.Merge$h/a(ABQB\0D1BAVA> 7B_o U1rotŌEu00P H28:G /[i>EW>"N$7\yԝEx@'OI`xs?o 7'iDqש٥{*P:5Z, i?ow:x{ = USpecialLisDŽ 2Leg33cNLic(InputWhatToY[g3wV9D+ T4. 0_ %Return to c1 Aa4"A1";bb' PMt A0"b"ACAc , "LANDSCAPE-qG 2erqersFo/rs`BisBook.Sheets(InputSName), NewB@ook, nT ' Set Background Picture:If @BGFile <> "" ThenhpGpP; ENSub Function GetMaxTasksPerDay(nY As Long) ' Calculates the maximun number of tC in a single day.Holi!s ar isclted Dim nOut3, dAuxD2Stop >ng$= x0: }+= %Serialрt, 1)4A2, 31WhT<= d$FQ= CA;V}X(E" u,>?Ct3G2Ad`d("d"B2 WenYC' Min@mm RowsR< 7C̈́7AU =(EF;> oAFsindiv idualDforBgivdIndexG, CritwXStr D!ISA, EsCgoryI= Spec4Start@Qƚ= "#"A#!0FfBwhC@(This !.z..Range("E" & ")).ValuekKh Null<"`aad$=, $F3 4 d C} ?``!gg!#`(CG($Z) >`{#I)`[E{  gA UCase( &)cAuto;%EW);Q+ 1K vIfg#k= C {O` TpyÞnݠ&skMh@j(ColLabelCharF `.cBopy'… ksto"calar slot - r en@rue ihe`is ets٠h# cD#d!98, sB, ǠlDArr0aiV `n_`pPsqH valble4]$\- >mnMaBd =!`s+)z Split(, ","4% Loop\Fp = LB_d+o UMC1s?.?G? (ll)QgWBInAgor.3gC+> 0 #o@yax *ght s`- en= pcԟ1Leln(1PH a Lef,KT?Cells(nq8+p, " tew Apply Font , QMhlyE"5Uses~ p} A+ 2`x ?5c$lux0Z= ZZ: Next3 VT V1WW;@hb+|.Horiz[alA@lignmexdlCerV erticWr@apTextPFalse Ori-*a0 AdpdInd LevelSh͠kToFi6RO= @4@9&MergVAH+L U CopyB{|CIf~The@OÅs(xlDiagonalDown).LineSty,NonOY,UpK.EdgeLeftE)  "C@Ninuo us8 .Wei gh_A'xlMedium AqxoxlAutozmc [A,Top+d %!Bot@__,___`BR:????%1`Insidee`ALIfCNt>= 0 ku' Set BG Cif there is a ca?Interioh.`G$gBPat@n""SolidKdـ! Paint$Area(٣|.kcnȖaqF_SW7_S 2/St1SThib ;R0A `e]R ` Z- P Rqh0ahYh! 7  R  xl NqAAppl(nRow, nNFa-' 2 suied fP to sel7U#sr).!:ldLFB$ՄF_X F G?8Ita=8 F.Na|me" l?p! xSizhad{@ S kethrough Subscrip.&?:perZxUr2 3pl5P P POtd5P olod l^gq` l`lt}l`qt$lM@@9hP iPOtl5PPlt qtltqx<$w PLvjqt qpkCl ll=>[llt#T*F,%?@ABCDEFGHIJKLMNOPQRSUVWXY[\]^_`abcdefghijklnopqsddiuh@X8K#*F%vaF%"bX   d mAJ`1T/)68rvh@X8K#*F%vaF%"bX   d m=wAx"qH/)6 8  lTJ  TM @8 y 8`1T58BlTF%lhi %i%$ X8CJ58zllhYx { u|lhi %i%$ X8lhi%ih%$ XlHiD%T8$ Ta}00,a)T068ioh@X8K#*F%vaF%"bX   d mAJ`1L/)684LM @8 p8qM@ p368ZlHqP hflPqx/Lp4wTLlX4 T08DvjqtCpkCl ll=[llt#X*F0%@vaFD%T"bX  T d @mAJK1l/X)T@60llF ]dD3Cl[llt#X*F0%@vaFD%T"bX  T d @mAJOtd/X)T@60[nlt#X*F0%@vaFD%T"bX  T d @mAJOt\/X)T@60 ll= od o\lplt#X*#s*1p2XltqtlpJ&lpJpMD@0 y 0`1p50lpCx0wxlp(XT@0t$)X'\%Fl%$ XX" Fl%X$ (X,XX $ QXTl%TKl%TLfl%TM(l%TNfl%TO(l%TPfl%TQlv%TRfl%TScT!X $ X~X l U@qjioWXA4q4?rjQVyVVU 5 _)_I_y____A````P qh31 v01 qhvqtvqp t^ql.P 'T%d$ d (QP d " X 0 $Ld" X  d 0 lLqxdlx *7P '%',%'<%'T%d" X  d ( )dP$Ld" X  d 0 lLqxdx dlxlhpllxYLpt = CC  ClxYLpt 2 lpqplp  qpltqt xf?1P(T%d" X  d d P)dP(d'<%:T%$ ddCtP$w  dPvqtvqp t^ql.T 'X%h$ h (QT h " X 0 $Ph" X  h 0 lPqxhlx 7T ' %'0%'@%'X%h" X  h ( )hT$Ph" X  h 0 lPqxhx dhllxYPpt lpqplp \ qpltqt xf 1T(X%h" X  h d T)hT(h'@%:X%$ hhd$w hTh   qXlX  Ot\5 v0"\M@  "qp5"\M@  "qp5 o\l l qtvCx lx0Cxvh>v#*#v#*#*#lx*1x2 v#*#lx*1x2lxJvCx3i%" X   d )V*# #*F%i%" X   d 2)5 u B + ! \( @ɬ"C #/ɬ$C #/ɬ%C #/ɬ&C #/ɬ'C #/ɬ(C #/ɬ)C #/ɬ*C #/ɬ+C #/ ?ɬ,C #/ ?ɬ-C #/ ?ɬ.C #/ ?ɬ/C #/ ?ɬ0C #/ ?ɬ1C #/T23Clx*#*#4*# #*#5*Ǩ 6 27<;8<;9<;:<;;<;<<;=<;4d#>+?@l4<@l4A@ B 4fɬCC D/ ql qh qd lllt 4d@ lll4lp lhi%ldi%$ Xlhid%ldiD%$ X$ $$  ) 6$>+Y E &  lllt" lhi%ldi%$ Xlhid%ldiD%$ X$ $$  ) 6$$uFlplp>+G E >+Y E %HdlhYl ll^Iq0l0m>+0 E %HdlhYl ll^Iq0?llid%lhi%ldi%$ XCJ5lhi%ldi%$ Xlhid%ldiD%$ X$ $$  ) 6$ $ Q%K%Lf%M(%Nf%O(%Pf%Qv%R c%Sc T Ulpqplp qp lhi%ldi%$ Xlhid%(D%$ X$ $$  ) 6$>+Y E =:dV%lhi%ldi%$ XCJ5 T U@ llqlldqd 4fClhqh5ɬlh#W*#lh#* D2lhqh qd" vXY!YlhYZ^[ qTlhlTqT v\Y('%:%$ 4]C^lT#*_C ` 2BvaF%"bX   d l l=c  d ) ve= e fFh wp`HF<N[x<  $ qt q` P POtl%lC il%lCl%lCx q6l %X $ X$qXl%lC il%lCl%lCx q6l %X $ X$qXl%lC il%lCl%lCx q__SRP_fModule84__SRP_10$/6__SRP_11`1Ai(((((`1((!`,@I`A1Q(((((((q`,H` 9!00(=I#(0` 9(#(4 ` Qi((=InrU $`0` 1AQ(((n2AKD<jxOBm#<w-J"X h Fj~AbG<筥kXxj~AbG<筥kXw-J"X h ME 6 6  (  00 `pE ' ( (    08XhE* ( (   08H`x       "\ Y0P Xh       &4G@  `  (   "  .   &8  `   |%&  "      ." P `  p x      ,(   (  (@  (P ,$`   *      *" (# ( 0H  x    *  (  *   ( 0   8 @ H X h     $   (  *    (0@P X h) (C) OfficeHelp 2008 - www.officehelp.biz TABLE (YEARLY) CODE MODULEKa]@]Xpt on] 8PH Select Output Sheet f'H HGEvent Calendar'Hj  h -  h   H'Hd h  H'Hk HG f'Hj CreateOutputSheet NewSheetName T!Z.`c `B@V  `%B@H H `%( Set GridlinesE GA@`j Set Generic HeadingsA:A @A@>B:BA@>?C:N X A@> Insert TitleB HB2:N2 A@X Make Main Grid8B4:N35B4:N4A@`?<B4:B35$B@H   F%(   F%(?  F% 9 9 9 qx  F%?= 9 9 9 q@  F%D C 9 9 9 q  F% 9 9 9 q) Apply Headings - Month names and numbers Numbers'0F'2  0  2$B@H  F(  F(  F( A@ Month Names'0F'2 0: 0A@J  '  0 2  $B@H $l F(  F(  F( A@  '  G'j Apply Events h'  ''0F'2    A@  '  '  'k0( Set Ro(c)OBRxME> LLLL    4h`kzz`HxQ`JtPo`px`Ll00 N@T0-`L0\`PH`RF `@#`p<`8 ` kKK~i iiJ`HxE`*t`,p:`.l`0h`28d?`h\`jX`JT N<`4?`40 6x\>``8H `: h%8P h 8 (P @fhT``>@4 @0 @, @( @$ @P @h @ @ @ @ @ XF@ @   @x h(%@`P%@ x*@`*@ /@@`0/@t X4@p`@4@0X` @2P @L =@@H 0=JlL@8 @P ( XCx@h$ @H@  %hH`hP@ V%@  V ]@(  @ `V@ h ( `@ ( ez\pd@  @ %x 2@ 0    8 ( j*F@ @ @P @P @ @8 @h @ @ @ %@ t @d %@T @P 0 >@` @ VP  !%@ <`x 8 !@ , ` /@ (` /@ ?@` ?hHX$*\Rffff*0`58e648a2$*\Rffff*0T58e648a2*\R1*#3e4*\R1*#132*\R1*#13c*\R1*#13b*\R1*#126$*\Rffff*0W58e648a2*\R1*#289*\R1*#11*\R1*#a4*\R1*#32*\R1*#2d$*\Rffff*0[58e648a2*\R0*#13$*\Rffff*0X58e648a2 0 "0 "X`2h & .>HPhp  &. 16     8 Xp     (< <86Phpx 6w Height # : $L!@B@B : $L!N'  G'j  : $L(Np Insert Special Day List .z %$\'J J(  'J .z Set Print AreancB2N J LANDSCAPEA@p S  d% `A@2'H Set Background Picturear G A@jh Return to cell A1A1$B@H0o(h( Make the table style calendar - 1 month]] 8Ph]`]0H  G  'j 'j Gener  j$'AB jSundayA:A $',A+6>+6F'8d $',$Weekday(Auxdate, vbMonday)+6>+6V'8k ' Get Max days function  $*'* Make Day Squares'.F'0F J  '2 . *Y:Y 0 2$ 0 2$$B@H  F(  F( (  ,$6 ,$6In  Weekendes F!+ 9  9q8k0 .   0 2   $>': :-G'4cG :X '4j 4 :- ) Multiline - Adjust row to show all lines 4'4A@kp 4 Day $ Holiday - Color with category color 0 2$ 0 2$$B@H F! 48 G 4'4j 49  9qk Next Row , ', , G',j 0 '0w . '.X Paint BG for non-exiting days .B@ 0 2$ 0 2$$B@H F!9  9q 0 '0 . '.oAttribute VB_Name = "Module8" ' (C) OfficeHelp 2008 - wPww.oTh*. biz ZTABLE (YEARLY) CODE MODULE>Sub MakeTableCalendar() Dim Ne@wSheetAHs SngL ines Long, Aux Year Position(14)L, ll &pLabe,FlagBoolHean@nnnZYMo ' Select Output i  p= InaPlanxIf " Then Event 0StartMonth <8> 0-@STDDa& "u"0 & (&+ 1)"@& !Else@`nd If0Len( ) >=| 32MAPPA9' Cre@6aa0XSetA{k@Workbooksp.Add".ActivKs(1).C}U= t Gr8idlCUse'Fa[Ã-}AeC Ceneric HeadingsColumnWid"A:A", 3.2B:BE5C:NCLng(zell zI1Insert TitlETb*#, "B2:N2 F Y (#'"in' " 4:N35)@"B 4$dRange(AB6#8.Borders(xlDiagonalDown).-StylxlNond9dUpWi/EdgeLeft( !)C#inuou:BWeightExlMedium"b@>orIndexAut@omaticCEpTopc .l%Bot ??? &G!R29' App\lyCns anumb /NnRow#p4: n04CForu= 1 To 31c CAs(+p,'8C0Valu6llHoriz@0alAlignmp= xlCDern.VHicntCopyQG AG\6pNext0Hhv lWH:w:r,cю=}@y{1x( !w(,OOKOO OM1sQaps1> 12r)#u1?”НnMPS= 1?Q1jListR& nYM@} fx82Y@ ZL嗗-S*CALS= 5>s( ,ll).EnPtire.!gFi3sO).02T< 2`2᪢4Special Day ;@LegˀADсs?3Wh0atTo7,4 5D5N+ 40`:3Z==0lJ9SPriA V"Б9"N0LANDSCAPE3A8"eraFooRsP5isB3),ќ, (# Backgrou Pict urDBGFileT"r=GRen to cpg ATA1"{O1/Sub`k0<9(@307p4the t! s¢0g`w1 mcTPMax#8nWeek PB .fo *0d̑5Date, MNum As Long, NLinesxAuxPosition(14)`StrillL Dim nBGColor*, nWeekendDays(2x0BorhdernsCg  If nM < 0 Then nY =1+ 1= Abs(nM)d)Ser@ial(nY, 1-InputVdayStart"Sun"8(D]h(3'|0)S17 /B=pElseB 'K, vbMo eP2%End IfQA]>G' Get Max Vs funcn @ ,th@tYD/AMake  Squares 1: nRo@wIndex5@3 + n  -WWhile nBmH7ay b) wFc gory cKppipAU`+ 56a 5-1 * A]#[ [' Next y T{As q7> 7 fhUTpT6sVoWB ' AJ BG fn on-exІngaCY3t!^:_OYOY K 15S 1.A2ja qSub1$ WDq(%lC!%lCF qlhqhllql\hpw|@,468vd<E` @P x  PTf*#(*#$lx*1x2 40,($v#4*#0lx*1x240lxJvCx. '% $  ( Q   " X 0 1 (% " X   d  ) Sheet4~__SRP_1c,__SRP_1d BSheet7 ~(SLSS6"N0{00020820-0000-0000-C000-000000000046}(%H` % %`h8@``0HX$*\Rffff*0a58e648a24xAttribute VB_Name = "She@et4" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2 &rU it 4tt` 8=+,240, 68YlL#4rU @n 68(lp< qpXlpi%lL#4'*#0l<jxOB=#<m_S CTR F1=H/*x1=H/*m_S CTRME(SLSS6"N0{00020820-0000-0000-C000-000000000046}(%H` % %`rU~| L5AXPX!V?99Xp2AKD qll(ll9m mIamQVyVVq4)39YY9M!mmK(xQjYihx QmA\i\)8A4U I nL vCx lx0Cxvn>v#4*#0v#,*#(*#$lx*1x2 40,($v#4*#0lx*1x240lxJvCx. '% $  ( Q   " X 0 1 (% " X   d  ) 6lxF% (% " X   d  ) uf +  @C44 /4C44 /4vC44 /4C44x  /4 C00C44 240( '%:%$   <%% $  C 5<%% $  C 56% $  q %lC%lC %lC! q6% $  q %lC%lC %lC! q6 % $  q %lC%lC %lC! q6 % $  ttqp %lpC%lpC %lpC! qp (` (PLdHgE`lLi%P @ $ X  ( 6('lLi% $  " (% $  # (% $  $ % & LfH (` (P0`:'`8`4 (/468vqpL d E` @PlLi% $ X  ( 6(*lp)F% $  " (% $  # (% $  $ % &lpqplp  qp Lf vq<vq8 (` (PL dZL8< * l8q8l8 N q8l<q< Lf L#d\lL#4'*#0lL#,*F% $  8=+,240, 68YlL#4'*#0lL#,*F% $  8A(-"qp240, 68(lp< qpXlpi%lL#4'*#0lL#,*F% $  8C-240, 68 Lfo v./Y%Y0^1 qtlt(qt v2/43C((4lt#4*,5C00 6 240,(G v7F% "8X   d Y l =9 : ) v;=s ; <( '%:=%$    pwX tT5qxHP`< 40,($  8($p  qXlX  >Ot\5 v?@0"\M@ A "qp5 q"\M@ A "qp5 q o\l l Bqt ql qhqd lllt\lhi%ldi%$ X lhi%ldit%$ X TPT$ P)P6T(% $ #(% $ $$uClplp* $ WD@@q<vEi%l( X ` x   3 *V      0  P h         (  @  X  p     DT   0 H ` x     (#    8  P &1X      D 40,$h   Z:sH  *:s Zx*Q.  (0 8HXp(       4,$  P`p x Z:s @ *P:s Z0(Q8.`    (0 H P `h5  &       @!Pp   (  &4B  (H h x) (C) OfficeHelp 2011 - www.officehelp.biz MONTHLY (4-5-4) CODE MODULEe ]$EOmmitted for faster DEMO Results when generating ALL formats at once.0]$YThis limitation is only active on the DEMO version with the "ALL" Calendar Type Selected.Xla]$To get a full 12 month DEMO, select "Monthly 4-5-4" at the Calendar Type cell near the Run Button (Cell F5 on the "Input" Sheet)](Pr's ](t]D0H`Q Fast Demo Limitation - If it is a DEMO for "ALL" calendars, create only 3 months '  Z \ AllG ^' jkhk` Init Global Vars''v$'E4,5,4,4,5,4,4,5,4,4,5,4' Get Start Months h'  '? $"'E# Create new workbook with 12 sheets? T!Z.`? `B@V `!!X'  `!B@Z `!!X'( Add Months to Sheets ,$f'     |X    \('7OBw]xME>  LLLL    ʐ(HP@@%"ng A :x`k66 `x`t`p`l`h@X ` T `kAi ii:X A@i8t fri `Hx`*t`,p`.l `0h`2dx Er`\tica`jX5 WW`JTRROR NX<`H`4st r`40 60from` ``A`p'` ʐXHʐH(@(Px0XxZ\^@D h"T`f@P@ @0 EOmmitted for faster DEMO Results when generating ALL formats at once.YThis limitation is only active on the DEMO version with the "ALL" Calendar Type Selected.To get a full 12 month DEMO, select "Monthly 4-5-4" at the Calendar Type cell near the Run Button (Cell F5 on the "Input" Sheet)yle ca0H`PP hh8@, j@ ( @ $@ X@ '8@ ,@ vbM@ w"@ 8&P w@h P@ @ -P8 h P ` x   ( j*f@ p@ @ P@ H h`l`>@  w@  P@  @8  @  w@h P@h @ @ w@ P XJ@  @ w@8 | PP  [@p x w` 8 [ 8 ]w@ t P p e@p w( e  z@ ` w@ P @ @ @8 0 @P w@ P@ @  @ w F@  @  @ w@8 `P  {@ `` 8  z\pd2p X0xP HX$*\Rffff*0c58e648a2$*\Rffff*0T58e648a2*\R0*#13$*\Rffff*0_58e648a2*\R1*#3e4*\R1*#132*\R1*#13c*\R1*#13b*\R1*#126*\R0*#f$*\Rffff*0X58e648a2*\R1*#289*\R0*#5$*\Rffff*0W58e648a2*\R1*#11$*\Rffff*0[58e648a2  0 "0 RXf  " X X`h p       0  *@.  $X A@d      A@&k`  '  '  'k  Activate First SheetX `%B@HA1$B@HXox* Make the monthly style calendar - 1 month]X]p]0h]]  G  'j 'j4 v$X First Month  j$'dx Continue from previous month  j$' X X 'kk jSunday $',=d+6+6Xd  , $' $'d  $',+6+6d  , $'  $'k ' v$? First Month 'd Continue from previous monthdSequenceDate = nStartRangeDate@@kp Get Max days function  $*'* Select Output Sheet f'H HGEvent Calendar'Hj?  h -  h   H'Hd h  H'Hk HG f'Hj Apply sheet name : `%B@H: $l-  : `%( Set Gridlines ? GA@`j Set Generic HeadingsA:AB\( @A@>A:AA@>B:BA@>F:FA@>?J:JA@>hBN:NA@>BER:RA@>V:VA@>:Z:ZA@>E:E?A@>I:I?A@>M:M?A@>Q:Q?A@>U:U?A@>Y:Y?A@> Insert Title? H -  $l ( )B2:AB2 A@XInsert Month NamesB4:D5+NF4:H5+NJ4:L5+N?N4:P5+NR4:T5+NV4:X5+NZ4:AB5+N ? $ $N   A@ Make Day Squares6:6A@J:'.'0F'2F $'' . *  ? .  , > FIRST ROW - Paint as Normal days - use auxiliary day variable DayA? 0 2$ 0  2 $$B@H  $6 $6 A Weekend  A@d@ Weekday A@kT nBGColor = CopyTasks(nDays, nM, nY, nRowIndex + 2, nColIndex, MonthlyMaxCharsLabel)C $ $  $z 0 2 $'4: 4 $ Holiday - Color with category color? 4 A@ $ $  $z 0 2 $'4wSnBGColor = CopyTasks(nDays, nM, nY, nRowIndex + 2, nColIndex, MonthlyMaxCharsLabel)ublick $ 0 2$(KnAuxDayse@ 0 2$ 0 2$$B@Hxl F 9 999999 99q A@rde  's  G'j  ' d $'d` Next Rows . * !+'.'k( Day.)A 0 2$ 0  2 $$B@H'*.  ,$6 ,$6pt Weekendi  A@d  WeekdayY A@k` T nBGColor = CopyTasks(nDays, nM, nY, nRowIndex + 2, nColIndex, MonthlyMaxCharsLabel)Mediu $ $  $z 0 2 $'4  4 $ Holiday - Color with category colornside 4 A@ $ $  $z 0 2 $'4)"PSnBGColor = CopyTasks(nDays, nM, nY, nRowIndex + 2, nColIndex, MonthlyMaxCharsLabel) .k $ 0 2$(KnDays 0 2$ 0 2$$B@H F 9 999999 99q A@c%% , ',al , G',j . '.d $'k 2 '2? 0   '09c 0: 0A@Jc 0 '0N'2 Check if week limit was reached/  '   /C''k  Insert Special Day List .zolean  0 $\'Jd 0 J  'JIf .zF Return to cell A1A1$B@H Set Print AreaOB2AC J LANDSCAPEA@ph  d% ` :A@23 l Set Background Picture( G A@j @ouAttribute VB_Name = "Module9" ' (C) OfficeHelp 2011 - wPww.oTh*. biz ZMONTHLY (4-5-4) CODE MODULE@Public Const C_DEMOFAST_6454_1Ommitted for fa ster , Results when generating A$LL+maat once. o27This lFi:'on only active' the@ versiwi$th "">"" Calendar Type Selec`B3Boit a full 12 moFn2|, s( " M;wN ?ce neF Run ButtI[(C F5i"@"InputS`heet)MjD im nMCoun_As Long,LK @dSeque@]DaSub Makely@x*() *InYnMTaskRowssB SMA)aA-ax D ' F `Demo 3-@ If ita'|ABy cys, cre:‰3jsnM=p@ItsATC As EKAll" AaBABoE@#AC>= 4K>= !>Serial(1910, >1@`< 54,x5,4 O!' Get Start B9%Y eBVSTcL`E=b + 1$G= %sPerDa0y(nY' Cc:new workbook }-qscS`NeDwB= WDs0.AddC .AD@]= E#6.kWhile  (2)UTb ^n0 bpF$laps @Olean! w,< @@1^*"= Abs(nM:/ctec1{,!*! b:hQDGhA^ninue from previous#$ ` Ca( ) > ct )? ' 77IfPp1Aday#svSuШyÂ1 n`k;5(e L$0)`]17&#@g("d",e, -v@QT!  n[ , vb#Q*64/A4/(/ /aA,> ;& $a555 \ 35n05a'z(# s@nmoH?RpLsnMQa' Out`Zb=PlanQcL`ӲmEvE@! rK <>$S\X & "Pm"p(i3CutSKTDate & "& NewSheetName End If,If Len( ) >= 30 Then z = InputPlan' A@pply s nRBook.|s(n).Select|"[kMonth <$M)-"nY< ' Set Gridlines oUse *FalsemӀ eL  (eneric Heading+ColumnWidth "A:AB", 8.<43B:4F:FJ:JN:NR:RV:VZ:ZE:E0.53I:IM:MQ:QU:UY:Y('sert TitlMakeA-Տ, (ç)"Bj22@F lfyD In  »AuxPosition(1)"B4:D5"O2BF4:HQB3J4:L4N4:P5PR4:T6V(4:X7Z4` For ll@1 To 7#yA.$l WeekdayLongll), !oorBGr, ,True, BorderThick`wNex ' A Day SquarwRowHeight "6:68wZnsa#nIndex@7: n2tartRanTge)Cb Flag While ( <= nMaxA ) A(d ),@&" 2< n. "e' FIRST ROW - Paint as NormaTl 5suauxiliary variabj a'.o A"$`(Cell,,+B + nThasks2~) i"! ends+n7e"`//(0) Orb 1))('\ b Area Bly"_, ]uEoOs /% ~06u釽'0 nBG 0Copy! qPM0~Y0!"7,2CharsLpabel1ks(p(dSeqpuenc:4^YearN@+ 2ُ ly  G> su' H8oli8wi%c go`8colorOOerte;r, z ' PP%th -WM+).Value`/?( 'Fpl]RhP , R1 R9W%H$.HorizalAlignme`b= xlC&e_(6.V icontoV .WrapT|PsѨOri@aє0O .Add!&/ _'.Le 7rtB1`j\("d, 1/0b orA'xt 0I8r[ >_ A6؝_FQ  ' Day   Range(Cells(nRowIndex@, nCol), 8 + nThaskXsP,2)).SelectkIf PaintWeekends And (n =   s(0) Or1)) Thenit' 3FXionArea Monthl2yorF, True, BorderThic kness-Else:Kd]K&0@VIf ' nBG7@\CopNys9nMtYłu DHMaxCharsLabel)(dSequenceDateNYear9&#@&> 0^HoDli@l - Nw ith c.gory colorS@Ts*uF-=@"nT~?*W='>nKCoK E[x.Value^/& '8퐤1fWI7I@.Horiz$alAlignmeDntxlCeXP.Vertic8g.WrapHTex Fa.Oriat@0AddAB ALevel ShrinkToFi .ReadingO (*MergeKsAS9F@ lycM `t1a!ց> 72Mso00s+  [a\`("d",, 1a; af4 NW`Pj{Set@Height & ":" &, 3?{fp 2' Check if w limP)was chedHB Counter/>his2Lb_nZ = bFlagk-W` s ' InsE S@pecialѥ 8Lisd-Leg@Ply!/3cNLi0+(InputWhatToT=h2d%V+ D. Aux_ %Return to c AT0a`"A1"b' PHt ѤG0""B2 2" ACq'c , "LANDSCAPE"#aB2erHJ@ersFoo"sP=isBook.SheetscNamNewRS Backgr'd Pic@%BGFile <> ""3D Gc"Sub!"3__SRP_13&_VBA_PROJECT>dir*__SRP_04[GAiy(((((nI)39YYY)RZó0* pHd XLCalend@ars+@Traditional 4 Generator Macro Vs1 .0@V`raditonl TCed rsGe1to M*c oV%1 .0YZ=   HX %<9stdPole> sKdE5l= h^*\G{00020430-C 0046}#2.0#0#C:\Windows\SysWOW64\22.tlb#OLE Automa0AEOfficEODficE E2DF8D04C-5BFA-101B-BHDE5MSG_OUTLOOK_WARNING_TITLE(MSG_OUTLOOK_WARNING_MSG)(MSG_OUTLOOK_TITLE(MSG_OUTLOOK_FINISHED(MSG_OUTLOOK_ROW(C_OUTLOOK_FOLDER_ERR7/(MSG_CLEANING_WARNING_TITLED9(MSG_CLEANING_WARNING_MSGQ(MSG_CLEANING_WARNING_TITLE2 &(MSG_CLEANING_WARNING_MSG2շ(MSG_CLEANING_WARNING_MSG3ַ(C_OUTLOOK_CALENDAR_CAT?(C_OUTLOOK_TASKS_CATٯ(MSG_HOLIDAYS_TITLEz(MSG_HOLIDAYS_FINISHED(MSG_HOLIDAYS_ROW{(MSG_DATES_TITLE_TASKSa(MSG_DATES_TASKS_1(MSG_DATES_TASKS_2(MSG_DATES_TASKS_3(C_ERR_SHEETNAME(ItsADemo" (IsFastDemohn(MaxDemoSheetsFastٲ(NewBook,Workbookk(ThisBook-3 (InputPlanName (InputSTDate(InputWeekdayStart (MonthNames (WeekdayNames,(ColorWeekNumbers:(ColorWeekdayLabels(ColorWeekendDays6(FontMrU~| n(y@A\rP?99Xp2jioA,i!A qAKmi\X!])5AXX!V nD q!nlloopXApapinppppq`!q[[QqyqqqqrArpqr!^8q^YWI)39YYY)RZjAZIjyZ9M(xQiYihx Q$ qT31 v01 qT  vD DO5DChvqtvqp t^ql., '0%@$ @ ( Q, @ " X 0 $(@" X  @ 0 l(qx@lx h7, '%'%'%'0%@" X  @ ( )@,$(@" X  @ 0 l(qx@,:0NDDlh X5Dx dslxlT4x@XDFYllxY(pt 5D1=CCClxY(pt 2lpqplp g qpltqt xf1,(0%@" X  @ d ,)@,(@'%:0%$ @@,whX(@,D8l  qX&]v 35olX  Ot\5lX  Ot\5o\ t\ v0M"\M@  "qp5-lpim\ Ot 6" M@  "q5"\M@  "qp5-lpim\ Ot 6" M@  "q5 o\&]v 35" o $l l qtvCx lx0TCxv>v# *#v#*#!*#lx*1x2 v#!*#lx*1x2lxJvCx3i%" X   d )V"#*# #*F%i%" X   d $2)5 u%} + & \( @Ɉ'C (/Ɉ)C (/Ɉ*C (/Ɉ+C (/Ɉ,C (/Ɉ-C (/Ɉ.C (/Ɉ/C (/Ɉ0C (/ ?Ɉ1C (/ ?Ɉ2C (/ ?Ɉ3C (/ ?Ɉ4C (/ ?Ɉ5C (/ ?Ɉ6C (/T78Clx *#"*#9*# #*#:*DŽ ; 2<<;=<;><;?<;@<;A<;B<;4dx%#C+DEl4<@l4F@ G 4fxɈHC I/ ql qh qd M@ J"q5pllltkl4dplll4lp lhi%ldi`%$ X lhi@%ldi %$ X  $  ) 6$uKllC+L M C+Y M sM@ JM@ NM`@ OPdlhY"Y"Y"Y^Qq06l0C+0 M sM@ JM@ NM`@ OPdlhY"Y"Y"Y^Qq06QM@ Jlhi%ldiP%$ X CR6lhi%ldi`%$ X lhi@%ldi %$ X  $  ) 6 $ Q%S%Tf%U(%Vf%W(%Xf%Yv%Z c%[c \ ]lqlt qlq(( O6 lllt qlplhi%ldi`%$ X lhi@%ldi %$ X  $  ) 6$uKlplp C+L M  C+Y M sM@ JM@ NM`@ OPdlhY"Y"Y"Y^Qq06l0 C+0 M sM@ JM@ NM`@ OPdlhY"Y"Y"Y^Qq06QM@ Jlhi%ldiP%$ X CR6lhi%ldi`%$ X lhi@%ldi %$ X  $  ) 6 $ Q%S%Tf%U(%Vf%W(%Xf%Yv%Z c%[c \ ]lpqplp qpllql(( O6ldqd 4fplhqh5Ɉlh#^*#lh#*ǰ I2lhqh qde p v_`!YlhYa^b qTlhlTqT vc`('%:%$ 4dCelT#*ǴfC g 2BvhF%"iX   d l l=j  k ) vl=f l mlwt<x@  fonthNamesFontU (FontLegend(WeekNumbersFont (WeekdayFont\ (WeekendFont$ (RegularDayFont(NWeeks,(CalDaysث(SpecialDayStartRow5(InputSheetName[(ConfigSheetName5(InputWhatToListپ (BGFileName(ColorMonthNamesQ (ColorLegend(RealInputSTDate(RealInputEDDateǠ (OutlookSource΃(OutlookTasksComplete0(OutlookTasksNoDateJ(OutlookSubFolder (OutlookColor (OutlookLevel^(OutlookDeadline@(OutlookImportStart*U(OutlookImportEndH(OutlookCategory (OutlookImportTime(LegendDateFormat (UseGridlinesU (CalendarTypeF" (UseHolidays (PaintWeekends1(AutoHolidaysCategorym(AutoHolidaysColorQS (StartMonth (SheetnameCNTJ(FontMonthlyTitle$(WeekdayLongNamesw` (FontHeadings,(ColorBGHeadingsf(FontMonthlyDaysa(BorderThickness(MonthlyColorWeekendDays.(FontMonthlyEvents[(MonthlyFontLegend2(AuxMonthlyFontLegend(MonthlyMaxCharsLabel0(MonthlyUseColorsi(TableMaxCharsLabel&(TableUseColors(FontTableMonthNamesD(ColorTableWeekendDaysFU(FontTableTitleV(TableFontLegend (TableFontDaysA<(TableCellWidth(CopyPrinterHeaderso(InsertWeekNumberOnTraditional(GetInputValues;AuxuAux2fUaux3gUSheets Range ValueK(CheckSheetNameUCase5 MsgBoxR vbExclamationvbOKOnly vbInformationnInterior; ColorIndexxlThinwxlThickxlMedium Application*GetOpenFilename]?AllowOutlookSecureFieldsȋsNamedNotValidll^OutZ(Main, handleCancel\EnableCancelKeyxlErrorHandler DisplayAla ,*\G{000204EF-0000-0000-C000-000000000046}#4.2#9#C:\Program Files (x86)\Common Files\Microsoft Shared\VBA\VBA7.1\VBE7.DLL#Visual Basic For Applications&*\G{00020813-0000-0000-C000-000000000046}#1.9#0#C:\Program Files (x86)\Microsoft Office\Root\Office16\EXCEL.EXE#Microsoft Excel 16.0 Object Library*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\Windows\SysWOW64\stdole2.tlb#OLE Automation4*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.8#0#C:\Program Files (x86)\Common Files\Microsoft Shared\OFFICE16\MSO.DLL#Microsoft Office 16.0 Object Library VTraditional Calendars Generator Macro Vs1.0HX OBModule10T58e648a2Module1yH`PThisWorkbook0U58e648a2CThisWorkbook Sheet10V58e648a2E Sheet100Module20W58e648a2FModule2W@H;Module70X58e648a2Module7+H`Q Sheet50Y58e648a2o Sheet5&x Sheet60Z58e648a2q Sheet6 Module30[58e648a2rModule3H_jModule40]58e648a2Module4GKModule50^58e648a2ZModule5)0Module60_58e648a2Module6`Hj`Module80`58e648a2Module8RH`) Sheet40a58e648a2 Sheet4m  Sheet70b58e648a2 Sheet7=8Module90c58e648a2Module9w]`HP-7p8PHx0 `AkMȤ9e?E9Khߨk4QHM>(5lCvt?=y|HN)!Vnb`JM! r?ԯMm9ѣ')`IߧCۊA w@eHMz^CG@OpeCF DF3M,!A7 KJub .K_H5}x[g|KDbgVaO.%3A g/ bQF Excel+ VBAWin16~Win32Win64xMacVBA6#VBA7# XLCalendarsstdole`Officeu Module1b _Evaluate (C_MAIN_TITLEׇ (C_MAIN_END}vbCrLf (C_MACRO_ESCF (C_DATES_TITLE>l (C_MSG_DEMO(MSG_DEMO_GENERIC(ertsmsgQActiveWorkbook(CheckTaskDatesM (MakeYearlPlanv (MakeCalendar( MakeTableCalendar.~( MakeMonthlyCalendar(MakeMonthlyListCalendari(MakeMonthly454Calendar]Erro(SetColumnWidthcl\wmColumnsp9 SelectionZ ColumnWidth (SetRowHeight4RowsU RowHeight(CreateOutputSheet( NewName# LastSheet!c SheetName6Count0vAddrMove>yAfterX (SetGrideLines]Ast(_ ActiveWindow+DisplayGridlines (ColLetter#ColNumXEAsc!uChrK~ (SetPrintAreanaX sPaperOrient ActiveSheet%N PageSetup PrintAreaP LeftHeader CenterHeaderD RightHeader LeftFooter CenterFooter RightFooter|S LeftMargin]InchesToPointsI RightMargin[ TopMargini BottomMarginu HeaderMargin8 FooterMargin PrintHeadings)nPrintGridlines@ PrintCommentsxlPrintNoCommentsCenterHorizontallyCenterVerticallyI Orientationw xlLandscape& xlPortraitDDraft:FirstPageNumber% xlAutomatic@OrderAxlDownThenOver BlackAndWhiteZoomFitToPagesWideFitToPagesTallZ(SetSheetBackGroundFilenamejSetBackgroundPictureCenterHeaderPictureN:PrintTitleRows1sPrintTitleColumnsHeight| (CleanTaskLineLlineCellsPatternixlSolid7n ActiveCell FormulaR1C1S(SaveTaskDetails#LevelColor2FDeadLine(STDateEDDateκTaskName_PercDoneResourceCatJ} (GetDateOnlyDT\Pg (ResetTaskListCNT+ TaskIndexq MainWorkbook vbCritical+} vbOKCancelx?vbCancel' (MakeBorderI-i`BordersC"xlDiagonalDownJ@ LineStylewxlNone xlDiagonalUp xlEdgeLeftL xlContinuous[Weight1 xlEdgeToph xlEdgeBottom xlEdgeRight%vxlInsideVerticaljMxlInsideHorizontalll2sd_ed]flag (MonthIndexInit\[Rel  (GetMonthDaysnMonthknYearnNumDays(CopyPrinterHeadersFootersSH_ WorksheetWB_nSheet=AuxLines)# StartLineEndLineq  ThisWorkbook| Sheet1 Module2c NewSheetNameNLines5AuxYear AuxPositionXAuxLabelǵAuxFlag| WorkbooksBActivate|(MakeMonthTitle (MakeMonthu8(InsertSpecialDayListrLDeletexShiftxlToLeftWY (RedoBorder (MakeTitle̲vbBlackMNumsTopCol4TopRowuLowColLowRowTopCellLowCell]TopRight#NextCol3NextLine SecondColB% SecondRowu LastInLinecUAuxCell(MakeGridʥ (PaintBlock=(CopyFontk (InsertNumbersMNumIn_ StartWeek? AuxLastDayy1Auxdate_ StartDateE CellColorRloopCloop"LoopCNTa DateSerialUDateAdd/6WeekdayvbMondayDay (GetCellColor(PaintSelectionOZTitle~SelRangeaTFontuHorizontalAlignmentS@xlCenterVerticalAlignmentʡxlBottom?WrapText} AddIndent2W IndentLevel ShrinkToFitA ReadingOrder xlContextP MergeCellsکMergeq_BGColorTSizeTColor5MKBorder-BoldItalic!Size Strikethrough" Superscript SubscriptV OutlineFontOShadow UnderlinexlUnderlineStyleNoneNd HeaderRangecHFormat DayDateIndexCriteria7DColorDDateIsDDateEoWTLStartRowCalTypepDLabelDCat COutIndexBeenDone`ColorColLabelColeColIndexMonthsRange TintAndShadeq Module7h(C_DEMOFAST_MLIST1(C_DEMOFAST_MLIST2(C_DEMOFAST_MLIST3nYp^nMh^ nTaskRowsnMax41( GetMaxTasksPerDayUT(MakeListMonthCalendarW (MakeALLComment#(MakeMonthlyListCalendar_OLDBnMaxDaysnWeekDayLnDays  nRowIndexO+ nColIndex]nBGColorn nWeekendDays;nWeekendBorders9sBGColora (MakeDayRowd (CopyTasksList EntireRowAutoFit&  (WeekBorder EntireColumnnRowMnCol UseColorsB UseThisFont† MaxLabelCharsdDatesTasks$ sTasksArr(sAuxnOut> sCategoryb nMultilinesOutsAuxLine ( GetDayTasksuSplit)sC1sC2sC3 Sheet5 Sheet6 Module3dsYeareYear MSG_YEAR_DEMO^Year6n InputEDDateIMSG_MAIN_TITLEz(MakePlanwyYear$MaxDaysMaxLines/AuxDays MaxFinDate MaxStartDateUAuxLoop0NLine)InputSplitByLayeriAuxMU AuxFebYear7 PlanCount͎ (MakeGridYRc(InsertWeekendsB (InsertTasksYRc FreezePanesMz(SetPrintAreaYR><PlanAreaBGColor=sDate\WEFlagő TaskSDate\^ TaskEDatec TaskColorq TaskDeadline! TaskPercDone^ TaskResource  TaskCategoryTaskCnt/ RealTaskEDatee TaskEmptyTaskTest StartTaskRowedate (DrawTasksYR0 MaxDemoTasksҙDLoop/cntDatePRCalDayDCalRow)_CalColDateDiffDeadlineMarkerBGColorcZd[Address FontStyle Module4e (OutLookTestMhandleCancelOutlookAuxRow1(DetectFirstEmptyRow vInputBox (ImportOutlookCalendar(ImportOutlookTasks MSG_MACRO_ESCEndDateXOutlook,VoFolder>oFolder2oItemszoItemsOutlAPPx oItemsRestrict^olFolderCalendar) olFolderTasks olFolderToUse CONDIT strResourceArAuxTime=AuxCatobjRecipU CreateObject GetNamespaceCGetDefaultFolder*Items`hFolderssNumber-CreateRecipientGetSharedDefaultFoldereReplacefIncludeRecurrencesSortStart Organizer (TimeNoSeconds2 TimeValueTrim@ categories DateValue/SubjectRP(ImportOutlookCalendar21VRestrict)( strSubjectO dStartDate]dEndDateϦstrCalw TaskCompletea AuxStartDate' AuxEndDate? DisableTaskPOwner% (GetStatusNameStatus+PercentCompleteϘComplete DueDatestrTime'Pos Module5f ( HollidaysǪ CountryCodeu( GetUSAHollidaysRight  SpeciaDaysZC( NDow ( GetEasterDate ( LastDayMonthnylNekbjalcMdDOWmMonthIUWeekd;iCNTB!AuxDayL( InsertHolidayslhandleCancelIH ( InsertEventsXUseHol֜ LineToUse.AuxList@AuxEventAuxHol Module6g( C_DEMOFAST_MONTHLY1bv( C_DEMOFAST_MONTHLY2cv( C_DEMOFAST_MONTHLY3dv( MakeLargeMonthCalendar@( MakeMonthlyCalendar_OLD, ( MakeHeading( PaintSelectionArea ( CopyTasks(fdAuxDate֬ dStopDatejdnAuxOut?@ppointments will fire a Warning message from Outlook stating that another application is trying to access Outlook addresses. It will only work IF you do ALLOW it to proceed.$ ERROR: The indicated folder '[folder]' could not be found in Outlook. 4WARNING - Event List Reset/ The existing Event List will be COMPLETELY ERASED if you proceed. Do you want to clean it? 8WARNING 2 - Event List ResetCopyPrinterHeadersFooters! ~Are you sure you want to COMPLETELY ERASE the whole Event List? 6Event List has been erased. (Outlook Appointments Outlook Tasks 6Auto Holidays Insert Wizard <Auto Holidays Insert finished. :WARNING - Invalid Event DatesF 4The START DATE for event ' ' on line > is greater than its END DATE. The event will not be listed on the output Calendar. Press OK to proceed, CANCEL to stop.! ~Removed invalid characters '/\:?[]*' in Plan Name. Changed to 'F$ Ommitted for faster DEMO Results when generating ALL formats at once.. This limitation is only active on the DEMO version with the "ALL" Calendar Type Selected.SetSheetBackGround CleanTaskLineSaveTaskDetails GetDateOnly ResetTaskList MakeBorderCheckTaskDates MonthIndex GetMonthDaysB To get a full 12 month DEMO, select "Monthly (List)" at the Calendar Type cell near the Run Button (Cell F5 on the "Input" Sheet)EC:\Program Files (x86)\Common Files\Microsoft Shared\OFFICE16\MSO.DLLOffice +Y&&`GetInputValuesCheckSheetNameMainSetColumnWidth SetRowHeight SetPrintArea? To get a full 12 month DEMO, select "Monthly" at the Calendar Type cell near the Run Button (K*           rU~~~~~Z~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~y 1P4|WI(p^? a A0pa'''''++,("#9#a#####$a ta ta A BABaBBBBBC9CaCCa A8FFGQGqGGG)a tAa tYa A@@@A)AQAqAAqa Auuu)vavvva Ay)Qa A  DDEIEyEEEEF1Fa ACADa ta ta HPAHyH1/Y*9+ 'Module1 ThisWorkbookSheet1Module2Module7Sheet5Sheet6Module3Module4Module5Module6Module8Sheet4Sheet7Module9 XLCalendars! | WWW.OFFICEHELP.BIZ - Traditional Calendars for Excel Vs 4.00 :Calendar Generation Finished.  ) This macro is a member of www.OfficeHelp.Biz full family of Calendar Products. PMacro execution stopped by user request." WARNING - Invalid Year. Please enter year between 1905 and 3000. fInsert Holiday Events starting on Excel row number?$ DEMO Version will only work for 2004 and 2005. Using 2005 instead of  4WARNING - Outlook Security POUTLOOK Task / Appointment Import Wizard VOUTLOOK Task / Appointment import finished. TImport tasks starting on Excel row number? .z This is a LIMITED DEMO Edition. it will only work for 2004 and 2005. All other years will be replaced by 2005. To get the FULL UNLIMITED version, use the "GET THE FULL (UNRESTRICTED) VERSION HERE" links on the main INPUT sheet of this DEMO. C29 The Resource optional field is active. Importing the resource field from Outlook calendar aCell F5 on the "Input" Sheet)Excel / /A*@0FC:\Windows\SysWOW64\stdole2.tlbstdole **!+PL-[DRCreateOutputSheet SetGrideLines ColLetterB To get a full 12 month DEMO, select "Monthly 4-5-4" at the Calendar Type cell near the Run Button (Cell F5 on the "Input" Sheet)FHC:\Program Files (x86)\Common Files\Microsoft Shared\VBA\VBA7.1\VBE7.DLLVBA Y. .!/0F?C:\Program Files (x86)\Microsoft Office\Root\Office16\EXCEL.EXED h#e7694S4tigs\ X\`dhl|00000 0 ,04HPTX Input Config C5F Range Value '. C9 F7 1/1/ 12/31/ F5 C12InteriorColorIndex C31 C33 G29FontMF G31 G33 G71 C73 G75  C71 Thin Thick C75 G73 G77 C77 Yes G69 C89 G89 C85 C87 G83 G85 G87 C83 C7 *No Background Picture HImage Files, *.bmp;*.gif;*.jpg;*.pngFFq99F C WK F I 0 F9 C57 C53 C55 Monday F12 I12 C59 H59 J31 C65 C63 C43 C23 C37 C39 C41 C25 C27 C45 C47 START ONLY &START AND END HOURS O C49VBE7.DLL > H >S hq9 /\:?[]* >w  >i  Planning All MakeYearlPlanMakePlan MakeGridYRInsertWeekends InsertTasksYR DrawTasksYRSetPrintAreaYRCopyFont  Traditional MakeCalendar MakeMonth InsertNumbersMakeMonthTitle MakeTitleMakeGrid PaintBlockPaintSelection GetCellColorInsertSpecialDayList RedoBorder TableMakeTableCalendarNameMakeListTableCalendar MonthlyMakeMonthlyCalendarMakeMonthlyCalendar_OLDMakeLargeMonthCalendarGetMaxTasksPerDay CountDayTasks CopyTasks GetDayTasks MakeHeadingPaintSelectionArea ApplyFont Monthly (List)MakeMonthlyListCalendarMakeMonthlyListCalendar_OLDMakeListMonthCalendar MakeDayRow WeekBorder CopyTasksListMakeALLComment Monthly 4-5-4 ZMakeMonthly454CalendarMakeLargeMonthCalendar454 9 Calendar Generation Finished. This macro is a member of www.OfficeHelp.Biz full family of Calendar Products.fĤIx8< >  SelectColumnWidthRowHeight Sheet AfterMove A >  >`  :PageSetupPrintAreaLeftHeaderCenterHeaderRightHeaderLeftFooterCenterFooterRightFooterLeftMarginRightMarginTopMarginBottomMarginHeaderMarginFooterMarginPrintHeadingsPrintGridlinesPrintComments $CenterHorizontally  CenterVertically LANDSCAPEOrientation DraftFirstPageNumber OrderBlackAndWhiteZoomFitToPagesWideFitToPagesTallFilename M14:S14 (SetBackgroundPicture &CenterHeaderPicturePrintTitleRows "PrintTitleColumns &G Height WidthPattern   EBordersLineStyle WeightColumns Count G and >)  Workbook d R:R Event Calendar  - F B Month :B &HorizontalAlignment "VerticalAlignmentWrapTextAddIndentShrinkToFitMergeCells C:AG B2:AG2 Arial :AG :C '  ( ) AF AE AG C:C >  >(  > @ > ` >  >! AddressBold ColorFontStyle ItalicOutlineFontSize Shadow /StrikethroughSubscriptSuperscriptUnderline A:AD C5:J5 L5:S5 U5:AB5 C14:J14 L14:S14 U14:AB14 C23:J23 L23:S23 U23:AB23 C32:J32 L32:S32 U32:AB32 D5:J5 M5:S5 V5:AB5 D14:J14 V14:AB14 D23:J23 M23:S23 V23:AB23 D32:J32 M32:S32 V32:AB32 ( J L S U AB Shift Delete K:K S:S C6:I12 K6:Q12 S6:Y12 C15:I21 K15:Q21 S15:Y21 C24:I30 dd/mm K24:Q30 S24:Y30 C33:I39 K33:Q39 S33:Y39 B2:Z2 B2 B2:AC2 AC Sunday mIndentLevelReadingOrder Merge # , N W D T V H M NONE Legend :G :AB DaysTintAndShade A:A B:B C:N B2:N2 B4:N35 B4:N4 B4:B35EntireRowAutoFit A1 - A:AB D:D E:E 3:3 B2:D2 G:GEntireColumn PORTRAIT >  F:F J:J N:N V:V Z:Z I:I M:M Q:Q U:U Y:Y B2:AB2 B4:D5 F4:H5 J4:L5 N4:P5 R4:T5 V4:X5 Z4:AB5 6:6 NotespF .4,5,4,4,5,4,4,5,4,4,5,4q3i2Eط䭈Fk@$iA`wDFWorkbook @s(IO2W F'@q@^难DF WorksheetwFwBIZ\jiI#dY_O2CJbSAV OutLookTestDetectFirstEmptyRowImportOutlookCalendarImportOutlookCalendar2ImportOutlookTasks GetStatusName TimeNoSeconds Calendar >T  &Outlook.Application MAPIGetNamespace  GetDefaultFolder ItemsFoldersCreateRecipient ,GetSharedDefaultFolder [folder] $IncludeRecurrences [Start]Sort StartEndOrganizercategoriesSubject > StartDate >  >  > 8 > X [Start] > ' ddddd ' AND [End] < 'Restrict > x Owner StatusPercentCompleteComplete 01-01-4501DueDate (Not Defined) Task Not Started Task In Progress Task Complete Task Waiting Task Deferred HollidaysGetUSAHollidays GetEasterDateNDow LastDayMonthInsertHolidays InsertEvents USA USA + VH | @Christmas Day| >k  @New Year's Day| 0@Martin Luther King Day| $@Presidents ' Day| @Easter| @Memorial Day:| $@Independence Day| @Labor Day| @Columbus Day| $@Thanksgiving Day| @Veterans Day| @Valentines| @Halloween| @w-J"X h j~AbG<筥kXm_S CTR1=H/*W__SRP_1:nPROJECTwmTjPROJECT5ZSummaryInformation(8m ineLevelColorDeadLineSTDateEDDateTaskNamePercDoneResourceCatDTiInitRelnMonthnYear Y* SH Y*WBnSheetyYearSelRange HeaderRangeAuxLines TaskEmptysDateedate TaskSDate TaskEDate TaskColor TaskDeadline RealTaskEDatecd Y*)5(FMNumTopColTopRowLowColLowRowMNumInTitleTFontBGColorTSizeTColorMKBorderHFormatDayDateWTLStartRowCalTypesRangenYnMnCol nTaskRowsnDaysnRow MaxLabelCharsBrd UseColors UseThisFontsC1sC2sC3nThisMonthWeekLimit Y*s8 Y*tH StartDateEndDatestrTime CountryCode SpeciaDaysyMNDOWmMonthCNTWeekdUseHol LineToUse:Module1Module1ThisWorkbookThisWorkbookSheet1Sheet1Module2Module2Sheet5Sheet5Sheet6Sheet6Module3Module3Module4Module4Module5Module5Module6Module6Module7Module7Module8Module8Sheet4Sheet4Sheet7Sheet7Module9Module9ID="{00000000-0000-0000-0000-000000000000}" Module=Module1 Document=ThisWorkbook/&H00000000 Document=Sheet1/&H00000000 Module=Module2 Document=Sheet5/&H00000000 Document=Sheet6/&H00000000 Module=Module3 Module=Module4 Module=Module5 Module=Module6 Module=Module7 Module=Module8 Document=Sheet4/&H00000000 Document=Sheet7/&H00000000 Module=Module9 HelpFile="" Name="XLCalendars" HelpContextID="0" Description="Traditional Calendars Generator Macro Vs1.0" VersionCompatible32="393222000" CMG="A4A6082AF8A6FCA6FCA200A200" DPB="1C1EB0B250376D376DC893386D7CBC6106ED2E72496D07AA9F42AEF394B734629A6D79823DC7" GC="9496383AC8B3C9B3C9B3" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] Module1=22, 33, 906, 631, ThisWorkbook=0, 0, 0, 0, C Sheet1=132, 198, 948, 804, Module2=66, 99, 950, 697, Sheet5=0, 0, 0, 0, C Sheet6=0, 0, 0, 0, C Module3=66, 99, 879, 705, Module4=88, 132, 901, 738, Module5=110, 165, 923, 771, Module6=22, 33, 902, 514, Module7=88, 132, 968, 613, Module8=110, 145, 1038, 624, Sheet4=0, 0, 0, 0, C Sheet7=0, 0, 0, 0, C Module9=100, 100, 877, 557, Z Oh+'0 PXd www.officehelp.bizAlexandre PinhoMicrosoft Excel@#B@,>N@JP FMicrosoft Excel 2003 WorksheetBiff8Excel.Sheet.89qhp x @  InputConfigHelpMacro ConfigurationsDemo RestrictionsConfig!Print_Area'Demo Restrictions'!Print_AreaHelp!Print_Area"'Macro Configurations'!Print_ADocumentSummaryInformation87 CompObjrkrea  Worksheets Named RangesHH< _PID_HLINKS_AdHocReviewCycleID_EmailSubject _AuthorEmail_AuthorEmailDisplayName_ReviewingToolsShownOnceA,ua Whttp://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=DemositeTC|)'Demo Restrictions'!A1|) 'Demo Restrictions'!A1,u Whttp://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=DemositeTC,u Whttp://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=DemositeTC,u Whttp://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=DemositeTC,u Whttp://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=DemositeTCk!Whttp://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=demosite37ujChttp://www.officehelp.biz/officehelp/NewContent.asp?ent=DemositeTC,uWhttp://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=DemositeTCE Config!A1E Config!A1AP'Macro Configurations'!A1%tHelp!A1,uWhttp://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=DemositeTC7-http://www.officehelp.biz/  Input!A1}/Shttp://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&pt=supportq{[http://www.officehelp.biz/officehelp/viewcontents.asp?cl=PC%20Tip&id=00004&ent=MacroHelp37  Input!A1q{ ՜.+,D՜.+,HP X`hp x @  InputConfigHelpMacro ConfigurationsDemo RestrictionsConfig!Print_Area'Demo Restrictions'!Print_AreaHelp!Print_Area"'Macro Configurations'!Print_Area  Worksheets Named RangesHH< _PID_HLINKS_AdHocReviewCycleID_EmailSubject _AuthorEmail_AuthorEmailDisplayName_ReviewingToolsShownOnceA,ua Whttp://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=DemositeTC|)'Demo Restrictions'!A1|) 'Demo Restrictions'!A1,u Whttp://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=DemositeTC,u Whttp://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=DemositeTC,u Whttp://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=DemositeTC,u Whttp://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=DemositeTCk!Whttp://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=demosite37ujChttp://www.officehelp.biz/officehelp/NewContent.asp?ent=DemositeTC,uWhttp://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=DemositeTCE Config!A1E Config!A1AP'Macro Configurations'!A1%tHelp!A1,uWhttp://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=DemositeTC7-http://www.officehelp.biz/  Input!A1}/Shttp://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&pt=supportq{[http://www.officehelp.biz/officehelp/viewcontents.asp?cl=PC%20Tip&id=00004&ent=MacroHelp37  Input!A1q{[http://www.officehelp.biz/officehelp/viewcontents.asp?cl=PC%20Tip&id=00004&ent=MacroHelp37q{[http://www.officehelp.biz/officehelp/viewcontents.asp?cl=PC%20Tip&id=00004&ent=MacroHelp37  Input!A1  Input!A1,uWhttp://www.officehelp.biz/officehelp/viewcontents.asp?cl=Macro&id=00037&ent=DemositeTCwmtmartins@sonae.ptMARTINS Marisol Tavares