I've been reading through the forums, but do not know how to double click to get the calendar pop up,only in a certain range (e.g. Cells G5:G85).
I already have the module: frmCalendar
Running Office 2003
I want to run a macro any time any cell in a range is double clicked. I can make it work with just on cell, but not any cell in the range.
View 3 Replies View RelatedI have a sheet where i have many differently named areas (like state1_1 and state1_2) When I doubleclick on a cell then a macro should run with following criteria: 1) Macro will run if the doubleclicked cell is part of any range in the list. Here I mean that names of ranges which belong to that list start with word state (like state1_1 and state1_2). No other ranges should not be in that list. If the cell is not in the range that is part of the list, then nothing should happen.
View 2 Replies View RelatedI have this list of all rangenames in my workbookin column A:A
For some reason I want to doubleclick on the rangename in the list to activate this range.
The reason is that I want more smooth activation-prosess; The Excel Range List is too long to practical use as a direct lookup, so I want to activate directly from my own list (where i have added definitions to the range names.
I have tried to build a hyperlink formula, but failed. Maybe the macro below can be modified to do the job, but I am stuck here as well.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim RangeName
Application.ScreenUpdating = False
If Target.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("A:A")) Is Nothing Then
Cancel = True
[Code] ...........
I have a code for doubleclick on a cell and a gdt application chart will open.
Private Sub Worksheet_BeforeDoubleClicK(ByVal Target As Range, Cancel As Boolean)
ActiveSheet.Unprotect
ThisWorkbook.Unprotect
Dim i As Integer
Dim gdt As Long
Dim S As String
Cancel = True
With Application
If Target.Address(False, False) "C11" Then Exit Sub
'Place your direct path to open this GDT application
S = "C:Documents and SettingsUserMy DocumentsAndy's MachineINSPECTIONGDTGDT BitmapGD&T_Font.exe"
If Dir(S) = "" Then
MsgBox "File does not exist:" & vbCrLf & S, vbCritical, "Error"
Exit Sub
End If
gdt = Shell("""" & S & """", vbNormalFocus)
End With
ActiveSheet.Protect
ThisWorkbook.Protect
End Sub
What would the code be for a range of cells if doulbe clicked the range would be C11 thru C35
Also, I have a double click code for another symbol chart to open.
How, would this be used in the same manner if a coulmn or row were to apply on double click.
writing the correct command to auto popup a calendar when a user doubleclicks in any cell in a range of cells. I have the code for individual cells but would like to apply to a very large range of cells and do not know what the correct command is.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Select Case Target.Address
Case "$C$160", "$C$161", "$C$162", "$C$163"
Cancel = True
Call OpenCalendar
End Select
End Sub
I am encountering is that with my knowledge I can only get one range to work on the worksheet_before doubleclick function and thats the sort range.
I need several different ranges with each range giving a target value uinique to that range.
I am trying to run a macro when I double click on a certain cell (D34). The cell has data in it (Southeast NSC). What I am expecting to happen is once I double click on the cell the macro will run the retrieve and I will end up at expense chart page.
The macro I am trying to run is an Essbase retrieve.
[Code] ....
I tried using the macro below but no luck:
[Code] ....
And i tried:
[Code] ....
I want to be able to double click on a cell in a column. If it has a certain word in it, it will take it to that worksheet. Auto filters are used so these cells can move in a column at any time. This is why I am looking for a code to validate the contents in the cell first.
ie. Cell has the word: BSALT, when double clicked it will take it to the BSALT worksheet.
Cell has the word MLW, when double clicked it will take it to the MLW worksheet.
And so on.
These values are in one column only. If they weren't able to be autofiltered i could do it, but the mere fact that they can move around is giving me trouble.
Normally when I double click on a cell with a formula linked to another spreadsheet, the double click takes you to the source. However, if the cell also has a comment, the double click takes you into the edit comment option and not to the source.
Is it possible to turn off the edit comment option from the double click?
What happens when I double click a cell in a pivot table?
Or when I double click the grand total?
I have a list of numbers in column B of one sheet.
these numbers are unique and randomly allocated to other sheets in the workbook.
i would like a macro which when a user double clicks on a cell in the list of numbers .. the macro will jump to the sheet containing that number.. (i.e. do something like the find function)...
I have some code below which might be useful for you but I can't work out what I need to write.
I'm trying to do is create a link so that if you double click on a cell in a range (Sheet1!A3:A100) it will copy the value (ie Sheet1!A6) and paste it to the next sheet in a fixed cell (sheet2!B2).
The reason is I want to use the next sheet to do Vlookups (or may just do it in a macro) to fill in a template.
I am looking for assisitance in combining the functionality of two seperate combo box code sets. The first combo box code set allows the combo box to automaticially appear when a user Clicks on a cell that contains a data validation list. The second set of code will have a combo box appear when a user Double-clicks on a cell that contains a data validation list. And the code allows for Named Ranges on a seperate worksheet.
I would like to have the functionality of having the combo box to appear when a user Clicks on a cell and not having to Double-click. Also, I would like to have the option to use Named Ranges on a seperate worksheet ("Validation Lists").
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim str As String
Dim cboTemp As OLEObject
Dim ws As Worksheet
Set ws = ActiveSheet
On Error Goto errHandler
If Target.Count > 1 Then Goto exitHandler
Set cboTemp = ws.OLEObjects("TempCombo")
On Error Resume Next
If cboTemp.Visible = True Then
With cboTemp
.Top = 10
.Left = 10
.ListFillRange = ""
.LinkedCell = ""
.Visible = False
.Value = ""
End With
End If................
I am trying to make it so that when you double-click in a cell in column A, a message box opens populated with the text string in the corresponding cell (same row) in column Z. Seems to me like it should be easy enough, but despite spending the last hour searching for clues, I can't seem to figure it out.
View 8 Replies View RelatedI have made a toggle button to turn diagonal borders on and off in a single cell. Is there a way to make the button transparent, such that the button can be placed over the cell itself and the contents of the cell will be visible underneath, no matter the condition of the toggle?
View 8 Replies View RelatedI've found the code below and tweaked to suit my needs but having trouble. Had it working one time. The code below calls a userform when the user double clicks on a cell. The form pops up and is not active/enabled. I cannot select anything on the form until I select a cell on the sheet, then everything on form becomes active/enabled.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'check cells for desired format to trigger the frmSel_WBS.show routine
'otherwise exit the sub
Dim NumberFormat, DF
NumberFormat = Array("[Blue]General")
For Each DF In NumberFormat
If DF = Target.NumberFormat Then
frmSel_WBS.Show vbModeless
End If
Next
End Sub
Is there a way to make a cell that when you click it a calendar pops-up and you can click a date on that calendar to auto-fill in that cell?
View 9 Replies View Relatedfollowing on from previous post (http://www.excelforum.com/excel-prog...g-up-form.html) what if the selected cell is a merged cell (cell count is greateer than 1), what is the best solution to enable double click event on merged cell ?
View 2 Replies View RelatedI'm trying to double-click a cell to edit the contents, and I am off a few pixels, it treats the double-click as a double-click on the cell border, not the cell contents, and the focus jumps to another cell in the direction of the border instead of going into edit mode. The effect is as if I had pressed Ctrl and the arrow in the direction of the border I clicked on.
The only way I've found to disable this is to turn off the option "Enable fill handle and cell drag-and-drop", but unchecking that also disables actually useful things, like dragging the corner of a formula call to copy it down, etc.
Is there a good way to disable this cell jumping when I accidentally double-click a cell border?
if there is a workaround to this issue. I have this code that transfers data to a textbox but it stops after hitting the character limit. Does anyone know how to extend this limit ?
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True
With Me.Shapes("textbox1").TextFrame.Characters
.Text = .Text & Target.Value
End With
End Sub
I have read through numerous posts, but cannot get one thing to work. I am using Excel 2003, and am trying to get a calendar to pop up, to select a date, and then return that date to Cell B2.
I was successful at making the calendar pop up by the following methods:
1. Added a button to the toolbar, and assigned the Calendar Macro to it.
2. Using VB, added a sub-menu item to the right-click (context) menu, using the code below.
Private Sub Workbook_Open()
Application.OnKey "+^{C}", "Module1.Macro2"
End Sub
However, my goal is to make the calendar appear when I click on cell B2.
I tried using the following code, but when I click on B2 nothing happens.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$B$2" Then UserForm1.Show
End Sub
I also tried:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel As Boolean)
With Worksheets(ActiveCell.Worksheet.Name)
If ActiveCell.Column = 2 Then
If ActiveCell.Row = 1 Then
UserForm1.Show
End If
End If
End With
End Sub
I need to popup a calendar when user clicks on a cell.
I am using the internal add-in MScal 8.0 but can only insert date
my clicking on a cell and activating the macro.
also is there a way if user selects enable macros on digital certificates
that the addin can be selected automaticly for the user?
How to run some VBA code only when double click any cell of three different columns (say A, G,H) and not run in any other cell. This is being run in Excel 2007.
View 7 Replies View RelatedI would like to be able to track progress of various tasks/occurences by allowing users of a spreadsheet to just click in the appropriate column and in doing so, it would fill in the current time and date. I.E. Column headings would read, "Item Sent to Review", "Item Received From Review", "Item Sent to Specialist", etc. and I want users to be able to double click in a given column to populate with current date/time information,
View 7 Replies View RelatedI have spreadsheet with client names. I'd like to build logic that will open a form with client information when a user double-clicks on the client name. But I have a couple of problems.
- First, I'd like to protect the sheet and hide the formulas. But when I protect the sheet, I get the "the cell or chart you are trying to change is protected" error when I double click the protected cell.
- If I deselect the "Select Locked Cells" options when I protect the sheet, I no longer have the ability to double-click on the cell.
how I can double click on a cell yet not allow the user to edit the cell (or see the formula)?
I'm trying to write a code to say, pop a calendar if clicked on anyone of the following cells:
Sheet : "Friday"
Cell Range: D3 to D999, F3 to F999, H3 to H999
I'm hoping this function will not affect me from using the Sort (by date) later on.
Sheet1
Upon clicking any cell in Sheet1, it will automatically filter based on cell A and B.
Sheet2
Automaticall display filtered criteria based on double click from Sheet1
For example: when I double click on C1, on Sheet2 will automatically diplay filtered data based on A1 and B1 and same thing goes to if I double clik on C2 on Sheet2 will automatically diplay filtered data based on A1 and B2.
The datas has stored in columns "a:g" all the way down.
When i double click any cell in column "A" I would like to store the value one by one into the column "K" from first cell to down.
I am currently using a pop up calendar in Excel 2010 that with CTL+SHIFT+B that a calendar pops up, you select your date, and then the calendar closes. What I now need is to write a code or formula or something that when I click in any cell in column F lets say that the calendar opens automatically in that cell and then still close automatically after the date selection is made.
View 3 Replies View Related