A Microsoft Office (Excel, Word) forum. OfficeFrustration

If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below.

Go Back   Home » OfficeFrustration forum » Microsoft Excel » General Discussion
Site Map Home Register Authors List Search Today's Posts Mark Forums Read  

ho do i insert calendar into xls worksheet



 
 
Thread Tools Display Modes
  #41  
Old January 11th, 2007, 04:15 PM posted to microsoft.public.excel.misc
tmirelle
external usenet poster
 
Posts: 57
Default ho do i insert calendar into xls worksheet

Tried that already, same result, even tried it unloading the calendar add-in

"Ron de Bruin" wrote:

Close Excel
Start Excel again and try the code from my site in a new workbook

--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"tmirelle" wrote in message news
Thanks, but still no matter where I click in the sheet I get the same

error 424 & highlights the line:

Calendar1.Left = Target.Left + Target.Width - Calendar1.Width


"Ron de Bruin" wrote:

Calendar1 is the name of your calendar

When you are in Edit mode you can see and edit the name in the formulabar on the left
Be sure that it is named Calendar1


--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"tmirelle" wrote in message news Still won't work for me, I'm not sure how to identify the range (it's column A)

But clicking anywhere in the sheet after I have added your code to the
worksheet gives me error 424.

& highlights the line:

Calendar1.Left = Target.Left + Target.Width - Calendar1.Width

I don't know what I am doing wrong.

"Ron de Bruin" wrote:

Change the range in the code to the range with your date cells

See also this note on my site

Note: you can use this if your range is not one area
If Not Application.Intersect(Range("A1:A20,C1,E1"), Target) Is Nothing Then


--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"tmirelle" wrote in message ...
I am trying to get the calendar to pop up everytime you are in the date
column... to help the user get it in in the right format.

Is that possible?

"Ron de Bruin" wrote:

Hi

When you use the code from my page you only have to add the calendar to the worksheet
with Insert Object

Read the page again
http://www.rondebruin.nl/calendar.htm



--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"tmirelle" wrote in message ...
How do you tell what the calendar is named?

I tried just using calendar.... but that didn't work either.

I folled the instructions on this page:
http://www.fontstuff.com/vba/vbatut07.htm

& then I inserted this code on the sheet:

Private Sub Calendar1_Click()
ActiveCell.Value = CDbl(Calendar1.Value)
ActiveCell.NumberFormat = "mm/dd/yyyy"
ActiveCell.Select
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Cells.Count 1 Then Exit Sub
If Not Application.Intersect(Range("A1:A20"), Target) Is Nothing Then
Calendar1.Left = Target.Left + Target.Width - Calendar1.Width
Calendar1.Top = Target.Top + Target.Height
Calendar1.Visible = True
' select Today's date in the Calendar
Calendar1.Value = Date
ElseIf Calendar1.Visible Then Calendar1.Visible = False
End If
End Sub
.

"Ron de Bruin" wrote:

Hi Drahos

Maybe the Calendar you have add to the worksheet is not named
Calendar1

Check out the name

--
Regards Ron de Bruin
http://www.rondebruin.nl


"Drahos" wrote in message ...
Hi Paul,
I need to use in my Excel Form a calender as described. I have done what
was recommeded on the webside you are reffering to. While choosing a cell
from the range where should be the calendar I receive the Runtime error "424"
- object required and the Debug shows this line:
Calendar1.Left = Target.Left + Target.Width - Calendar1.Width

If choosing a cell outside of the range I receive the same runtime error and
the Debug shows this line:

ElseIf Calendar1.Visible Then Calendar1.Visible = False

I use the Excel 2003.

Please, can you advice me what the problem is.
Thanks a lot.


"Paul B" wrote:

halina, here is one way,
http://www.rondebruin.nl/calendar.htm
--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003


"halina" wrote in message
...












  #42  
Old January 11th, 2007, 04:23 PM posted to microsoft.public.excel.misc
Ron de Bruin
external usenet poster
 
Posts: 2,861
Default ho do i insert calendar into xls worksheet

Send me your test workbook private and i look at it

--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"tmirelle" wrote in message ...
Tried that already, same result, even tried it unloading the calendar add-in

"Ron de Bruin" wrote:

Close Excel
Start Excel again and try the code from my site in a new workbook

--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"tmirelle" wrote in message news
Thanks, but still no matter where I click in the sheet I get the same

error 424 & highlights the line:

Calendar1.Left = Target.Left + Target.Width - Calendar1.Width


"Ron de Bruin" wrote:

Calendar1 is the name of your calendar

When you are in Edit mode you can see and edit the name in the formulabar on the left
Be sure that it is named Calendar1


--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"tmirelle" wrote in message news Still won't work for me, I'm not sure how to identify the range (it's column A)

But clicking anywhere in the sheet after I have added your code to the
worksheet gives me error 424.

& highlights the line:

Calendar1.Left = Target.Left + Target.Width - Calendar1.Width

I don't know what I am doing wrong.

"Ron de Bruin" wrote:

Change the range in the code to the range with your date cells

See also this note on my site

Note: you can use this if your range is not one area
If Not Application.Intersect(Range("A1:A20,C1,E1"), Target) Is Nothing Then


--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"tmirelle" wrote in message ...
I am trying to get the calendar to pop up everytime you are in the date
column... to help the user get it in in the right format.

Is that possible?

"Ron de Bruin" wrote:

Hi

When you use the code from my page you only have to add the calendar to the worksheet
with Insert Object

Read the page again
http://www.rondebruin.nl/calendar.htm



--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"tmirelle" wrote in message
...
How do you tell what the calendar is named?

I tried just using calendar.... but that didn't work either.

I folled the instructions on this page:
http://www.fontstuff.com/vba/vbatut07.htm

& then I inserted this code on the sheet:

Private Sub Calendar1_Click()
ActiveCell.Value = CDbl(Calendar1.Value)
ActiveCell.NumberFormat = "mm/dd/yyyy"
ActiveCell.Select
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Cells.Count 1 Then Exit Sub
If Not Application.Intersect(Range("A1:A20"), Target) Is Nothing Then
Calendar1.Left = Target.Left + Target.Width - Calendar1.Width
Calendar1.Top = Target.Top + Target.Height
Calendar1.Visible = True
' select Today's date in the Calendar
Calendar1.Value = Date
ElseIf Calendar1.Visible Then Calendar1.Visible = False
End If
End Sub
.

"Ron de Bruin" wrote:

Hi Drahos

Maybe the Calendar you have add to the worksheet is not named
Calendar1

Check out the name

--
Regards Ron de Bruin
http://www.rondebruin.nl


"Drahos" wrote in message
...
Hi Paul,
I need to use in my Excel Form a calender as described. I have done what
was recommeded on the webside you are reffering to. While choosing a cell
from the range where should be the calendar I receive the Runtime error "424"
- object required and the Debug shows this line:
Calendar1.Left = Target.Left + Target.Width - Calendar1.Width

If choosing a cell outside of the range I receive the same runtime error and
the Debug shows this line:

ElseIf Calendar1.Visible Then Calendar1.Visible = False

I use the Excel 2003.

Please, can you advice me what the problem is.
Thanks a lot.


"Paul B" wrote:

halina, here is one way,
http://www.rondebruin.nl/calendar.htm
--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003


"halina" wrote in message
...













  #43  
Old January 31st, 2007, 07:38 PM posted to microsoft.public.excel.misc
maperalia
external usenet poster
 
Posts: 61
Default ho do i insert calendar into xls worksheet

Hi Ron;
I sorry to bother you again, but I want to make work the calendar in other
computer and does not work.
I noticed that this computer does not have the "calendar control" under the
menu Insert/Object/Create New/"OBJECT TYPE".
Can you tell me how can I add this calendar control in excel?

Thanks in advance.
Maperalia

"Ron de Bruin" wrote:

hi maperalia

If you go in Edit mode (button on the control toolbox toolbar) and select the calendar you can see the name in the formulabar.
You can change it there also


--
Regards Ron de Bruin
http://www.rondebruin.nl


"maperalia" wrote in message ...
Ron;
I got the same error message that Drahos had.
What do you mean with "Maybe the Calendar you have add to the worksheet is
not named Calendar1". How and where can I change this name?

Thanks in advance.
Maperalia



"Ron de Bruin" wrote:

Hi Drahos

Maybe the Calendar you have add to the worksheet is not named
Calendar1

Check out the name

--
Regards Ron de Bruin
http://www.rondebruin.nl


"Drahos" wrote in message ...
Hi Paul,
I need to use in my Excel Form a calender as described. I have done what
was recommeded on the webside you are reffering to. While choosing a cell
from the range where should be the calendar I receive the Runtime error "424"
- object required and the Debug shows this line:
Calendar1.Left = Target.Left + Target.Width - Calendar1.Width

If choosing a cell outside of the range I receive the same runtime error and
the Debug shows this line:

ElseIf Calendar1.Visible Then Calendar1.Visible = False

I use the Excel 2003.

Please, can you advice me what the problem is.
Thanks a lot.


"Paul B" wrote:

halina, here is one way,
http://www.rondebruin.nl/calendar.htm
--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003


"halina" wrote in message
...










  #44  
Old January 31st, 2007, 08:20 PM posted to microsoft.public.excel.misc
Ron de Bruin
external usenet poster
 
Posts: 2,861
Default ho do i insert calendar into xls worksheet

Hi maperalia

See my page
http://www.rondebruin.nl/calendar.htm

You find a link there where you can download the control


--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"maperalia" wrote in message ...
Hi Ron;
I sorry to bother you again, but I want to make work the calendar in other
computer and does not work.
I noticed that this computer does not have the "calendar control" under the
menu Insert/Object/Create New/"OBJECT TYPE".
Can you tell me how can I add this calendar control in excel?

Thanks in advance.
Maperalia

"Ron de Bruin" wrote:

hi maperalia

If you go in Edit mode (button on the control toolbox toolbar) and select the calendar you can see the name in the formulabar.
You can change it there also


--
Regards Ron de Bruin
http://www.rondebruin.nl


"maperalia" wrote in message ...
Ron;
I got the same error message that Drahos had.
What do you mean with "Maybe the Calendar you have add to the worksheet is
not named Calendar1". How and where can I change this name?

Thanks in advance.
Maperalia



"Ron de Bruin" wrote:

Hi Drahos

Maybe the Calendar you have add to the worksheet is not named
Calendar1

Check out the name

--
Regards Ron de Bruin
http://www.rondebruin.nl


"Drahos" wrote in message ...
Hi Paul,
I need to use in my Excel Form a calender as described. I have done what
was recommeded on the webside you are reffering to. While choosing a cell
from the range where should be the calendar I receive the Runtime error "424"
- object required and the Debug shows this line:
Calendar1.Left = Target.Left + Target.Width - Calendar1.Width

If choosing a cell outside of the range I receive the same runtime error and
the Debug shows this line:

ElseIf Calendar1.Visible Then Calendar1.Visible = False

I use the Excel 2003.

Please, can you advice me what the problem is.
Thanks a lot.


"Paul B" wrote:

halina, here is one way,
http://www.rondebruin.nl/calendar.htm
--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003


"halina" wrote in message
...










  #45  
Old January 31st, 2007, 09:21 PM posted to microsoft.public.excel.misc
maperalia
external usenet poster
 
Posts: 61
Default ho do i insert calendar into xls worksheet

Ron;
Thanks for your quick respond.
I have the program load it in the "P" drive. The calendar is working in all
computers except one. This one does not have the "calendar control" under the
menu Insert/Object/Create New/"OBJECT TYPE". I wonder how can I load it in
this computer to make run the program.

Thanks.
Maperalia

"Ron de Bruin" wrote:

Hi maperalia

See my page
http://www.rondebruin.nl/calendar.htm

You find a link there where you can download the control


--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"maperalia" wrote in message ...
Hi Ron;
I sorry to bother you again, but I want to make work the calendar in other
computer and does not work.
I noticed that this computer does not have the "calendar control" under the
menu Insert/Object/Create New/"OBJECT TYPE".
Can you tell me how can I add this calendar control in excel?

Thanks in advance.
Maperalia

"Ron de Bruin" wrote:

hi maperalia

If you go in Edit mode (button on the control toolbox toolbar) and select the calendar you can see the name in the formulabar.
You can change it there also


--
Regards Ron de Bruin
http://www.rondebruin.nl


"maperalia" wrote in message ...
Ron;
I got the same error message that Drahos had.
What do you mean with "Maybe the Calendar you have add to the worksheet is
not named Calendar1". How and where can I change this name?

Thanks in advance.
Maperalia



"Ron de Bruin" wrote:

Hi Drahos

Maybe the Calendar you have add to the worksheet is not named
Calendar1

Check out the name

--
Regards Ron de Bruin
http://www.rondebruin.nl


"Drahos" wrote in message ...
Hi Paul,
I need to use in my Excel Form a calender as described. I have done what
was recommeded on the webside you are reffering to. While choosing a cell
from the range where should be the calendar I receive the Runtime error "424"
- object required and the Debug shows this line:
Calendar1.Left = Target.Left + Target.Width - Calendar1.Width

If choosing a cell outside of the range I receive the same runtime error and
the Debug shows this line:

ElseIf Calendar1.Visible Then Calendar1.Visible = False

I use the Excel 2003.

Please, can you advice me what the problem is.
Thanks a lot.


"Paul B" wrote:

halina, here is one way,
http://www.rondebruin.nl/calendar.htm
--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003


"halina" wrote in message
...











  #46  
Old January 31st, 2007, 09:29 PM posted to microsoft.public.excel.misc
Ron de Bruin
external usenet poster
 
Posts: 2,861
Default ho do i insert calendar into xls worksheet

Cick on this link on my site and then read this

http://www.fontstuff.com/mailbag/qvba01.htm



--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"maperalia" wrote in message ...
Ron;
Thanks for your quick respond.
I have the program load it in the "P" drive. The calendar is working in all
computers except one. This one does not have the "calendar control" under the
menu Insert/Object/Create New/"OBJECT TYPE". I wonder how can I load it in
this computer to make run the program.

Thanks.
Maperalia

"Ron de Bruin" wrote:

Hi maperalia

See my page
http://www.rondebruin.nl/calendar.htm

You find a link there where you can download the control


--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"maperalia" wrote in message ...
Hi Ron;
I sorry to bother you again, but I want to make work the calendar in other
computer and does not work.
I noticed that this computer does not have the "calendar control" under the
menu Insert/Object/Create New/"OBJECT TYPE".
Can you tell me how can I add this calendar control in excel?

Thanks in advance.
Maperalia

"Ron de Bruin" wrote:

hi maperalia

If you go in Edit mode (button on the control toolbox toolbar) and select the calendar you can see the name in the formulabar.
You can change it there also


--
Regards Ron de Bruin
http://www.rondebruin.nl


"maperalia" wrote in message ...
Ron;
I got the same error message that Drahos had.
What do you mean with "Maybe the Calendar you have add to the worksheet is
not named Calendar1". How and where can I change this name?

Thanks in advance.
Maperalia



"Ron de Bruin" wrote:

Hi Drahos

Maybe the Calendar you have add to the worksheet is not named
Calendar1

Check out the name

--
Regards Ron de Bruin
http://www.rondebruin.nl


"Drahos" wrote in message ...
Hi Paul,
I need to use in my Excel Form a calender as described. I have done what
was recommeded on the webside you are reffering to. While choosing a cell
from the range where should be the calendar I receive the Runtime error "424"
- object required and the Debug shows this line:
Calendar1.Left = Target.Left + Target.Width - Calendar1.Width

If choosing a cell outside of the range I receive the same runtime error and
the Debug shows this line:

ElseIf Calendar1.Visible Then Calendar1.Visible = False

I use the Excel 2003.

Please, can you advice me what the problem is.
Thanks a lot.


"Paul B" wrote:

halina, here is one way,
http://www.rondebruin.nl/calendar.htm
--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003


"halina" wrote in message
...












  #47  
Old January 31st, 2007, 10:10 PM posted to microsoft.public.excel.misc
maperalia
external usenet poster
 
Posts: 61
Default ho do i insert calendar into xls worksheet

Ron;
Thank you help. I really appreciatte.

Maperalia

"Ron de Bruin" wrote:

Cick on this link on my site and then read this

http://www.fontstuff.com/mailbag/qvba01.htm



--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"maperalia" wrote in message ...
Ron;
Thanks for your quick respond.
I have the program load it in the "P" drive. The calendar is working in all
computers except one. This one does not have the "calendar control" under the
menu Insert/Object/Create New/"OBJECT TYPE". I wonder how can I load it in
this computer to make run the program.

Thanks.
Maperalia

"Ron de Bruin" wrote:

Hi maperalia

See my page
http://www.rondebruin.nl/calendar.htm

You find a link there where you can download the control


--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"maperalia" wrote in message ...
Hi Ron;
I sorry to bother you again, but I want to make work the calendar in other
computer and does not work.
I noticed that this computer does not have the "calendar control" under the
menu Insert/Object/Create New/"OBJECT TYPE".
Can you tell me how can I add this calendar control in excel?

Thanks in advance.
Maperalia

"Ron de Bruin" wrote:

hi maperalia

If you go in Edit mode (button on the control toolbox toolbar) and select the calendar you can see the name in the formulabar.
You can change it there also


--
Regards Ron de Bruin
http://www.rondebruin.nl


"maperalia" wrote in message ...
Ron;
I got the same error message that Drahos had.
What do you mean with "Maybe the Calendar you have add to the worksheet is
not named Calendar1". How and where can I change this name?

Thanks in advance.
Maperalia



"Ron de Bruin" wrote:

Hi Drahos

Maybe the Calendar you have add to the worksheet is not named
Calendar1

Check out the name

--
Regards Ron de Bruin
http://www.rondebruin.nl


"Drahos" wrote in message ...
Hi Paul,
I need to use in my Excel Form a calender as described. I have done what
was recommeded on the webside you are reffering to. While choosing a cell
from the range where should be the calendar I receive the Runtime error "424"
- object required and the Debug shows this line:
Calendar1.Left = Target.Left + Target.Width - Calendar1.Width

If choosing a cell outside of the range I receive the same runtime error and
the Debug shows this line:

ElseIf Calendar1.Visible Then Calendar1.Visible = False

I use the Excel 2003.

Please, can you advice me what the problem is.
Thanks a lot.


"Paul B" wrote:

halina, here is one way,
http://www.rondebruin.nl/calendar.htm
--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003


"halina" wrote in message
...













 




Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is Off
HTML code is Off
Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
Insert Picture Error Lynda Powerpoint 19 November 22nd, 2005 10:00 PM
can you insert a comment into a protected worksheet? TKGerdie Worksheet Functions 3 October 18th, 2005 04:32 PM
can I insert a calendar page into a Publisher brochure template? Cheska99 Publisher 3 September 22nd, 2005 09:26 PM
Insert worksheet Krish General Discussion 2 July 12th, 2004 01:22 AM
auto insert copy of worksheet Bernie Deitrick Worksheet Functions 0 March 4th, 2004 03:18 PM


All times are GMT +1. The time now is 03:37 AM.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 OfficeFrustration.
The comments are property of their posters.