Streamlining your workflow often involves managing your time effectively, and Excel's calendar selection feature can be a game-changer in this regard. By learning how to set up calendar selection in Excel, you can automate tasks, track deadlines, and plan your schedule with ease. Let's dive into this useful tool and explore its capabilities.

FREE Calendar & Planner Excel Template for 2026
FREE Calendar & Planner Excel Template for 2026

Before we begin, ensure you're using Excel 2010 or later, as the calendar selection feature is not available in earlier versions. Also, make sure you have a date column in your data range, as this is crucial for the calendar selection to work correctly.

How to Insert a Calendar in Excel (the Simplest Way)
How to Insert a Calendar in Excel (the Simplest Way)

Understanding Calendar Selection in Excel

Calendar selection in Excel allows you to pick a date from a drop-down calendar, making data entry more intuitive and user-friendly. It's particularly useful in scenarios where you need to input or validate dates, such as project start and end dates, deadlines, or event scheduling.

How to Create Year and School Calendar with Dynamic Date Markers » The Spreadsheet Page
How to Create Year and School Calendar with Dynamic Date Markers » The Spreadsheet Page

Excel's calendar selection feature is essentially a data validation tool that restricts the user's input to a specific date range. It's not a built-in feature but can be created using a combination of Excel's built-in tools and a bit of VBA (Visual Basic for Applications) coding.

Enabling the Calendar Selection Feature

Free Excel Calendar Template
Free Excel Calendar Template

To set up calendar selection in Excel, you'll first need to enable the Developer tab in your ribbon, as this is where the Visual Basic editor is located. Here's how to do it:

1. Right-click on the Ribbon and select 'Customize the Ribbon'.

2. Check the box next to 'Developer' and click 'OK'.

an image of a calendar in excel
an image of a calendar in excel

Creating the Calendar Selection Drop-Down

Now that the Developer tab is enabled, you can create the calendar selection drop-down. Here's a step-by-step guide:

1. Click on the 'Developer' tab and then click on 'Visual Basic'.

Create a Calendar in Excel - Tutorial
Create a Calendar in Excel - Tutorial

2. In the Visual Basic Editor, go to 'Insert' > 'Module' to insert a new module.

3. Copy and paste the following VBA code into the module:

How to create a drop down list calendar (date picker) in Excel?
How to create a drop down list calendar (date picker) in Excel?
Free Excel Calendar Templates
Free Excel Calendar Templates
Excel Tips: Create a calendar in Excel | INTHEBLACK
Excel Tips: Create a calendar in Excel | INTHEBLACK
How to Make a Calendar in Excel [Complete Guide + Free Templates] - GeeksforGeeks
How to Make a Calendar in Excel [Complete Guide + Free Templates] - GeeksforGeeks
How to Customize A Calendar Template in Excel
How to Customize A Calendar Template in Excel
How to Make & Format a Calendar in Excel - Tutorials
How to Make & Format a Calendar in Excel - Tutorials
Calender in Excel ‼️ Amazing Excel trick using data validation and conditional formatting ✅ #Excel
Calender in Excel ‼️ Amazing Excel trick using data validation and conditional formatting ✅ #Excel
How to Make a Family Calendar in Excel
How to Make a Family Calendar in Excel
How to insert calendar in Excel (Date Picker & printable calendar template)
How to insert calendar in Excel (Date Picker & printable calendar template)
Calendar in Excel: Make Dynamic, Interactive Calendar in Excel with Formula + Conditional Formatting
Calendar in Excel: Make Dynamic, Interactive Calendar in Excel with Formula + Conditional Formatting
a calendar with the words boss how did you create this calendar in excel?
a calendar with the words boss how did you create this calendar in excel?
Calendar Integrated with a To Do List Template in Excel
Calendar Integrated with a To Do List Template in Excel
How to insert dates from a Popup Calendar (date picker) in Excel – user guide | XLTools
How to insert dates from a Popup Calendar (date picker) in Excel – user guide | XLTools
Ready to kick off 2025 with organisation and style?
Ready to kick off 2025 with organisation and style?
9.6K views · 984 reactions | This Excel Calendar will save you so much time! 🤯 Learn how to build a 2026 dynamic Calendar in Excel! ✨ #scribe #excel #spreadsheets #accounting #exceltips #finance #workhacks #excelt | Easilyexcel
9.6K views · 984 reactions | This Excel Calendar will save you so much time! 🤯 Learn how to build a 2026 dynamic Calendar in Excel! ✨ #scribe #excel #spreadsheets #accounting #exceltips #finance #workhacks #excelt | Easilyexcel
How to Make & Format a Calendar in Excel - Tutorials
How to Make & Format a Calendar in Excel - Tutorials
How to make a dynamic calendar in excel
How to make a dynamic calendar in excel
Excel Calendar 2025 with 25 designed layouts - Free Download
Excel Calendar 2025 with 25 designed layouts - Free Download
How to Create a Month Calendar in Excel - Tutorial 📆
How to Create a Month Calendar in Excel - Tutorial 📆
How to Make an Interactive Calendar in Excel? (2026 Template)
How to Make an Interactive Calendar in Excel? (2026 Template)

    `Sub DatePicker()

        `Dim o As Object

        `Set o = CreateObject("Excel.Chart")

        `o.ChartType = xlXYScatterLines

        `o.ChartStyle = 203

        `o.ChartTitle = ""

        `o.Axes(xlCategory).TickLabels = Array("Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec")

        `o.Axes(xlValue).TickLabels = Array("")

        `o.Axes(xlCategory).TickMarkSpacing = 1

        `o.Axes(xlCategory).Minimum = 1

        `o.Axes(xlCategory).Maximum = 12

        `o.Axes(xlValue).Minimum = 1

        `o.Axes(xlValue).Maximum = 31

        `o.Axes(xlValue).TickLabels = Array("1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12", "13", "14", "15", "16", "17", "18", "19", "20", "21", "22", "23", "24", "25", "26", "27", "28", "29", "30", "31")

        `o.Axes(xlValue).TickMarkSpacing = 1

        `o.PlotArea.ClearFormats

        `o.PlotArea.Fill.ForwardApply

        `o.PlotArea.Fill.Solid

        `o.PlotArea.Fill.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Fill.Transparency = 0

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255, 255)

        `o.PlotArea.Line.Weight = 0

        `o.PlotArea.Line.Transparency = 0

        `o.PlotArea.Line.ForeColor.RGB = RGB(255, 255,