Recent content by OscarPCG

Thanks Geneticus It is a good article. I have been playing with the SDK. I have found it works well in VB, but dictation into VBA(Word) text boxes just has not worked yet. I know that the VBA recorder launches the speech toolbar with: WordBasic.ToolsSpeech Thanks Oscar

Is there a way to use Office's built-in voice recognition software with VBA forms (dictation into a text box)? Also, any ideas on the code required would be greatly appreciated. Oscar

Thanks guys! This is exactly what I was looking for. Oscar

Is there a validation method for user form textbox? I would like to restrict data entered into a text box to numbers or letters only (depending on the textbox)? Thanks Oscar

I have a wizard that allows user’s to create and delete custom word styles. I want to create a user's toolbar and add any user created styles to the toolbar (as a button with a link to a macro that will apply the designated formatting style to a selected paragraph). (In the end I am trying to...

I want to know if it is possible to create a macro "dynamically"? I am working on a project that will create buttons and add them to a "User's Toolbar". I then need each button to perform a similar but separate action. (the attached code should explain.) The code that I need to generate, if...

Well good news and bad. I have determined that user defined styles do not have an index number, but you can get the built in index style numbers: Sub indexStyles() Dim styleIndexArray(0 To 190) ' 190 is the highest # I could find Dim IndexNo As Integer Do While IndexNo < 191 On Error...

What I have now: Sub CheckStyle() Dim mPara As Paragraph For Each mPara In ActiveDocument.Paragraphs SelectWhat = mPara.Style 'mPara.Format.Style.NameLocal Select Case SelectWhat Case "AHead" Debug.Print SelectWhat Case "AlphaList"...

The overall goal (of this part of my project) is to have a set list of styles that can be used in a document. If a user applies local formatting, I want to flag the formatting (with a wavy underline) and offer the user a suggested course of action (apply set style or keep as is). The template...

How can I determine or set the style index number for all of the styles in a document? working with - but not shure why [upsidedown] : mPara.Format.Style(IndexNumber) My goal is to get the "format.style.description" property for each style in my document when it loads and compare the...

Is there any performance advantage to having all of my code in one module over dividing it into several modules? Thanks, Oscar

Thank you, that works well. - Now I just need to figure out how to get 160 of those things to run *quickly*. :) Thanks, Oscar

I am working a routine that will check the style of each paragraph in a document. I am experimenting with the following code, but the variable just is not quite right. The code drops to the case else statement. Sub CheckStyle() Dim mPara As Paragraph For Each mPara In ActiveDocument.Paragraphs...

Thanks Gerry - That was what I needed to go in the right direction. Oscar

I would like to search a document for any style that is not on a predefined style list. In the end I want to give the user an opportunity to "correct" the local formatting with a defined style. I have a hunch that the search & replace feature of Word can get the job done, but I am not sure...