Searching for text boxes
in [Document Management]
|
From: Chad Williams on 15 Dec 2009 18:03 Is there a way to search for text boxes within a word (Microsoft Office Professional Edition 2003 version) document? Searching for "graphics" does not do the trick. I can't find anyone who can figure this out. Thank you!
From: Doug Robbins - Word MVP on 15 Dec 2009 20:41 What do you want to do when you find them. Running the following macro will find them Dim i As Long With ActiveDocument For i = 1 To .Shapes.Count If .Shapes(i).Type = msoTextBox Then .Shapes(i).Select MsgBox "The selected shape is a text box." End If Next i End With -- Hope this helps, Doug Robbins - Word MVP Please reply only to the newsgroups unless you wish to obtain my services on a paid professional basis. "Chad Williams" <ChadWilliams(a)discussions.microsoft.com> wrote in message news:C5ACF817-DFCF-4FC0-88A1-C122CC4466B6(a)microsoft.com... > Is there a way to search for text boxes within a word (Microsoft Office > Professional Edition 2003 version) document? Searching for "graphics" > does > not do the trick. I can't find anyone who can figure this out. Thank > you!
From: Chad Williams on 15 Dec 2009 20:56 Doug, thank you for your response -- however, I don't understand you. When I do a scan cleanup --sometimes using Omnipro-- I want to be able to search for all the text boxes in the document. How do I run the macro you posted below? Do I go to "Tools", "Macros" and then do something? If possible, please explain. Thanks, Chad. "Doug Robbins - Word MVP" wrote: > What do you want to do when you find them. > > Running the following macro will find them > > Dim i As Long > With ActiveDocument > For i = 1 To .Shapes.Count > If .Shapes(i).Type = msoTextBox Then > .Shapes(i).Select > MsgBox "The selected shape is a text box." > End If > Next i > End With > > > -- > Hope this helps, > > Doug Robbins - Word MVP > > Please reply only to the newsgroups unless you wish to obtain my services on > a paid professional basis. > > "Chad Williams" <ChadWilliams(a)discussions.microsoft.com> wrote in message > news:C5ACF817-DFCF-4FC0-88A1-C122CC4466B6(a)microsoft.com... > > Is there a way to search for text boxes within a word (Microsoft Office > > Professional Edition 2003 version) document? Searching for "graphics" > > does > > not do the trick. I can't find anyone who can figure this out. Thank > > you! >
From: Doug Robbins - Word MVP on 16 Dec 2009 00:43 See the article "What do I do with macros sent to me by other newsgroup readers to help me out?” at: http://www.word.mvps.org/FAQs/MacrosVBA/CreateAMacro.htm -- Hope this helps, Doug Robbins - Word MVP Please reply only to the newsgroups unless you wish to obtain my services on a paid professional basis. "Chad Williams" <ChadWilliams(a)discussions.microsoft.com> wrote in message news:6C8A71E8-11FB-466A-8AB3-6125AFC5A1AC(a)microsoft.com... > Doug, thank you for your response -- however, I don't understand you. > When I > do a scan cleanup --sometimes using Omnipro-- I want to be able to search > for > all the text boxes in the document. How do I run the macro you posted > below? > Do I go to "Tools", "Macros" and then do something? If possible, please > explain. Thanks, Chad. > > "Doug Robbins - Word MVP" wrote: > >> What do you want to do when you find them. >> >> Running the following macro will find them >> >> Dim i As Long >> With ActiveDocument >> For i = 1 To .Shapes.Count >> If .Shapes(i).Type = msoTextBox Then >> .Shapes(i).Select >> MsgBox "The selected shape is a text box." >> End If >> Next i >> End With >> >> >> -- >> Hope this helps, >> >> Doug Robbins - Word MVP >> >> Please reply only to the newsgroups unless you wish to obtain my services >> on >> a paid professional basis. >> >> "Chad Williams" <ChadWilliams(a)discussions.microsoft.com> wrote in message >> news:C5ACF817-DFCF-4FC0-88A1-C122CC4466B6(a)microsoft.com... >> > Is there a way to search for text boxes within a word (Microsoft Office >> > Professional Edition 2003 version) document? Searching for "graphics" >> > does >> > not do the trick. I can't find anyone who can figure this out. Thank >> > you! >>
From: Chad Williams on 16 Dec 2009 03:00
Doug, thanks again for your reply. I read the article and I was able to figure it out. However, I created a document with 20 boxes. The search macro that is listed here doesn't take me from box to box. Is that the fault of the macro? Could you try a simple test and let me know please? Thank you. Chad. "Doug Robbins - Word MVP" wrote: > See the article "What do I do with macros sent to me by other newsgroup > readers to help me out?” at: > http://www.word.mvps.org/FAQs/MacrosVBA/CreateAMacro.htm > > > -- > Hope this helps, > > Doug Robbins - Word MVP > > Please reply only to the newsgroups unless you wish to obtain my services on > a paid professional basis. > > "Chad Williams" <ChadWilliams(a)discussions.microsoft.com> wrote in message > news:6C8A71E8-11FB-466A-8AB3-6125AFC5A1AC(a)microsoft.com... > > Doug, thank you for your response -- however, I don't understand you. > > When I > > do a scan cleanup --sometimes using Omnipro-- I want to be able to search > > for > > all the text boxes in the document. How do I run the macro you posted > > below? > > Do I go to "Tools", "Macros" and then do something? If possible, please > > explain. Thanks, Chad. > > > > "Doug Robbins - Word MVP" wrote: > > > >> What do you want to do when you find them. > >> > >> Running the following macro will find them > >> > >> Dim i As Long > >> With ActiveDocument > >> For i = 1 To .Shapes.Count > >> If .Shapes(i).Type = msoTextBox Then > >> .Shapes(i).Select > >> MsgBox "The selected shape is a text box." > >> End If > >> Next i > >> End With > >> > >> > >> -- > >> Hope this helps, > >> > >> Doug Robbins - Word MVP > >> > >> Please reply only to the newsgroups unless you wish to obtain my services > >> on > >> a paid professional basis. > >> > >> "Chad Williams" <ChadWilliams(a)discussions.microsoft.com> wrote in message > >> news:C5ACF817-DFCF-4FC0-88A1-C122CC4466B6(a)microsoft.com... > >> > Is there a way to search for text boxes within a word (Microsoft Office > >> > Professional Edition 2003 version) document? Searching for "graphics" > >> > does > >> > not do the trick. I can't find anyone who can figure this out. Thank > >> > you! > >> > |