VBA Word Userform Dynamically

rangeshram · August 12th, 2009, 07:46 AM

Dear all,

Pls. help me to find the solution for Dynamic Positions in word.

I have created form with Listbox control to show the bold text in the whole document.

While selecting/double click the listbox item in the userform, the cursor will automatically go to their respective positions.

For example: Let us assume below instances were in the listbox
TextBold1
TextBold2
TextBold3

By clicking the TextBold2 i.e., the selected word in the listbox will match the word document and the cursor will automatically pointed there.

Code:

UsrfrmMain.lstBold.AddItem strBold(i)
UsrfrmMain.Show

I need help for the placing dynamic positions while clicking the listbox in the userform.

Thanks,
Rangesh

Shasur · August 12th, 2009, 08:44 PM

"By clicking the TextBold2 i.e., the selected word in the listbox will match the word document and the cursor will automatically pointed there.
"

Do you want the click to take you to the position TextBold2?

If that is the case, you need to place some bookmarks in the document when you are loading them to the userform's listbox. The bookmarks should have the prefix similar to the textprefixes. This might be in the Userform_Initialize event

For example, TextBold1 will have BookMK1, TextBold2 will BookMK2 and so on

Then in the click event of the listbox you can use the following

Selection.GoTo what:=wdGoToBookmark, Name:="BookMK" & listbox1.listindex

You can delete/clear those bookmarks in userform's terminate event if needed

Cheers
Shasur

rangeshram · August 13th, 2009, 08:39 AM

Thanks Shasur for your reply.

I am eager to know is there any other alternative method to create dynamic position other than bookmarks. The reason was i've to create more than thousands of bookmarks because the document content was approximately 600 pages per document.

And also our client was not happy with using bookmarks. It would be highly appreciated if we get some other option...

Thanks,
Rangesh

Shasur · August 13th, 2009, 09:03 PM

Hi Rangesh

Bookmarks are the foolproof method and it will look really dynamic with the listbox_change/click event.

Can you tell the way you are loading the boldtext with the userform. Are you loading the boldtext of entire document or section by section?

Cheers
Shasur

rangeshram · August 14th, 2009, 05:26 AM

Hi Shasur,

We're finding all the bold instances in the whole word document and stored in array with unique instances only.

Then load the array content in the lstbold.addItem control by clicking the listed item in the listcontrl the cursor will point to the selected item in the word document.

Hope is this clear...

Thanks,
Rangesh

Shasur · August 14th, 2009, 06:58 AM

In that case, when there are multiple instances of a bold word, are you selecting all instances?

Cheers
Shasur

rangeshram · August 14th, 2009, 07:39 AM

Yes you're correct. The listitem will show all the instances with unique words and when clicking the particular item in the listbox it works as find option in word with forward option true.

Thanks,
Rangesh

Shasur · August 14th, 2009, 09:29 AM

That sounds as a good option. Now what you want to do from here?

Cheers
Shasur

rangeshram · August 17th, 2009, 08:42 AM

From the listed bold occurrences in the userform, when the user click the listitem it will goto that word(places) and the user can change the instances to unbold if necessary.

Hope the objective of this project is clear..

Thanks,
Rangesh

Shasur · August 17th, 2009, 08:48 AM

If that is the case, your forward option will be a great one right? User uses the forward button to select the bold-face word and change it if necessary.

If that has to do with any copy-editing kind of stuff, then the editor needs to read the context and make changes, which I think is best with your 'forward' option

Cheers
Shasur