Home |
Search |
Today's Posts |
|
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
I have a range of cells on Sheet 1 (lets say, range C10:Z500). For each cell
in this range, I want to program it so that when a user double-clicks a cell, it takes them to the same cell reference on Sheet 2. (i.e. if I click cell G45 on the first sheet, it takes me to cell G45 on the second sheet). Can anyone help me with the proper code for this action? |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
try this idea
right click sheet tabview codeinsert thisSAVE Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Column < 1 Then Exit Sub Application.Goto Sheets("sheet7").Range(Target.Address) End Sub -- Don Guillett SalesAid Software "JDay01" wrote in message ... I have a range of cells on Sheet 1 (lets say, range C10:Z500). For each cell in this range, I want to program it so that when a user double-clicks a cell, it takes them to the same cell reference on Sheet 2. (i.e. if I click cell G45 on the first sheet, it takes me to cell G45 on the second sheet). Can anyone help me with the proper code for this action? |
#3
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean) Const WS_RANGE As String = "C10:Z500" Dim rng As Range On Error GoTo ws_exit Application.EnableEvents = False If Not Intersect(Target, Range(WS_RANGE)) Is Nothing Then Set rng = Worksheets("Sheet2").Range(Target.Address) Worksheets("Sheet2").Activate rng.Select End If ws_exit: Application.EnableEvents = True On Error GoTo 0 End Sub This is worksheet event code, which means that it needs to be placed in the appropriate worksheet code module, not a standard code module. To do this, right-click on the sheet tab, select the View Code option from the menu, and paste the code in. -- HTH Bob Phillips (replace xxxx in the email address with gmail if mailing direct) "JDay01" wrote in message ... I have a range of cells on Sheet 1 (lets say, range C10:Z500). For each cell in this range, I want to program it so that when a user double-clicks a cell, it takes them to the same cell reference on Sheet 2. (i.e. if I click cell G45 on the first sheet, it takes me to cell G45 on the second sheet). Can anyone help me with the proper code for this action? |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Buttons that appear when double clicking in a cell | Excel Worksheet Functions | |||
How do i execute a VBA function by clicking on an excel cell? | Excel Discussion (Misc queries) | |||
Launching a macro by double-clicking on active cell | Excel Programming | |||
double clicking on a source cell | Excel Worksheet Functions | |||
Clicking on a cell to execute a routine | Excel Programming |