Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Calendar
I have recently started teaching myself VBA and am still getting to grips
with it. I have created a calendar and its all working fine but how do I get it to only pop up if they select a certain column or cell. Regards |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Calendar
Maybe you could use a worksheet_selectionchange event.
Option Explicit Private Sub Worksheet_SelectionChange(ByVal Target As Range) With Target If .Cells.Count 1 Then Exit Sub If Intersect(.Cells, Me.Range("a:a")) Is Nothing Then Exit Sub Else UserForm1.Show End If End With End Sub Or you could tie into a rightclick or doubleclick event. You can read more about events at: Chip Pearson's site: http://www.cpearson.com/excel/events.htm David McRitchie's site: http://www.mvps.org/dmcritchie/excel/event.htm Pasty wrote: I have recently started teaching myself VBA and am still getting to grips with it. I have created a calendar and its all working fine but how do I get it to only pop up if they select a certain column or cell. Regards -- Dave Peterson |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Calendar
In the Worksheet_SelectionChange event hander, you'll need something like this:
If Target.Address = "$A$1" Then 'pop up your calendar when user selects cell A1 End If If you wanted to pop up your calendar when a certain column is selected, you do it like this: If Target.Column = 1 Then 'pop up your calendar when user selects any cell in column A End If Note that the selectionchange event does not distinguish wether the cell was selected via a mouse click or by moving the selection cursor with the keyboard. "Pasty" wrote: I have recently started teaching myself VBA and am still getting to grips with it. I have created a calendar and its all working fine but how do I get it to only pop up if they select a certain column or cell. Regards |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Calendar
Tried this out but I am getting nowhere with it.
"Dave Peterson" wrote: Maybe you could use a worksheet_selectionchange event. Option Explicit Private Sub Worksheet_SelectionChange(ByVal Target As Range) With Target If .Cells.Count 1 Then Exit Sub If Intersect(.Cells, Me.Range("a:a")) Is Nothing Then Exit Sub Else UserForm1.Show End If End With End Sub Or you could tie into a rightclick or doubleclick event. You can read more about events at: Chip Pearson's site: http://www.cpearson.com/excel/events.htm David McRitchie's site: http://www.mvps.org/dmcritchie/excel/event.htm Pasty wrote: I have recently started teaching myself VBA and am still getting to grips with it. I have created a calendar and its all working fine but how do I get it to only pop up if they select a certain column or cell. Regards -- Dave Peterson |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Calendar
Do you use the calendar control on a worksheet ?
See http://www.rondebruin.nl/calendar.htm -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "Pasty" wrote in message ... I have recently started teaching myself VBA and am still getting to grips with it. I have created a calendar and its all working fine but how do I get it to only pop up if they select a certain column or cell. Regards |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
Calendar
Ah, maybe it's time to add some more explanation.
Pasty wrote: Tried this out but I am getting nowhere with it. "Dave Peterson" wrote: Maybe you could use a worksheet_selectionchange event. Option Explicit Private Sub Worksheet_SelectionChange(ByVal Target As Range) With Target If .Cells.Count 1 Then Exit Sub If Intersect(.Cells, Me.Range("a:a")) Is Nothing Then Exit Sub Else UserForm1.Show End If End With End Sub Or you could tie into a rightclick or doubleclick event. You can read more about events at: Chip Pearson's site: http://www.cpearson.com/excel/events.htm David McRitchie's site: http://www.mvps.org/dmcritchie/excel/event.htm Pasty wrote: I have recently started teaching myself VBA and am still getting to grips with it. I have created a calendar and its all working fine but how do I get it to only pop up if they select a certain column or cell. Regards -- Dave Peterson -- Dave Peterson |
#7
Posted to microsoft.public.excel.programming
|
|||
|
|||
Calendar
Hi,
Yes it will be used on a worksheet. I have made the calendar in the user forms bit and i have also got it set up so it automatically feeds into the cells when clicked on, but I don't have any code to make it start up when I click on the specific cells. "Ron de Bruin" wrote: Do you use the calendar control on a worksheet ? See http://www.rondebruin.nl/calendar.htm -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "Pasty" wrote in message ... I have recently started teaching myself VBA and am still getting to grips with it. I have created a calendar and its all working fine but how do I get it to only pop up if they select a certain column or cell. Regards |
#8
Posted to microsoft.public.excel.programming
|
|||
|
|||
Calendar
See Dave's example for column A
-- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "Pasty" wrote in message ... Hi, Yes it will be used on a worksheet. I have made the calendar in the user forms bit and i have also got it set up so it automatically feeds into the cells when clicked on, but I don't have any code to make it start up when I click on the specific cells. "Ron de Bruin" wrote: Do you use the calendar control on a worksheet ? See http://www.rondebruin.nl/calendar.htm -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "Pasty" wrote in message ... I have recently started teaching myself VBA and am still getting to grips with it. I have created a calendar and its all working fine but how do I get it to only pop up if they select a certain column or cell. Regards |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Convert date from Gregorian Calendar to Hijri Calendar | Excel Discussion (Misc queries) | |||
find free sharware to include calendar pop or use calendar in cell | Excel Discussion (Misc queries) | |||
how do i export excel calendar info to outlook calendar? | Excel Discussion (Misc queries) | |||
Modify Yearly Calendar to Monthly Calendar Excel 2000? | Excel Programming | |||
import calendar items from excel into outlook calendar | Excel Discussion (Misc queries) |