Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Searching for text boxes
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! |
#2
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Searching for text boxes
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" wrote in message ... 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! |
#3
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Searching for text boxes
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" wrote in message ... 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! |
#4
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Searching for text boxes
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/Macros...eateAMacro.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" wrote in message ... 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" wrote in message ... 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! |
#5
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Searching for text boxes
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/Macros...eateAMacro.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" wrote in message ... 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" wrote in message ... 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! |
#6
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Searching for text boxes
I did test the macro before I sent it. Exactly what type of Text boxes are
you talking about? How were they inserted into the document? -- Hope this helps. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP, originally posted via msnews.microsoft.com "Chad Williams" wrote in message ... 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/Macros...eateAMacro.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" wrote in message ... 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" wrote in message ... 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! |
#7
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Searching for text boxes
Doug, here's the problem. I have to convert huge documents from pdf into
Word. I use Omni pro and the document ends up with many many text boxes and I want to be able to search for them going down the document from one to the next, in the same way that you would search for any word. The macro you gave me here did work. It would take me to a text box. But it kept going back to the same box. I want the macro to search for the first text box and then, when I run the macro again from that point, I want it to go to the next text box. It wasn't doing that. I don't know if that's the fault of the macro or of my ignorance in using it. Thanks, Chad. "Doug Robbins - Word MVP" wrote: I did test the macro before I sent it. Exactly what type of Text boxes are you talking about? How were they inserted into the document? -- Hope this helps. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP, originally posted via msnews.microsoft.com "Chad Williams" wrote in message ... 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/Macros...eateAMacro.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" wrote in message ... 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" wrote in message ... 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! |
#8
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Searching for text boxes
The following might work for you
Dim i As Long Dim myrange As Range Set myrange = Selection.Range myrange.End = ActiveDocument.Range.End With myrange If .ShapeRange.Count 0 Then For i = 1 To .ShapeRange.Count If .ShapeRange(i).Type = msoTextBox Then .ShapeRange(i).Select MsgBox "The selected shape is a text box." Exit Sub End If Next i End If End With You will have to move the selection out of the text box before running it again and it will only pick up one shape per shape anchor location. -- 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" wrote in message ... Doug, here's the problem. I have to convert huge documents from pdf into Word. I use Omni pro and the document ends up with many many text boxes and I want to be able to search for them going down the document from one to the next, in the same way that you would search for any word. The macro you gave me here did work. It would take me to a text box. But it kept going back to the same box. I want the macro to search for the first text box and then, when I run the macro again from that point, I want it to go to the next text box. It wasn't doing that. I don't know if that's the fault of the macro or of my ignorance in using it. Thanks, Chad. "Doug Robbins - Word MVP" wrote: I did test the macro before I sent it. Exactly what type of Text boxes are you talking about? How were they inserted into the document? -- Hope this helps. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP, originally posted via msnews.microsoft.com "Chad Williams" wrote in message ... 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/Macros...eateAMacro.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" wrote in message ... 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" wrote in message ... 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! |
#9
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Searching for text boxes
Hi Doug. Thanks again for the effort. I used the macro you put here... but
it's the same problem. It does find the first text box. Then I move the cursor after that first text box and hit "Alt+F8" "Run" and that's where the snag is. It doesn't take me to the next text box. It takes me to the last text box. And actually it doesn't take me anywhere... in other words, the cursor simply disappears. I then click on the page where I am and hit "Shift F5" to go to the previous location -- this was my workaround to find where the cursor was last.... and that's when it takes me to the last text box. I wish the macro simply took me to the text boxes in the order that they are in the document. Any further tweaking of that macro would be helpful. Thanks. Chad. "Doug Robbins - Word MVP" wrote: The following might work for you Dim i As Long Dim myrange As Range Set myrange = Selection.Range myrange.End = ActiveDocument.Range.End With myrange If .ShapeRange.Count 0 Then For i = 1 To .ShapeRange.Count If .ShapeRange(i).Type = msoTextBox Then .ShapeRange(i).Select MsgBox "The selected shape is a text box." Exit Sub End If Next i End If End With You will have to move the selection out of the text box before running it again and it will only pick up one shape per shape anchor location. -- 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" wrote in message ... Doug, here's the problem. I have to convert huge documents from pdf into Word. I use Omni pro and the document ends up with many many text boxes and I want to be able to search for them going down the document from one to the next, in the same way that you would search for any word. The macro you gave me here did work. It would take me to a text box. But it kept going back to the same box. I want the macro to search for the first text box and then, when I run the macro again from that point, I want it to go to the next text box. It wasn't doing that. I don't know if that's the fault of the macro or of my ignorance in using it. Thanks, Chad. "Doug Robbins - Word MVP" wrote: I did test the macro before I sent it. Exactly what type of Text boxes are you talking about? How were they inserted into the document? -- Hope this helps. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP, originally posted via msnews.microsoft.com "Chad Williams" wrote in message ... 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/Macros...eateAMacro.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" wrote in message ... 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" wrote in message ... 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! |
#10
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Searching for text boxes
It might be simpler with an application that formats with text boxes to scan
to plain text (which does not support then) and add your own formatting - or to use an OCR software package that does not use text boxes such as FineReader. Doesn't OmniPage have an option not to use text boxes? Attempting to remove the formatting by simply removing the text boxes (which may not be text boxes but frames) will result in a hell of a lot of work and cannot readily be achieved with a macro. -- Graham Mayor - Word MVP My web site www.gmayor.com Word MVP web site http://word.mvps.org "Chad Williams" wrote in message news Hi Doug. Thanks again for the effort. I used the macro you put here... but it's the same problem. It does find the first text box. Then I move the cursor after that first text box and hit "Alt+F8" "Run" and that's where the snag is. It doesn't take me to the next text box. It takes me to the last text box. And actually it doesn't take me anywhere... in other words, the cursor simply disappears. I then click on the page where I am and hit "Shift F5" to go to the previous location -- this was my workaround to find where the cursor was last.... and that's when it takes me to the last text box. I wish the macro simply took me to the text boxes in the order that they are in the document. Any further tweaking of that macro would be helpful. Thanks. Chad. "Doug Robbins - Word MVP" wrote: The following might work for you Dim i As Long Dim myrange As Range Set myrange = Selection.Range myrange.End = ActiveDocument.Range.End With myrange If .ShapeRange.Count 0 Then For i = 1 To .ShapeRange.Count If .ShapeRange(i).Type = msoTextBox Then .ShapeRange(i).Select MsgBox "The selected shape is a text box." Exit Sub End If Next i End If End With You will have to move the selection out of the text box before running it again and it will only pick up one shape per shape anchor location. -- 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" wrote in message ... Doug, here's the problem. I have to convert huge documents from pdf into Word. I use Omni pro and the document ends up with many many text boxes and I want to be able to search for them going down the document from one to the next, in the same way that you would search for any word. The macro you gave me here did work. It would take me to a text box. But it kept going back to the same box. I want the macro to search for the first text box and then, when I run the macro again from that point, I want it to go to the next text box. It wasn't doing that. I don't know if that's the fault of the macro or of my ignorance in using it. Thanks, Chad. "Doug Robbins - Word MVP" wrote: I did test the macro before I sent it. Exactly what type of Text boxes are you talking about? How were they inserted into the document? -- Hope this helps. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP, originally posted via msnews.microsoft.com "Chad Williams" wrote in message ... 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/Macros...eateAMacro.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" wrote in message ... 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" wrote in message ... 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! |
#11
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Searching for text boxes
Graham, thanks for your response.
Actually, I simply want to find all the text boxes and then delete them. A lot of the times they are in footers, as well. Being able to search for text boxes, the same way you can search for, say, any word or any style would be so helpful. I know that you can search for graphics in a document. I wonder why an option for searching for text boxes isn't also available? Anyhow, I guess I'll just have to live with it as is. "Graham Mayor" wrote: It might be simpler with an application that formats with text boxes to scan to plain text (which does not support then) and add your own formatting - or to use an OCR software package that does not use text boxes such as FineReader. Doesn't OmniPage have an option not to use text boxes? Attempting to remove the formatting by simply removing the text boxes (which may not be text boxes but frames) will result in a hell of a lot of work and cannot readily be achieved with a macro. -- Graham Mayor - Word MVP My web site www.gmayor.com Word MVP web site http://word.mvps.org "Chad Williams" wrote in message news Hi Doug. Thanks again for the effort. I used the macro you put here... but it's the same problem. It does find the first text box. Then I move the cursor after that first text box and hit "Alt+F8" "Run" and that's where the snag is. It doesn't take me to the next text box. It takes me to the last text box. And actually it doesn't take me anywhere... in other words, the cursor simply disappears. I then click on the page where I am and hit "Shift F5" to go to the previous location -- this was my workaround to find where the cursor was last.... and that's when it takes me to the last text box. I wish the macro simply took me to the text boxes in the order that they are in the document. Any further tweaking of that macro would be helpful. Thanks. Chad. "Doug Robbins - Word MVP" wrote: The following might work for you Dim i As Long Dim myrange As Range Set myrange = Selection.Range myrange.End = ActiveDocument.Range.End With myrange If .ShapeRange.Count 0 Then For i = 1 To .ShapeRange.Count If .ShapeRange(i).Type = msoTextBox Then .ShapeRange(i).Select MsgBox "The selected shape is a text box." Exit Sub End If Next i End If End With You will have to move the selection out of the text box before running it again and it will only pick up one shape per shape anchor location. -- 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" wrote in message ... Doug, here's the problem. I have to convert huge documents from pdf into Word. I use Omni pro and the document ends up with many many text boxes and I want to be able to search for them going down the document from one to the next, in the same way that you would search for any word. The macro you gave me here did work. It would take me to a text box. But it kept going back to the same box. I want the macro to search for the first text box and then, when I run the macro again from that point, I want it to go to the next text box. It wasn't doing that. I don't know if that's the fault of the macro or of my ignorance in using it. Thanks, Chad. "Doug Robbins - Word MVP" wrote: I did test the macro before I sent it. Exactly what type of Text boxes are you talking about? How were they inserted into the document? -- Hope this helps. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP, originally posted via msnews.microsoft.com "Chad Williams" wrote in message ... 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/Macros...eateAMacro.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" wrote in message ... 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" wrote in message ... 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! . |
#12
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Searching for text boxes
A while ago, I exported some text from a pdf into a Word file, and a
lot of it was in text boxes (or maybe frames), and someone here suggested Ctrl-A, Ctrl-Q. It worked. On Dec 17, 10:42*pm, Chad Williams wrote: Graham, thanks for your response. Actually, I simply want to find all the text boxes and then delete them. *A lot of the times they are in footers, as well. *Being able to search for text boxes, the same way you can search for, say, any word or any style would be so helpful. *I know that you can search for graphics in a document. *I wonder why an option for searching for text boxes isn't also available? *Anyhow, I guess I'll just have to live with it as is. "Graham Mayor" wrote: It might be simpler with an application that formats with text boxes to scan to plain text (which does not support then) and add your own formatting - or to use an OCR software package that does not use text boxes such as FineReader. Doesn't OmniPage have an option not to use text boxes? Attempting to remove the formatting by simply removing the text boxes (which may not be text boxes but frames) will result in a hell of a lot of work and cannot readily be achieved with a macro. -- Graham Mayor - *Word MVP My web sitewww.gmayor.com Word MVP web sitehttp://word.mvps.org "Chad Williams" wrote in message news Hi Doug. *Thanks again for the effort. *I used the macro you put here... but it's the same problem. *It does find the first text box. *Then I move the cursor after that first text box and hit "Alt+F8" "Run" and that's where the snag is. *It doesn't take me to the next text box. *It takes me to the last text box. *And actually it doesn't take me anywhere... in other words, the cursor simply disappears. *I then click on the page where I am and hit "Shift F5" to go to the previous location -- this was my workaround to find where the cursor was last.... and that's when it takes me to the last text box. I wish the macro simply took me to the text boxes in the order that they are in the document. *Any further tweaking of that macro would be helpful. Thanks. Chad. "Doug Robbins - Word MVP" wrote: The following might work for you Dim i As Long Dim myrange As Range Set myrange = Selection.Range myrange.End = ActiveDocument.Range.End With myrange * * If .ShapeRange.Count 0 Then * * * * For i = 1 To .ShapeRange.Count * * * * * * If .ShapeRange(i).Type = msoTextBox Then * * * * * * * * .ShapeRange(i).Select * * * * * * * * MsgBox "The selected shape is a text box." * * * * * * * * Exit Sub * * * * * * End If * * * * Next i * * End If End With You will have to move the selection out of the text box before running it again and it will only pick up one shape per shape anchor location. -- 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" wrote in message ... Doug, here's the problem. *I have to convert huge documents from pdf into Word. *I use Omni pro and the document ends up with many many text boxes and I want to be able to search for them going down the document from one to the next, in the same way that you would search for any word. *The macro you gave me here did work. *It would take me to a text box. *But it kept going back to the same box. *I want the macro to search for the first text box and then, when I run the macro again from that point, I want it to go to the next text box. *It wasn't doing that. *I don't know if that's the fault of the macro or of my ignorance in using it. Thanks, Chad. "Doug Robbins - Word MVP" wrote: I did test the macro before I sent it. *Exactly what type of Text boxes are you talking about? *How were they inserted into the document? -- Hope this helps. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP, originally posted via msnews.microsoft.com "Chad Williams" wrote in message ... 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/Macros...eateAMacro.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" wrote in message ... 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" wrote in message ... 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! |
#13
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Searching for text boxes
'Text boxes' can be in line or floating and may not be text boxes but
frames or even table cells or a combination of all of them. They all require different methods or handling. The macro suggested by Doug would deal with normally inserted text boxes. If it doesn'y there is some other issue involved. If you want to send me (one page of) your document to look at I may be in a better position to advise on how to deal with them. Use the link on the home page of my web site. Don't change the message title or the message and attachment will be discarded. -- Graham Mayor - Word MVP My web site www.gmayor.com Word MVP web site http://word.mvps.org "Chad Williams" wrote in message ... Graham, thanks for your response. Actually, I simply want to find all the text boxes and then delete them. A lot of the times they are in footers, as well. Being able to search for text boxes, the same way you can search for, say, any word or any style would be so helpful. I know that you can search for graphics in a document. I wonder why an option for searching for text boxes isn't also available? Anyhow, I guess I'll just have to live with it as is. "Graham Mayor" wrote: It might be simpler with an application that formats with text boxes to scan to plain text (which does not support then) and add your own formatting - or to use an OCR software package that does not use text boxes such as FineReader. Doesn't OmniPage have an option not to use text boxes? Attempting to remove the formatting by simply removing the text boxes (which may not be text boxes but frames) will result in a hell of a lot of work and cannot readily be achieved with a macro. -- Graham Mayor - Word MVP My web site www.gmayor.com Word MVP web site http://word.mvps.org "Chad Williams" wrote in message news Hi Doug. Thanks again for the effort. I used the macro you put here... but it's the same problem. It does find the first text box. Then I move the cursor after that first text box and hit "Alt+F8" "Run" and that's where the snag is. It doesn't take me to the next text box. It takes me to the last text box. And actually it doesn't take me anywhere... in other words, the cursor simply disappears. I then click on the page where I am and hit "Shift F5" to go to the previous location -- this was my workaround to find where the cursor was last.... and that's when it takes me to the last text box. I wish the macro simply took me to the text boxes in the order that they are in the document. Any further tweaking of that macro would be helpful. Thanks. Chad. "Doug Robbins - Word MVP" wrote: The following might work for you Dim i As Long Dim myrange As Range Set myrange = Selection.Range myrange.End = ActiveDocument.Range.End With myrange If .ShapeRange.Count 0 Then For i = 1 To .ShapeRange.Count If .ShapeRange(i).Type = msoTextBox Then .ShapeRange(i).Select MsgBox "The selected shape is a text box." Exit Sub End If Next i End If End With You will have to move the selection out of the text box before running it again and it will only pick up one shape per shape anchor location. -- 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" wrote in message ... Doug, here's the problem. I have to convert huge documents from pdf into Word. I use Omni pro and the document ends up with many many text boxes and I want to be able to search for them going down the document from one to the next, in the same way that you would search for any word. The macro you gave me here did work. It would take me to a text box. But it kept going back to the same box. I want the macro to search for the first text box and then, when I run the macro again from that point, I want it to go to the next text box. It wasn't doing that. I don't know if that's the fault of the macro or of my ignorance in using it. Thanks, Chad. "Doug Robbins - Word MVP" wrote: I did test the macro before I sent it. Exactly what type of Text boxes are you talking about? How were they inserted into the document? -- Hope this helps. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP, originally posted via msnews.microsoft.com "Chad Williams" wrote in message ... 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/Macros...eateAMacro.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" wrote in message ... 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" wrote in message ... 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! . |
#14
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Searching for text boxes
Thank you Peter, but that's not what I want. I just want to be able to go
from one text box to another. "Ctrl-A, Ctrl-Q" doesn't do that. But I do appreciate your trying to help. "Peter T. Daniels" wrote: A while ago, I exported some text from a pdf into a Word file, and a lot of it was in text boxes (or maybe frames), and someone here suggested Ctrl-A, Ctrl-Q. It worked. On Dec 17, 10:42 pm, Chad Williams wrote: Graham, thanks for your response. Actually, I simply want to find all the text boxes and then delete them. A lot of the times they are in footers, as well. Being able to search for text boxes, the same way you can search for, say, any word or any style would be so helpful. I know that you can search for graphics in a document. I wonder why an option for searching for text boxes isn't also available? Anyhow, I guess I'll just have to live with it as is. "Graham Mayor" wrote: It might be simpler with an application that formats with text boxes to scan to plain text (which does not support then) and add your own formatting - or to use an OCR software package that does not use text boxes such as FineReader. Doesn't OmniPage have an option not to use text boxes? Attempting to remove the formatting by simply removing the text boxes (which may not be text boxes but frames) will result in a hell of a lot of work and cannot readily be achieved with a macro. -- Graham Mayor - Word MVP My web sitewww.gmayor.com Word MVP web sitehttp://word.mvps.org "Chad Williams" wrote in message news Hi Doug. Thanks again for the effort. I used the macro you put here... but it's the same problem. It does find the first text box. Then I move the cursor after that first text box and hit "Alt+F8" "Run" and that's where the snag is. It doesn't take me to the next text box. It takes me to the last text box. And actually it doesn't take me anywhere... in other words, the cursor simply disappears. I then click on the page where I am and hit "Shift F5" to go to the previous location -- this was my workaround to find where the cursor was last.... and that's when it takes me to the last text box. I wish the macro simply took me to the text boxes in the order that they are in the document. Any further tweaking of that macro would be helpful. Thanks. Chad. "Doug Robbins - Word MVP" wrote: The following might work for you Dim i As Long Dim myrange As Range Set myrange = Selection.Range myrange.End = ActiveDocument.Range.End With myrange If .ShapeRange.Count 0 Then For i = 1 To .ShapeRange.Count If .ShapeRange(i).Type = msoTextBox Then .ShapeRange(i).Select MsgBox "The selected shape is a text box." Exit Sub End If Next i End If End With You will have to move the selection out of the text box before running it again and it will only pick up one shape per shape anchor location. -- 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" wrote in message ... Doug, here's the problem. I have to convert huge documents from pdf into Word. I use Omni pro and the document ends up with many many text boxes and I want to be able to search for them going down the document from one to the next, in the same way that you would search for any word. The macro you gave me here did work. It would take me to a text box. But it kept going back to the same box. I want the macro to search for the first text box and then, when I run the macro again from that point, I want it to go to the next text box. It wasn't doing that. I don't know if that's the fault of the macro or of my ignorance in using it. Thanks, Chad. "Doug Robbins - Word MVP" wrote: I did test the macro before I sent it. Exactly what type of Text boxes are you talking about? How were they inserted into the document? -- Hope this helps. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP, originally posted via msnews.microsoft.com "Chad Williams" wrote in message ... 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/Macros...eateAMacro.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" wrote in message ... 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" wrote in message ... 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! . |
#15
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Searching for text boxes
Thank you Graham.
"Graham Mayor" wrote: 'Text boxes' can be in line or floating and may not be text boxes but frames or even table cells or a combination of all of them. They all require different methods or handling. The macro suggested by Doug would deal with normally inserted text boxes. If it doesn'y there is some other issue involved. If you want to send me (one page of) your document to look at I may be in a better position to advise on how to deal with them. Use the link on the home page of my web site. Don't change the message title or the message and attachment will be discarded. -- Graham Mayor - Word MVP My web site www.gmayor.com Word MVP web site http://word.mvps.org "Chad Williams" wrote in message ... Graham, thanks for your response. Actually, I simply want to find all the text boxes and then delete them. A lot of the times they are in footers, as well. Being able to search for text boxes, the same way you can search for, say, any word or any style would be so helpful. I know that you can search for graphics in a document. I wonder why an option for searching for text boxes isn't also available? Anyhow, I guess I'll just have to live with it as is. "Graham Mayor" wrote: It might be simpler with an application that formats with text boxes to scan to plain text (which does not support then) and add your own formatting - or to use an OCR software package that does not use text boxes such as FineReader. Doesn't OmniPage have an option not to use text boxes? Attempting to remove the formatting by simply removing the text boxes (which may not be text boxes but frames) will result in a hell of a lot of work and cannot readily be achieved with a macro. -- Graham Mayor - Word MVP My web site www.gmayor.com Word MVP web site http://word.mvps.org "Chad Williams" wrote in message news Hi Doug. Thanks again for the effort. I used the macro you put here... but it's the same problem. It does find the first text box. Then I move the cursor after that first text box and hit "Alt+F8" "Run" and that's where the snag is. It doesn't take me to the next text box. It takes me to the last text box. And actually it doesn't take me anywhere... in other words, the cursor simply disappears. I then click on the page where I am and hit "Shift F5" to go to the previous location -- this was my workaround to find where the cursor was last.... and that's when it takes me to the last text box. I wish the macro simply took me to the text boxes in the order that they are in the document. Any further tweaking of that macro would be helpful. Thanks. Chad. "Doug Robbins - Word MVP" wrote: The following might work for you Dim i As Long Dim myrange As Range Set myrange = Selection.Range myrange.End = ActiveDocument.Range.End With myrange If .ShapeRange.Count 0 Then For i = 1 To .ShapeRange.Count If .ShapeRange(i).Type = msoTextBox Then .ShapeRange(i).Select MsgBox "The selected shape is a text box." Exit Sub End If Next i End If End With You will have to move the selection out of the text box before running it again and it will only pick up one shape per shape anchor location. -- 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" wrote in message ... Doug, here's the problem. I have to convert huge documents from pdf into Word. I use Omni pro and the document ends up with many many text boxes and I want to be able to search for them going down the document from one to the next, in the same way that you would search for any word. The macro you gave me here did work. It would take me to a text box. But it kept going back to the same box. I want the macro to search for the first text box and then, when I run the macro again from that point, I want it to go to the next text box. It wasn't doing that. I don't know if that's the fault of the macro or of my ignorance in using it. Thanks, Chad. "Doug Robbins - Word MVP" wrote: I did test the macro before I sent it. Exactly what type of Text boxes are you talking about? How were they inserted into the document? -- Hope this helps. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP, originally posted via msnews.microsoft.com "Chad Williams" wrote in message ... 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/Macros...eateAMacro.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" wrote in message ... 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" wrote in message ... 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! . . |
#16
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Searching for text boxes
Note that in none of your responses have you said what you actually
want to _do_ with each of the text boxes! If you reveal that information, someone like Graham might be able to create a macro that does it. (Once you seemed to indicate that you want to convert boxed text to plain text, which is what my procedure will do.) On Dec 18, 4:10*am, Chad Williams wrote: Thank you Peter, but that's not what I want. *I just want to be able to go from one text box to another. *"Ctrl-A, Ctrl-Q" doesn't do that. *But I do appreciate your trying to help. "Peter T. Daniels" wrote: A while ago, I exported some text from a pdf into a Word file, and a lot of it was in text boxes (or maybe frames), and someone here suggested Ctrl-A, Ctrl-Q. It worked. On Dec 17, 10:42 pm, Chad Williams wrote: Graham, thanks for your response. Actually, I simply want to find all the text boxes and then delete them. *A lot of the times they are in footers, as well. *Being able to search for text boxes, the same way you can search for, say, any word or any style would be so helpful. *I know that you can search for graphics in a document. *I wonder why an option for searching for text boxes isn't also available? *Anyhow, I guess I'll just have to live with it as is. "Graham Mayor" wrote: It might be simpler with an application that formats with text boxes to scan to plain text (which does not support then) and add your own formatting - or to use an OCR software package that does not use text boxes such as FineReader. Doesn't OmniPage have an option not to use text boxes? Attempting to remove the formatting by simply removing the text boxes (which may not be text boxes but frames) will result in a hell of a lot of work and cannot readily be achieved with a macro. -- Graham Mayor - *Word MVP My web sitewww.gmayor.com Word MVP web sitehttp://word.mvps.org "Chad Williams" wrote in message news Hi Doug. *Thanks again for the effort. *I used the macro you put here... but it's the same problem. *It does find the first text box. *Then I move the cursor after that first text box and hit "Alt+F8" "Run" and that's where the snag is. *It doesn't take me to the next text box. *It takes me to the last text box. *And actually it doesn't take me anywhere... in other words, the cursor simply disappears. *I then click on the page where I am and hit "Shift F5" to go to the previous location -- this was my workaround to find where the cursor was last.... and that's when it takes me to the last text box. I wish the macro simply took me to the text boxes in the order that they are in the document. *Any further tweaking of that macro would be helpful. Thanks. Chad. "Doug Robbins - Word MVP" wrote: The following might work for you Dim i As Long Dim myrange As Range Set myrange = Selection.Range myrange.End = ActiveDocument.Range.End With myrange * * If .ShapeRange.Count 0 Then * * * * For i = 1 To .ShapeRange.Count * * * * * * If .ShapeRange(i).Type = msoTextBox Then * * * * * * * * .ShapeRange(i).Select * * * * * * * * MsgBox "The selected shape is a text box." * * * * * * * * Exit Sub * * * * * * End If * * * * Next i * * End If End With You will have to move the selection out of the text box before running it again and it will only pick up one shape per shape anchor location. -- 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" wrote in message ... Doug, here's the problem. *I have to convert huge documents from pdf into Word. *I use Omni pro and the document ends up with many many text boxes and I want to be able to search for them going down the document from one to the next, in the same way that you would search for any word. *The macro you gave me here did work. *It would take me to a text box. *But it kept going back to the same box. *I want the macro to search for the first text box and then, when I run the macro again from that point, I want it to go to the next text box. *It wasn't doing that. *I don't know if that's the fault of the macro or of my ignorance in using it. Thanks, Chad. "Doug Robbins - Word MVP" wrote: I did test the macro before I sent it. *Exactly what type of Text boxes are you talking about? *How were they inserted into the document? -- Hope this helps. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP, originally posted via msnews.microsoft.com "Chad Williams" wrote in message ... 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/Macros...eateAMacro.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" wrote in message ... 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" wrote in message .... 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! |
#17
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Searching for text boxes
I honestly thank you for your help, Peter. Maybe you didn't read my very
first post where I simply was asking for help in how to simply search for text boxes within a document, in the same way you would search for a word. I never really specified the reason. Maybe you came in later in the thread. But I do appreciate your help and anyone's help here. As you know, there's a lot to know when it comes to heavy-duty Word document work. Chad. "Peter T. Daniels" wrote: Note that in none of your responses have you said what you actually want to _do_ with each of the text boxes! If you reveal that information, someone like Graham might be able to create a macro that does it. (Once you seemed to indicate that you want to convert boxed text to plain text, which is what my procedure will do.) On Dec 18, 4:10 am, Chad Williams wrote: Thank you Peter, but that's not what I want. I just want to be able to go from one text box to another. "Ctrl-A, Ctrl-Q" doesn't do that. But I do appreciate your trying to help. "Peter T. Daniels" wrote: A while ago, I exported some text from a pdf into a Word file, and a lot of it was in text boxes (or maybe frames), and someone here suggested Ctrl-A, Ctrl-Q. It worked. On Dec 17, 10:42 pm, Chad Williams wrote: Graham, thanks for your response. Actually, I simply want to find all the text boxes and then delete them. A lot of the times they are in footers, as well. Being able to search for text boxes, the same way you can search for, say, any word or any style would be so helpful. I know that you can search for graphics in a document. I wonder why an option for searching for text boxes isn't also available? Anyhow, I guess I'll just have to live with it as is. "Graham Mayor" wrote: It might be simpler with an application that formats with text boxes to scan to plain text (which does not support then) and add your own formatting - or to use an OCR software package that does not use text boxes such as FineReader. Doesn't OmniPage have an option not to use text boxes? Attempting to remove the formatting by simply removing the text boxes (which may not be text boxes but frames) will result in a hell of a lot of work and cannot readily be achieved with a macro. -- Graham Mayor - Word MVP My web sitewww.gmayor.com Word MVP web sitehttp://word.mvps.org "Chad Williams" wrote in message news Hi Doug. Thanks again for the effort. I used the macro you put here... but it's the same problem. It does find the first text box. Then I move the cursor after that first text box and hit "Alt+F8" "Run" and that's where the snag is. It doesn't take me to the next text box. It takes me to the last text box. And actually it doesn't take me anywhere... in other words, the cursor simply disappears. I then click on the page where I am and hit "Shift F5" to go to the previous location -- this was my workaround to find where the cursor was last.... and that's when it takes me to the last text box. I wish the macro simply took me to the text boxes in the order that they are in the document. Any further tweaking of that macro would be helpful. Thanks. Chad. "Doug Robbins - Word MVP" wrote: The following might work for you Dim i As Long Dim myrange As Range Set myrange = Selection.Range myrange.End = ActiveDocument.Range.End With myrange If .ShapeRange.Count 0 Then For i = 1 To .ShapeRange.Count If .ShapeRange(i).Type = msoTextBox Then .ShapeRange(i).Select MsgBox "The selected shape is a text box." Exit Sub End If Next i End If End With You will have to move the selection out of the text box before running it again and it will only pick up one shape per shape anchor location. -- 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" wrote in message ... Doug, here's the problem. I have to convert huge documents from pdf into Word. I use Omni pro and the document ends up with many many text boxes and I want to be able to search for them going down the document from one to the next, in the same way that you would search for any word. The macro you gave me here did work. It would take me to a text box. But it kept going back to the same box. I want the macro to search for the first text box and then, when I run the macro again from that point, I want it to go to the next text box. It wasn't doing that. I don't know if that's the fault of the macro or of my ignorance in using it. Thanks, Chad. "Doug Robbins - Word MVP" wrote: I did test the macro before I sent it. Exactly what type of Text boxes are you talking about? How were they inserted into the document? -- Hope this helps. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP, originally posted via msnews.microsoft.com "Chad Williams" wrote in message ... 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/Macros...eateAMacro.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" wrote in message ... 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" wrote in message .... 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! . |
#18
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Searching for text boxes
Peter was pointing out that you didn't say why you wanted to search for text
boxes. A little more detail would have helped us fine-tune our advice because some of the questions that come up are, for example, "Are these really text boxes, or might they be frames instead?" and "Do you want to find them in order to delete them entirely, or do you want to preserve their content but remove it from the text boxes and then delete the text boxes?" and "Do you want to find the text boxes in order to apply some sort of consistent formatting?" And so on. -- Suzanne S. Barnhill Microsoft MVP (Word) Words into Type Fairhope, Alabama USA http://word.mvps.org "Chad Williams" wrote in message news I honestly thank you for your help, Peter. Maybe you didn't read my very first post where I simply was asking for help in how to simply search for text boxes within a document, in the same way you would search for a word. I never really specified the reason. Maybe you came in later in the thread. But I do appreciate your help and anyone's help here. As you know, there's a lot to know when it comes to heavy-duty Word document work. Chad. "Peter T. Daniels" wrote: Note that in none of your responses have you said what you actually want to _do_ with each of the text boxes! If you reveal that information, someone like Graham might be able to create a macro that does it. (Once you seemed to indicate that you want to convert boxed text to plain text, which is what my procedure will do.) On Dec 18, 4:10 am, Chad Williams wrote: Thank you Peter, but that's not what I want. I just want to be able to go from one text box to another. "Ctrl-A, Ctrl-Q" doesn't do that. But I do appreciate your trying to help. "Peter T. Daniels" wrote: A while ago, I exported some text from a pdf into a Word file, and a lot of it was in text boxes (or maybe frames), and someone here suggested Ctrl-A, Ctrl-Q. It worked. On Dec 17, 10:42 pm, Chad Williams wrote: Graham, thanks for your response. Actually, I simply want to find all the text boxes and then delete them. A lot of the times they are in footers, as well. Being able to search for text boxes, the same way you can search for, say, any word or any style would be so helpful. I know that you can search for graphics in a document. I wonder why an option for searching for text boxes isn't also available? Anyhow, I guess I'll just have to live with it as is. "Graham Mayor" wrote: It might be simpler with an application that formats with text boxes to scan to plain text (which does not support then) and add your own formatting - or to use an OCR software package that does not use text boxes such as FineReader. Doesn't OmniPage have an option not to use text boxes? Attempting to remove the formatting by simply removing the text boxes (which may not be text boxes but frames) will result in a hell of a lot of work and cannot readily be achieved with a macro. -- Graham Mayor - Word MVP My web sitewww.gmayor.com Word MVP web sitehttp://word.mvps.org "Chad Williams" wrote in message news Hi Doug. Thanks again for the effort. I used the macro you put here... but it's the same problem. It does find the first text box. Then I move the cursor after that first text box and hit "Alt+F8" "Run" and that's where the snag is. It doesn't take me to the next text box. It takes me to the last text box. And actually it doesn't take me anywhere... in other words, the cursor simply disappears. I then click on the page where I am and hit "Shift F5" to go to the previous location -- this was my workaround to find where the cursor was last.... and that's when it takes me to the last text box. I wish the macro simply took me to the text boxes in the order that they are in the document. Any further tweaking of that macro would be helpful. Thanks. Chad. "Doug Robbins - Word MVP" wrote: The following might work for you Dim i As Long Dim myrange As Range Set myrange = Selection.Range myrange.End = ActiveDocument.Range.End With myrange If .ShapeRange.Count 0 Then For i = 1 To .ShapeRange.Count If .ShapeRange(i).Type = msoTextBox Then .ShapeRange(i).Select MsgBox "The selected shape is a text box." Exit Sub End If Next i End If End With You will have to move the selection out of the text box before running it again and it will only pick up one shape per shape anchor location. -- 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" wrote in message ... Doug, here's the problem. I have to convert huge documents from pdf into Word. I use Omni pro and the document ends up with many many text boxes and I want to be able to search for them going down the document from one to the next, in the same way that you would search for any word. The macro you gave me here did work. It would take me to a text box. But it kept going back to the same box. I want the macro to search for the first text box and then, when I run the macro again from that point, I want it to go to the next text box. It wasn't doing that. I don't know if that's the fault of the macro or of my ignorance in using it. Thanks, Chad. "Doug Robbins - Word MVP" wrote: I did test the macro before I sent it. Exactly what type of Text boxes are you talking about? How were they inserted into the document? -- Hope this helps. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP, originally posted via msnews.microsoft.com "Chad Williams" wrote in message ... 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/Macros...eateAMacro.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" wrote in message ... 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" wrote in message .... 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! . |
#19
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Searching for text boxes
Thank you Suzanne and thank you Peter. Sorry, I thought I was clear and now
I see the problem. Well, I simply would like a macro (if you can do it) to search for the next text box in the document and have the cursor bring me to that text box and then stop. Then, at that point, I would determine what I want to do with that text box. Then, I want to run the macro again from where my cursor is (at that point I would place it after the first text box) and then have the macro take my cursor to the next text box and stop. And so forth. (If you can do another macro for frames, that would be an added bonus.) But it's more the text box search that I would love to have. And I'm praying that I have been more clear here than previously. Thank you. Chad. "Suzanne S. Barnhill" wrote: Peter was pointing out that you didn't say why you wanted to search for text boxes. A little more detail would have helped us fine-tune our advice because some of the questions that come up are, for example, "Are these really text boxes, or might they be frames instead?" and "Do you want to find them in order to delete them entirely, or do you want to preserve their content but remove it from the text boxes and then delete the text boxes?" and "Do you want to find the text boxes in order to apply some sort of consistent formatting?" And so on. -- Suzanne S. Barnhill Microsoft MVP (Word) Words into Type Fairhope, Alabama USA http://word.mvps.org "Chad Williams" wrote in message news I honestly thank you for your help, Peter. Maybe you didn't read my very first post where I simply was asking for help in how to simply search for text boxes within a document, in the same way you would search for a word. I never really specified the reason. Maybe you came in later in the thread. But I do appreciate your help and anyone's help here. As you know, there's a lot to know when it comes to heavy-duty Word document work. Chad. "Peter T. Daniels" wrote: Note that in none of your responses have you said what you actually want to _do_ with each of the text boxes! If you reveal that information, someone like Graham might be able to create a macro that does it. (Once you seemed to indicate that you want to convert boxed text to plain text, which is what my procedure will do.) On Dec 18, 4:10 am, Chad Williams wrote: Thank you Peter, but that's not what I want. I just want to be able to go from one text box to another. "Ctrl-A, Ctrl-Q" doesn't do that. But I do appreciate your trying to help. "Peter T. Daniels" wrote: A while ago, I exported some text from a pdf into a Word file, and a lot of it was in text boxes (or maybe frames), and someone here suggested Ctrl-A, Ctrl-Q. It worked. On Dec 17, 10:42 pm, Chad Williams wrote: Graham, thanks for your response. Actually, I simply want to find all the text boxes and then delete them. A lot of the times they are in footers, as well. Being able to search for text boxes, the same way you can search for, say, any word or any style would be so helpful. I know that you can search for graphics in a document. I wonder why an option for searching for text boxes isn't also available? Anyhow, I guess I'll just have to live with it as is. "Graham Mayor" wrote: It might be simpler with an application that formats with text boxes to scan to plain text (which does not support then) and add your own formatting - or to use an OCR software package that does not use text boxes such as FineReader. Doesn't OmniPage have an option not to use text boxes? Attempting to remove the formatting by simply removing the text boxes (which may not be text boxes but frames) will result in a hell of a lot of work and cannot readily be achieved with a macro. -- Graham Mayor - Word MVP My web sitewww.gmayor.com Word MVP web sitehttp://word.mvps.org "Chad Williams" wrote in message news Hi Doug. Thanks again for the effort. I used the macro you put here... but it's the same problem. It does find the first text box. Then I move the cursor after that first text box and hit "Alt+F8" "Run" and that's where the snag is. It doesn't take me to the next text box. It takes me to the last text box. And actually it doesn't take me anywhere... in other words, the cursor simply disappears. I then click on the page where I am and hit "Shift F5" to go to the previous location -- this was my workaround to find where the cursor was last.... and that's when it takes me to the last text box. I wish the macro simply took me to the text boxes in the order that they are in the document. Any further tweaking of that macro would be helpful. Thanks. Chad. "Doug Robbins - Word MVP" wrote: The following might work for you Dim i As Long Dim myrange As Range Set myrange = Selection.Range myrange.End = ActiveDocument.Range.End With myrange If .ShapeRange.Count 0 Then For i = 1 To .ShapeRange.Count If .ShapeRange(i).Type = msoTextBox Then .ShapeRange(i).Select MsgBox "The selected shape is a text box." Exit Sub End If Next i End If End With You will have to move the selection out of the text box before running it again and it will only pick up one shape per shape anchor location. -- 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" wrote in message ... Doug, here's the problem. I have to convert huge documents from pdf into Word. I use Omni pro and the document ends up with many many text boxes and I want to be able to search for them going down the document from one to the next, in the same way that you would search for any word. The macro you gave me here did work. It would take me to a text box. But it kept going back to the same box. I want the macro to search for the first text box and then, when I run the macro again from that point, I want it to go to the next text box. It wasn't doing that. I don't know if that's the fault of the macro or of my ignorance in using it. Thanks, Chad. "Doug Robbins - Word MVP" wrote: I did test the macro before I sent it. Exactly what type of Text boxes are you talking about? How were they inserted into the document? -- Hope this helps. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP, originally posted via msnews.microsoft.com "Chad Williams" wrote in message ... 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/Macros...eateAMacro.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" wrote in message ... 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. |
#20
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Searching for text boxes
As I offered a few days ago, if you send me a sample of the document, I will
see what needs to be done to locate the boxes it contains. -- Graham Mayor - Word MVP My web site www.gmayor.com Word MVP web site http://word.mvps.org "Chad Williams" wrote in message ... Thank you Suzanne and thank you Peter. Sorry, I thought I was clear and now I see the problem. Well, I simply would like a macro (if you can do it) to search for the next text box in the document and have the cursor bring me to that text box and then stop. Then, at that point, I would determine what I want to do with that text box. Then, I want to run the macro again from where my cursor is (at that point I would place it after the first text box) and then have the macro take my cursor to the next text box and stop. And so forth. (If you can do another macro for frames, that would be an added bonus.) But it's more the text box search that I would love to have. And I'm praying that I have been more clear here than previously. Thank you. Chad. "Suzanne S. Barnhill" wrote: Peter was pointing out that you didn't say why you wanted to search for text boxes. A little more detail would have helped us fine-tune our advice because some of the questions that come up are, for example, "Are these really text boxes, or might they be frames instead?" and "Do you want to find them in order to delete them entirely, or do you want to preserve their content but remove it from the text boxes and then delete the text boxes?" and "Do you want to find the text boxes in order to apply some sort of consistent formatting?" And so on. -- Suzanne S. Barnhill Microsoft MVP (Word) Words into Type Fairhope, Alabama USA http://word.mvps.org "Chad Williams" wrote in message news I honestly thank you for your help, Peter. Maybe you didn't read my very first post where I simply was asking for help in how to simply search for text boxes within a document, in the same way you would search for a word. I never really specified the reason. Maybe you came in later in the thread. But I do appreciate your help and anyone's help here. As you know, there's a lot to know when it comes to heavy-duty Word document work. Chad. "Peter T. Daniels" wrote: Note that in none of your responses have you said what you actually want to _do_ with each of the text boxes! If you reveal that information, someone like Graham might be able to create a macro that does it. (Once you seemed to indicate that you want to convert boxed text to plain text, which is what my procedure will do.) On Dec 18, 4:10 am, Chad Williams wrote: Thank you Peter, but that's not what I want. I just want to be able to go from one text box to another. "Ctrl-A, Ctrl-Q" doesn't do that. But I do appreciate your trying to help. "Peter T. Daniels" wrote: A while ago, I exported some text from a pdf into a Word file, and a lot of it was in text boxes (or maybe frames), and someone here suggested Ctrl-A, Ctrl-Q. It worked. On Dec 17, 10:42 pm, Chad Williams wrote: Graham, thanks for your response. Actually, I simply want to find all the text boxes and then delete them. A lot of the times they are in footers, as well. Being able to search for text boxes, the same way you can search for, say, any word or any style would be so helpful. I know that you can search for graphics in a document. I wonder why an option for searching for text boxes isn't also available? Anyhow, I guess I'll just have to live with it as is. "Graham Mayor" wrote: It might be simpler with an application that formats with text boxes to scan to plain text (which does not support then) and add your own formatting - or to use an OCR software package that does not use text boxes such as FineReader. Doesn't OmniPage have an option not to use text boxes? Attempting to remove the formatting by simply removing the text boxes (which may not be text boxes but frames) will result in a hell of a lot of work and cannot readily be achieved with a macro. -- Graham Mayor - Word MVP My web sitewww.gmayor.com Word MVP web sitehttp://word.mvps.org "Chad Williams" wrote in message news Hi Doug. Thanks again for the effort. I used the macro you put here... but it's the same problem. It does find the first text box. Then I move the cursor after that first text box and hit "Alt+F8" "Run" and that's where the snag is. It doesn't take me to the next text box. It takes me to the last text box. And actually it doesn't take me anywhere... in other words, the cursor simply disappears. I then click on the page where I am and hit "Shift F5" to go to the previous location -- this was my workaround to find where the cursor was last.... and that's when it takes me to the last text box. I wish the macro simply took me to the text boxes in the order that they are in the document. Any further tweaking of that macro would be helpful. Thanks. Chad. "Doug Robbins - Word MVP" wrote: The following might work for you Dim i As Long Dim myrange As Range Set myrange = Selection.Range myrange.End = ActiveDocument.Range.End With myrange If .ShapeRange.Count 0 Then For i = 1 To .ShapeRange.Count If .ShapeRange(i).Type = msoTextBox Then .ShapeRange(i).Select MsgBox "The selected shape is a text box." Exit Sub End If Next i End If End With You will have to move the selection out of the text box before running it again and it will only pick up one shape per shape anchor location. -- 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" wrote in message ... Doug, here's the problem. I have to convert huge documents from pdf into Word. I use Omni pro and the document ends up with many many text boxes and I want to be able to search for them going down the document from one to the next, in the same way that you would search for any word. The macro you gave me here did work. It would take me to a text box. But it kept going back to the same box. I want the macro to search for the first text box and then, when I run the macro again from that point, I want it to go to the next text box. It wasn't doing that. I don't know if that's the fault of the macro or of my ignorance in using it. Thanks, Chad. "Doug Robbins - Word MVP" wrote: I did test the macro before I sent it. Exactly what type of Text boxes are you talking about? How were they inserted into the document? -- Hope this helps. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP, originally posted via msnews.microsoft.com "Chad Williams" wrote in message ... 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/Macros...eateAMacro.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" wrote in message ... 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. |
#21
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Searching for text boxes
Hi Graham... thanks for the offer, but I can't send documents from the firm
that I work for to outsiders. However, I will create a document with boxes in it and send it to you this Saturday or Sunday. Thanks again... and have a Merry Christmas! Chad. "Graham Mayor" wrote: As I offered a few days ago, if you send me a sample of the document, I will see what needs to be done to locate the boxes it contains. -- Graham Mayor - Word MVP My web site www.gmayor.com Word MVP web site http://word.mvps.org "Chad Williams" wrote in message ... Thank you Suzanne and thank you Peter. Sorry, I thought I was clear and now I see the problem. Well, I simply would like a macro (if you can do it) to search for the next text box in the document and have the cursor bring me to that text box and then stop. Then, at that point, I would determine what I want to do with that text box. Then, I want to run the macro again from where my cursor is (at that point I would place it after the first text box) and then have the macro take my cursor to the next text box and stop. And so forth. (If you can do another macro for frames, that would be an added bonus.) But it's more the text box search that I would love to have. And I'm praying that I have been more clear here than previously. Thank you. Chad. "Suzanne S. Barnhill" wrote: Peter was pointing out that you didn't say why you wanted to search for text boxes. A little more detail would have helped us fine-tune our advice because some of the questions that come up are, for example, "Are these really text boxes, or might they be frames instead?" and "Do you want to find them in order to delete them entirely, or do you want to preserve their content but remove it from the text boxes and then delete the text boxes?" and "Do you want to find the text boxes in order to apply some sort of consistent formatting?" And so on. -- Suzanne S. Barnhill Microsoft MVP (Word) Words into Type Fairhope, Alabama USA http://word.mvps.org "Chad Williams" wrote in message news I honestly thank you for your help, Peter. Maybe you didn't read my very first post where I simply was asking for help in how to simply search for text boxes within a document, in the same way you would search for a word. I never really specified the reason. Maybe you came in later in the thread. But I do appreciate your help and anyone's help here. As you know, there's a lot to know when it comes to heavy-duty Word document work. Chad. "Peter T. Daniels" wrote: Note that in none of your responses have you said what you actually want to _do_ with each of the text boxes! If you reveal that information, someone like Graham might be able to create a macro that does it. (Once you seemed to indicate that you want to convert boxed text to plain text, which is what my procedure will do.) On Dec 18, 4:10 am, Chad Williams wrote: Thank you Peter, but that's not what I want. I just want to be able to go from one text box to another. "Ctrl-A, Ctrl-Q" doesn't do that. But I do appreciate your trying to help. "Peter T. Daniels" wrote: A while ago, I exported some text from a pdf into a Word file, and a lot of it was in text boxes (or maybe frames), and someone here suggested Ctrl-A, Ctrl-Q. It worked. On Dec 17, 10:42 pm, Chad Williams wrote: Graham, thanks for your response. Actually, I simply want to find all the text boxes and then delete them. A lot of the times they are in footers, as well. Being able to search for text boxes, the same way you can search for, say, any word or any style would be so helpful. I know that you can search for graphics in a document. I wonder why an option for searching for text boxes isn't also available? Anyhow, I guess I'll just have to live with it as is. "Graham Mayor" wrote: It might be simpler with an application that formats with text boxes to scan to plain text (which does not support then) and add your own formatting - or to use an OCR software package that does not use text boxes such as FineReader. Doesn't OmniPage have an option not to use text boxes? Attempting to remove the formatting by simply removing the text boxes (which may not be text boxes but frames) will result in a hell of a lot of work and cannot readily be achieved with a macro. -- Graham Mayor - Word MVP My web sitewww.gmayor.com Word MVP web sitehttp://word.mvps.org "Chad Williams" wrote in message news Hi Doug. Thanks again for the effort. I used the macro you put here... but it's the same problem. It does find the first text box. Then I move the cursor after that first text box and hit "Alt+F8" "Run" and that's where the snag is. It doesn't take me to the next text box. It takes me to the last text box. And actually it doesn't take me anywhere... in other words, the cursor simply disappears. I then click on the page where I am and hit "Shift F5" to go to the previous location -- this was my workaround to find where the cursor was last.... and that's when it takes me to the last text box. I wish the macro simply took me to the text boxes in the order that they are in the document. Any further tweaking of that macro would be helpful. Thanks. Chad. "Doug Robbins - Word MVP" wrote: The following might work for you Dim i As Long Dim myrange As Range Set myrange = Selection.Range myrange.End = ActiveDocument.Range.End With myrange If .ShapeRange.Count 0 Then For i = 1 To .ShapeRange.Count If .ShapeRange(i).Type = msoTextBox Then .ShapeRange(i).Select MsgBox "The selected shape is a text box." Exit Sub End If Next i End If End With You will have to move the selection out of the text box before running it again and it will only pick up one shape per shape anchor location. -- 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" wrote in message ... Doug, here's the problem. I have to convert huge documents from pdf into Word. I use Omni pro and the document ends up with many many text boxes and I want to be able to search for them going down the document from one to the next, in the same way that you would search for any word. The macro you gave me here did work. It would take me to a text box. But it kept going back to the same box. I want the macro to search for the first text box and then, when I run the macro again from that point, I want it to go to the next text box. It wasn't doing that. I don't know if that's the fault of the macro or of my ignorance in using it. Thanks, Chad. "Doug Robbins - Word MVP" wrote: I did test the macro before I sent it. Exactly what type of Text boxes are you talking about? How were they inserted into the document? -- Hope this helps. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP, originally posted via msnews.microsoft.com "Chad Williams" wrote in message ... 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: |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Text boxes - searching for them | Microsoft Word Help | |||
Aligning check boxes and text boxes with regular text | Microsoft Word Help | |||
Aligning check boxes and text boxes with regular text | Microsoft Word Help | |||
Searching for text | Microsoft Word Help | |||
no hourglass when searching for text | Microsoft Word Help |