| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
VBA equivalent to "Return/Enter" Key
I've got code that is working up to a point **and stops** -- the screen
(bottom left shows I'm in Edit Mode) - and the cursor is "inside" a cell -- all that I have to do is manually press enter and it completes. soooooo obviously I'd like to incorporate this "last-step" in the code. Can someone tell me what I should add to the code to have it complete the update. TIA, |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
VBA equivalent to "Return/Enter" Key
Use
Sendkeys {ENTER} or Sendkeys ~ See vb help using keyword sendkeys Cheers Joe "JMay" wrote in message news:USHgb.45210$AH4.15989@lakeread06... I've got code that is working up to a point **and stops** -- the screen (bottom left shows I'm in Edit Mode) - and the cursor is "inside" a cell -- all that I have to do is manually press enter and it completes. soooooo obviously I'd like to incorporate this "last-step" in the code. Can someone tell me what I should add to the code to have it complete the update. TIA, |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
VBA equivalent to "Return/Enter" Key
If I understand you correctly, you are editing a cell but want VBA to then
hit enter. I don't think it can be done. Once you go into edit mode, Excel has full control, and VBA will not resume operation until editing is complete. Is there a particular need to do whatever you are trying to do in this fashion, or could you look at an alternative technique? Robin Hammond www.enhanceddatasystems.com Check out our XspandXL add-in "JMay" wrote in message news:USHgb.45210$AH4.15989@lakeread06... I've got code that is working up to a point **and stops** -- the screen (bottom left shows I'm in Edit Mode) - and the cursor is "inside" a cell -- all that I have to do is manually press enter and it completes. soooooo obviously I'd like to incorporate this "last-step" in the code. Can someone tell me what I should add to the code to have it complete the update. TIA, |
|
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
VBA equivalent to "Return/Enter" Key
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean) If ActiveCell.Font.Strikethrough = True Then ActiveCell.Font.Strikethrough = False Else ActiveCell.Font.Strikethrough = True End If SendKeys {Enter} <<< This won't take ??? End Sub Can you help? TIA "Joe 90" (remove silly spam) wrote in message ... Use Sendkeys {ENTER} or Sendkeys ~ See vb help using keyword sendkeys Cheers Joe "JMay" wrote in message news:USHgb.45210$AH4.15989@lakeread06... I've got code that is working up to a point **and stops** -- the screen (bottom left shows I'm in Edit Mode) - and the cursor is "inside" a cell -- all that I have to do is manually press enter and it completes. soooooo obviously I'd like to incorporate this "last-step" in the code. Can someone tell me what I should add to the code to have it complete the update. TIA, |
|
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
VBA equivalent to "Return/Enter" Key
Joe,
Try: Application.SendKeys "{Enter}" Worked for me. Win XP, XL2000 John "JMay" wrote in message news:w9Kgb.45612$AH4.42671@lakeread06... Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If ActiveCell.Font.Strikethrough = True Then ActiveCell.Font.Strikethrough = False Else ActiveCell.Font.Strikethrough = True End If SendKeys {Enter} <<< This won't take ??? End Sub Can you help? TIA "Joe 90" (remove silly spam) wrote in message ... Use Sendkeys {ENTER} or Sendkeys ~ See vb help using keyword sendkeys Cheers Joe "JMay" wrote in message news:USHgb.45210$AH4.15989@lakeread06... I've got code that is working up to a point **and stops** -- the screen (bottom left shows I'm in Edit Mode) - and the cursor is "inside" a cell -- all that I have to do is manually press enter and it completes. soooooo obviously I'd like to incorporate this "last-step" in the code. Can someone tell me what I should add to the code to have it complete the update. TIA, |
|
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
VBA equivalent to "Return/Enter" Key
The way I read it is that when you double-click the cell, the event is
triggered so the macro is run, and then Excel puts you in edit mode. Cancel = True takes care of the edit mode problem. Private Sub Worksheet_BeforeDoubleClick(ByVal Target _ As Range, Cancel As Boolean) With Target(1, 1) .Font.Strikethrough = Not .Font.Strikethrough End With Cancel = True End Sub "JMay" wrote in message news:w9Kgb.45612$AH4.42671@lakeread06... Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If ActiveCell.Font.Strikethrough = True Then ActiveCell.Font.Strikethrough = False Else ActiveCell.Font.Strikethrough = True End If SendKeys {Enter} <<< This won't take ??? End Sub Can you help? TIA "Joe 90" (remove silly spam) wrote in message ... Use Sendkeys {ENTER} or Sendkeys ~ See vb help using keyword sendkeys Cheers Joe "JMay" wrote in message news:USHgb.45210$AH4.15989@lakeread06... I've got code that is working up to a point **and stops** -- the screen (bottom left shows I'm in Edit Mode) - and the cursor is "inside" a cell -- all that I have to do is manually press enter and it completes. soooooo obviously I'd like to incorporate this "last-step" in the code. Can someone tell me what I should add to the code to have it complete the update. TIA, |
|
#7
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
VBA equivalent to "Return/Enter" Key
Thanks to all; I also ended up adding to a UDF SumNonStrukeThruAmts() the
line: Application.volatile Which makes my full procedure work great Tks, "Tim Zych" wrote in message ... The way I read it is that when you double-click the cell, the event is triggered so the macro is run, and then Excel puts you in edit mode. Cancel = True takes care of the edit mode problem. Private Sub Worksheet_BeforeDoubleClick(ByVal Target _ As Range, Cancel As Boolean) With Target(1, 1) .Font.Strikethrough = Not .Font.Strikethrough End With Cancel = True End Sub "JMay" wrote in message news:w9Kgb.45612$AH4.42671@lakeread06... Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If ActiveCell.Font.Strikethrough = True Then ActiveCell.Font.Strikethrough = False Else ActiveCell.Font.Strikethrough = True End If SendKeys {Enter} <<< This won't take ??? End Sub Can you help? TIA "Joe 90" (remove silly spam) wrote in message ... Use Sendkeys {ENTER} or Sendkeys ~ See vb help using keyword sendkeys Cheers Joe "JMay" wrote in message news:USHgb.45210$AH4.15989@lakeread06... I've got code that is working up to a point **and stops** -- the screen (bottom left shows I'm in Edit Mode) - and the cursor is "inside" a cell -- all that I have to do is manually press enter and it completes. soooooo obviously I'd like to incorporate this "last-step" in the code. Can someone tell me what I should add to the code to have it complete the update. TIA, |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| COUNTIFS equivalent in Excel 2003 - both criteria have text, one has "wildcard" | Excel Worksheet Functions | |||
| Check if cells contain the word "Thailand", return "TRUE" | Excel Worksheet Functions | |||
| Help!!! Enter "7" in a cell and Excel changes the "7" to "11" immediately!!! | Excel Discussion (Misc queries) | |||
| Make "Edit" mode default, rather than "Enter"? | Excel Discussion (Misc queries) | |||
| Is there an equivalent of Lotus 123's "Paste visible" command? | Excel Discussion (Misc queries) | |||
Linear Mode
