Go Premium for a chance to win a PS4. Enter to Win

x
?
Solved

Behavior entering field

Posted on 2000-02-18
6
Medium Priority
?
463 Views
Last Modified: 2012-06-27
I have code that requires the "behavior entering field" param (Tools|Options|Keyboard) to be set to "Select Entire Field". If a user has this set differently, my code will not work.

How can I make sure this setting is how I need it for my code to work properly?
0
Comment
Question by:powermixx
6 Comments
 
LVL 10

Expert Comment

by:paasky
ID: 2535042
Hello powermixx,

You could ensure that running this function in your application startup:

Public Function SetKeyboardOption()
    Application.SetOption "Behavior Entering Field", 0
End Function

Regards,
paasky
0
 

Expert Comment

by:ShoeBooty
ID: 2535375
powermixx,

In regards to paasky's comment, I would suggest that you first evaluate whether or not the option is set properly to begin with.  Then, if it is not, you can use paasky's solution.  Storing the results of this evaluation (yes/no) in a global variable will also enable you to return each users PC to the original configuration when your code is complete.  I have found that this works well to prevent users from complaining that I have changed settings that they have set for their preferences.

Shoe
0
 
LVL 10

Accepted Solution

by:
paasky earned 140 total points
ID: 2535416
Good point ShoeBooty! :-D

The original option value should be read with Application.GetOption method:

Public Function GetKeyboardOption() As Variant
    GetKeyboardOption = Application.GetOption("Behavior Entering Field")
End Function

I also "improved" the SetKeyBoardOption function that it can used to set original value back:

Public Function SetKeyboardOption(OptionValue As Integer)
    Application.SetOption "Behavior Entering Field", OptionValue
End Function

Regards,
Paasky


0
Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
LVL 10

Expert Comment

by:paasky
ID: 2535427
Note: Behavior Entering Field might have value from 0 to 2 (Integer) and they're in the same order as Tools-Options-Keyboard Dialog.
0
 
LVL 10

Expert Comment

by:brewdog
ID: 2535487
Another thought . . . since this is an application-wide setup option (and some users set up there Tools | Options to not select the entire field on purpose) I would think that you would either want to reset the option when you application exits, or if this is for just one field, you could put a

SendKeys "{F2}"

on the Enter event; this toggles Edit mode between highlight and cursor.

brewdog
0
 

Author Comment

by:powermixx
ID: 2558104
Apologies for taking a few days. Works very busy. Thanks Paasky.
0

Featured Post

New feature and membership benefit!

New feature! Upgrade and increase expert visibility of your issues with Priority Questions.

Question has a verified solution.

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

Microsoft Access is a place to store data within tables and represent this stored data using multiple database objects such as in form of macros, forms, reports, etc. After a MS Access database is created there is need to improve the performance and…
Windows Explorer lets you open cabinet (cab) files like any other folder. In VBA you can easily handle normal files and folders, but opening and indeed creating cabinet files takes a lot more - and that's you'll find here.
Learn how to number pages in an Access report over each group. Activate two pass printing by referencing the pages property: Add code to the Page Footers OnFormat event to capture the pages as there occur for each group. Use the pages property to …
With Secure Portal Encryption, the recipient is sent a link to their email address directing them to the email laundry delivery page. From there, the recipient will be required to enter a user name and password to enter the page. Once the recipient …

886 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