vba - Reselect active cell in Access subform following requery -


i have subform displaying data set containing 200 rows , 35 columns. when user selects cell part of ui enabled allowing them add/edit records, following subform needs refresh user can see effect of changes, triggered afterupdate event.

the issue have when subform refreshed, calling requery, focus shifted top left of subform, meaning not can user not see effect of change, have lost place.

i have managed subform reselect current record capturing , setting form.recordset.absoluteposition property, can't find way set focus column user in previously.

the code have is:

private sub form_afterupdate()      dim lngcurrentpos long      form_frmmain.subfrm_results_review         lngcurrentpos = .form.recordset.absoluteposition         .requery         .form.recordset.absoluteposition = lngcurrentpos     end  end sub

but there anyway set focus specific cell? seems there should way must common problem?

you can set focus selected control of form extending vba code follows.

private sub form_afterupdate()      dim lngcurrentpos long     dim strcontrolname string      form_frmmain.subfrm_results_review         strcontrolname = .form.activecontrol.name         lngcurrentpos = .form.recordset.absoluteposition         .requery         .form.recordset.absoluteposition = lngcurrentpos         .form.controls(strcontrolname).setfocus     end  end sub

Comments

Post a Comment

Popular posts from this blog

php - failed to open stream: HTTP request failed! HTTP/1.0 400 Bad Request -

this code i'm using find latitude , longitude of place: function coords($address){ echo $url="http://maps.googleapis.com/maps/api/geocode/json?address=".$address; $json = file_get_contents(urlencode($url)); $data = json_decode($json, true); print_r($data['results'][0]['geometry']['location']['lat']); print_r($data['results'][0]['geometry']['location']['lng']); } however returns warning: failed open stream: http request failed! http/1.0 400 bad request if use above code in simple procedure works fine not in function. note: have tried curl_init()... method produced same result? instead of encoding whole url encode address part. following code work fine $add='jamshoro phase 2'; $url="http://maps.googleapis.com/maps/api/geocode/json?address=".urlencode($add); $json = file_get_contents($url); $data = json_decode($json, true); print_r($data['r
Read more

java - How to filter a backspace keyboard input -

i have code gives message when key number pressed: txtvalueofclause.addeventfilter(keyevent.key_typed, new eventhandler<keyevent>() { @override public void handle(keyevent t) { char ar[] = t.getcharacter().tochararray(); char ch = ar[t.getcharacter().tochararray().length - 1]; if (!(ch >= '0' && ch <= '9')) { system.out.println("the char entered not number"); t.consume(); } } }); now if press on wrong button , press backspace remove it, error message. how can add backspace input if statement? i have found answer: txtvalueofclause.addeventfilter(keyevent.key_typed, new eventhandler<keyevent>() { @override public void handle(keyevent t) { char ar[] = t.getcharacter().tochararray(); char ch = ar[t.getcharacter().tochar
Read more

java - Show Soft Keyboard when EditText Appears -

i have code in android app, alert dialog , keyboard, , when dialog shown want keyboard appear. not , not sure why? here code: final alertdialog.builder alert = new alertdialog.builder(this); alert.settitle("title"); alert.setmessage("message"); final edittext input = new edittext(this); input.setinputtype(inputtype.type_class_number); alert.setview(input); input.setonfocuschangelistener(new view.onfocuschangelistener() { @override public void onfocuschange(view v, boolean hasfocus) { if (hasfocus) { log.i(tag, "in focus"); inputmethodmanager inputmethodmanager = (inputmethodmanager) getsystemservice(context.input_method_service); inputmethodmanager.showsoftinput(input, inputmethodmanager.show_implicit); } } }); but keyboard not appear though edit text in focus, , tell appear why, doesn't come up? thanks in advance.
Read more