VBA-Word Extend Revision to the whole word -


i'm analyzing revised documents. have change tracking enabled, , contain many revisions.

these documents required have revision on whole word, not part of it. revisions used qa, cannot flag revised words not revised. must make words have revised letters words revised, cannot touch other words.

i want automate this. figured this:

dim wrdrange range each wrd in thisdocument.words     set wrdrange = wrd     if wrdrange.revisions.count <> 0         wrdrange.text = wrdrange.text     end if next wrd

it's working half way, every time encounters revised word (partially or fully), make avery other word revised (there revision count of 1 on them).

so question how can fix this.

also, i'm not @ sure best way perform task. feel isn't. if can offer direction, i'll gladly follow (i not approach - specially iterating through every word).

i found solution. 1 word flagged revision flagging next 1 revision because include trailing whiteaspace. shortened range in case, , works:

dim wrdrange range each wrd in thisdocument.words     set wrdrange = wrd     if wrdrange.revisions.count <> 0         if mid(wrdrange.text, len(wrdrange.text)) = " "             wrdrange.end = wrdrange.end - 1         end if          wrdrange.text = wrdrange.text     end if next wrd

i'm not sure yet if reliable. have feeling situations might crash resizing ranges did. i'll know once run on production. fix/comment here.


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