Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people, just like you, are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
Solved

Alternative to Application.SendKeys "Esc" as it is turning off/On num lock in the VBA

Posted on 2015-02-11
17
711 Views
Last Modified: 2016-02-10
Hi Experts,
I am using Application.SendKeys "Esc", True

in VBA code which works fine only issue is it automatically turns On & off Num Lock.

I have searched the net and found we should avoid sendkeys. Is there any alternative to this or any workaround ?

Looking forward to hearing frmo you.
0
Comment
Question by:satmisha
  • 8
  • 4
  • 3
  • +2
17 Comments
 
LVL 50

Expert Comment

by:Rgonzo1971
ID: 40603106
Hi,

this has been covered by MS-Support

http://support2.microsoft.com/kb/179987/en-us

Regards
0
 
LVL 85

Expert Comment

by:Rory Archibald
ID: 40603168
Why do you need to send the Esc key in your code?
0
 

Author Comment

by:satmisha
ID: 40603400
I am inserting value in a cell from the popup which works fine but my cursor\pointer stays inside the cell and in order to take the cursor out of that cell I need to press esc key from keyboard.

I want to automate that by itself by using sendkeys but that leads me to another problem of num lock.

Please feel free to let me know you need more information.
0
Free Tool: Subnet Calculator

The subnet calculator helps you design networks by taking an IP address and network mask and returning information such as network, broadcast address, and host range.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

 
LVL 85

Expert Comment

by:Rory Archibald
ID: 40603554
I'm not clear what you mean by "I am inserting value in a cell from the popup". What popup?
0
 
LVL 33

Expert Comment

by:Rob Henson
ID: 40603601
If you do need to go down the SendKeys route, pressing Esc will cancel entry in the cell; surely you need to press Enter.

Thanks
Rob H
0
 

Author Comment

by:satmisha
ID: 40603666
Thanks for your reply.

Apologies for confusion, I am taking values from user form to sheet. When value comes in a cell the focus\cursor remains inside the cell in order to take the cursor\focus out of the cell or on the cell I need to press Esc key.

Want to automate the manual way of doing Esc key, so I used
application.SendKeys "Esc",True
Snippet but it took me to the another problem of num lock on and off.

Requirement:
Is there a way other than sendkeys to simulate Esc key in VBA ? if yes then what I have to do.


I hope this would clear my requirement. Please feel free if you require any other info.
0
 
LVL 47

Expert Comment

by:Wayne Taylor (webtubbs)
ID: 40604630
How are you "taking values from user form to sheet"? If you use something like this....

    Worksheets("Sheet1").Range("A1").Value = TextBox1.Text

...the cell does not receive focus.
0
 

Author Comment

by:satmisha
ID: 40605169
I am using

On the user form I am using:
 ActiveCell.value = cmbTiger.value
and on the Worksheet_BeforeDoubleClick event I am using this to take the cursor from the cell
 Application.SendKeys "{ESC}", True
0
 
LVL 85

Expert Comment

by:Rory Archibald
ID: 40605184
I'm baffled as to why you need Esc. That line of code would not put the cell in edit mode, so what exactly do you mean by "take the cursor from the cell"?
0
 
LVL 47

Expert Comment

by:Wayne Taylor (webtubbs)
ID: 40605217
In the BeforeDoubleClick event, use this after any other code....

    Cancel = True

Wayne
0
 

Author Comment

by:satmisha
ID: 40605220
I have tried cancel = True but it didnt work.

Rory Archibald : "take the cursor from the cell"?
It means that my cursor stays inside the cell and if i try to navigate up or down i can not unless untill I press escape key to bring down the focus on the active cell.
0
 
LVL 85

Expert Comment

by:Rory Archibald
ID: 40605252
Can you post a workbook showing what you mean? I cannot fathom what your actual problem is currently as nothing you have posted indicates a need to press Esc.
0
 

Author Comment

by:satmisha
ID: 40605260
Thanks Rory for your time, I do agree with you and will send that today evening.
0
 

Author Comment

by:satmisha
ID: 40607585
Apologies for late reply.
1. In the worksheet before double click event use following line
userForm. Show
2. In user Form button click use use
activeCell. Value="aa"
Me.hide

You would see when control comes on worksheet than cursor remain inside the cell rather on the cell.
0
 

Author Comment

by:satmisha
ID: 40607590
In order to take the cursor our of the cell I need to use .sendkeys "esc" which in turn off\on num lock
0
 
LVL 47

Accepted Solution

by:
Wayne Taylor (webtubbs) earned 500 total points
ID: 40607597
Cancel = True in the BeforeDoubleClick event does exactly what you want.
0
 

Author Closing Comment

by:satmisha
ID: 40613845
Thanks it is working.
0

Featured Post

Announcing the Most Valuable Experts of 2016

MVEs are more concerned with the satisfaction of those they help than with the considerable points they can earn. They are the types of people you feel privileged to call colleagues. Join us in honoring this amazing group of Experts.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Introduction This Article briefly covers methods of calculating the NPV and IRR variants in Excel as well as the limitations in calculating and interpreting IRR results. Paraphrasing Richard Shockley, author of my favourite finance reference tex…
This article will guide you to convert a grid from a picture into Excel format using Microsoft OneNote and no other 3rd party application.
Graphs within dashboards are meant to be dynamic, representing data from a period of time that will change each time the dashboard is updated with new data. Rather than update each graph to point to a different set within a static set of data, t…
This Micro Tutorial will demonstrate in Microsoft Excel how to add style and sexy appeal to horizontal bar charts.

790 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question