Populate Cell Date Value with Active X Calendar Control

  • Thread starter Thread starter Jim Lawrence
  • Start date Start date
J

Jim Lawrence

Can someone tell me if it's possible to populate a date cell by using the
Calendar Control? I want to click in a date-formated cell then have the the
calendar appear. I want to select the date value from the control and
populate the cell. Please help!!!
 
In the VBA editor, open the Sheet code module for the worksheet on
which the Calendar control resides. Then use code like

Private Sub Calendar1_AfterUpdate()
Range("A1").Value = Me.Calendar1.Value
End Sub

Cordially,
Chip Pearson
Microsoft Most Valuable Professional
Excel Product Group, 1998 - 2009
Pearson Software Consulting, LLC
www.cpearson.com
(email on web site)


On Fri, 13 Feb 2009 07:24:12 -0800, Jim Lawrence <Jim
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Add a new row in Named Table (Table1) and add data from txtboxes into last empty cells based on header named of the Table1 0
Excel VBA to go to specific sheet & cell in the current workbook not working. 2
Run a macro when clicking a cell. 9
Excel VBA to move cells to sheet2 based on selection in sheet1 0
Calendar Control 3
copy value calendar control 1
Trying to run excel vba code when cell value changes from empty to entered value. 1
If Then formula help needed 3

Back
Top