Hello from Steved Thankyou in Advance.

When I run the below macro it deletes the whole paragraph is it possible
please to modify the below macro to delete Plc 0% and leave L 5:0:0

Plc 0% L 5:0:0

Sub Win()
Selection.HomeKey wdStory
Selection.Find.ClearFormatting
With Selection.Find
Do While .Execute(FindText:="Plc [0-9]%", MatchWildcards:=True,
Wrap:=wdFindContinue, Forward:=True) = True
Selection.Paragraphs(1).Range.Delete
Loop
End With
End Sub

Re: I only want to delete Plc 0% not L 5:0:0 by Greg

Greg
Sun May 28 23:39:54 CDT 2006

Steved,

Some consider thanking in advance as rude ;-)

If you code to delete and entire paragraph then that is the deed that will
be done.

Sub Win()
Selection.HomeKey wdStory
Selection.Find.ClearFormatting
With Selection.Find
Do While .Execute(FindText:="Plc [0-9]%", MatchWildcards:=True,
Wrap:=wdFindContinue, Forward:=True) = True
Selection.Range.Delete
Loop
End With
End Sub


--
Greg Maxey/Word MVP
See:
http://gregmaxey.mvps.org/word_tips.htm
For some helpful tips using Word.


Steved wrote:
> Hello from Steved Thankyou in Advance.
>
> When I run the below macro it deletes the whole paragraph is it
> possible please to modify the below macro to delete Plc 0% and leave
> L 5:0:0
>
> Plc 0% L 5:0:0
>
> Sub Win()
> Selection.HomeKey wdStory
> Selection.Find.ClearFormatting
> With Selection.Find
> Do While .Execute(FindText:="Plc [0-9]%", MatchWildcards:=True,
> Wrap:=wdFindContinue, Forward:=True) = True
> Selection.Paragraphs(1).Range.Delete
> Loop
> End With
> End Sub



Re: I only want to delete Plc 0% not L 5:0:0 by Steved

Steved
Mon May 29 01:14:01 CDT 2006

Thanks Greg

And I will in future not thank in advance, I did not think.

Cheers.

"Greg Maxey" wrote:

> Steved,
>
> Some consider thanking in advance as rude ;-)
>
> If you code to delete and entire paragraph then that is the deed that will
> be done.
>
> Sub Win()
> Selection.HomeKey wdStory
> Selection.Find.ClearFormatting
> With Selection.Find
> Do While .Execute(FindText:="Plc [0-9]%", MatchWildcards:=True,
> Wrap:=wdFindContinue, Forward:=True) = True
> Selection.Range.Delete
> Loop
> End With
> End Sub
>
>
> --
> Greg Maxey/Word MVP
> See:
> http://gregmaxey.mvps.org/word_tips.htm
> For some helpful tips using Word.
>
>
> Steved wrote:
> > Hello from Steved Thankyou in Advance.
> >
> > When I run the below macro it deletes the whole paragraph is it
> > possible please to modify the below macro to delete Plc 0% and leave
> > L 5:0:0
> >
> > Plc 0% L 5:0:0
> >
> > Sub Win()
> > Selection.HomeKey wdStory
> > Selection.Find.ClearFormatting
> > With Selection.Find
> > Do While .Execute(FindText:="Plc [0-9]%", MatchWildcards:=True,
> > Wrap:=wdFindContinue, Forward:=True) = True
> > Selection.Paragraphs(1).Range.Delete
> > Loop
> > End With
> > End Sub
>
>
>

Re: I only want to delete Plc 0% not L 5:0:0 by Greg

Greg
Mon May 29 01:28:34 CDT 2006

Steved,

I think that the general consensus is that you have been shown enough find
and replace basics over the last year or so to educate a mule. No offense
intended mate. I also ask a lot of questions that a master would consider
primary. Often after asking I try, fail, try again fail, try again and
succeed. My point is that I wish that you would try to apply the things that
you have already learned.


--
Greg Maxey/Word MVP
See:
http://gregmaxey.mvps.org/word_tips.htm
For some helpful tips using Word.


Steved wrote:
> Thanks Greg
>
> And I will in future not thank in advance, I did not think.
>
> Cheers.
>
> "Greg Maxey" wrote:
>
>> Steved,
>>
>> Some consider thanking in advance as rude ;-)
>>
>> If you code to delete and entire paragraph then that is the deed
>> that will be done.
>>
>> Sub Win()
>> Selection.HomeKey wdStory
>> Selection.Find.ClearFormatting
>> With Selection.Find
>> Do While .Execute(FindText:="Plc [0-9]%", MatchWildcards:=True,
>> Wrap:=wdFindContinue, Forward:=True) = True
>> Selection.Range.Delete
>> Loop
>> End With
>> End Sub
>>
>>
>> --
>> Greg Maxey/Word MVP
>> See:
>> http://gregmaxey.mvps.org/word_tips.htm
>> For some helpful tips using Word.
>>
>>
>> Steved wrote:
>>> Hello from Steved Thankyou in Advance.
>>>
>>> When I run the below macro it deletes the whole paragraph is it
>>> possible please to modify the below macro to delete Plc 0% and leave
>>> L 5:0:0
>>>
>>> Plc 0% L 5:0:0
>>>
>>> Sub Win()
>>> Selection.HomeKey wdStory
>>> Selection.Find.ClearFormatting
>>> With Selection.Find
>>> Do While .Execute(FindText:="Plc [0-9]%", MatchWildcards:=True,
>>> Wrap:=wdFindContinue, Forward:=True) = True
>>> Selection.Paragraphs(1).Range.Delete
>>> Loop
>>> End With
>>> End Sub



Re: I only want to delete Plc 0% not L 5:0:0 by Steved

Steved
Mon May 29 02:40:02 CDT 2006

Hello Greg from Steved.

Greg you need to take a step back, as I find what you have written to be
completley out off context, you need to understand that someone like myself
may have only one project, but tries to inprove ( "Yes you guessed it I do
not use word very often ") so yes I ask questions which are important to me
and may seem basic to you but not understanding the terminology in putting
macros together in my case I believe that is why this forum was set up in the
first place, if people desire not to answer me well that's fine, so here lies
the lesson Greg as said earlier in my statement I am not a word person but
value very much the input you have all given to me. So if I come back to this
forum just ignore me, if that is how you feel.

Thankyou.

"Greg Maxey" wrote:

> Steved,
>
> I think that the general consensus is that you have been shown enough find
> and replace basics over the last year or so to educate a mule. No offense
> intended mate. I also ask a lot of questions that a master would consider
> primary. Often after asking I try, fail, try again fail, try again and
> succeed. My point is that I wish that you would try to apply the things that
> you have already learned.
>
>
> --
> Greg Maxey/Word MVP
> See:
> http://gregmaxey.mvps.org/word_tips.htm
> For some helpful tips using Word.
>
>
> Steved wrote:
> > Thanks Greg
> >
> > And I will in future not thank in advance, I did not think.
> >
> > Cheers.
> >
> > "Greg Maxey" wrote:
> >
> >> Steved,
> >>
> >> Some consider thanking in advance as rude ;-)
> >>
> >> If you code to delete and entire paragraph then that is the deed
> >> that will be done.
> >>
> >> Sub Win()
> >> Selection.HomeKey wdStory
> >> Selection.Find.ClearFormatting
> >> With Selection.Find
> >> Do While .Execute(FindText:="Plc [0-9]%", MatchWildcards:=True,
> >> Wrap:=wdFindContinue, Forward:=True) = True
> >> Selection.Range.Delete
> >> Loop
> >> End With
> >> End Sub
> >>
> >>
> >> --
> >> Greg Maxey/Word MVP
> >> See:
> >> http://gregmaxey.mvps.org/word_tips.htm
> >> For some helpful tips using Word.
> >>
> >>
> >> Steved wrote:
> >>> Hello from Steved Thankyou in Advance.
> >>>
> >>> When I run the below macro it deletes the whole paragraph is it
> >>> possible please to modify the below macro to delete Plc 0% and leave
> >>> L 5:0:0
> >>>
> >>> Plc 0% L 5:0:0
> >>>
> >>> Sub Win()
> >>> Selection.HomeKey wdStory
> >>> Selection.Find.ClearFormatting
> >>> With Selection.Find
> >>> Do While .Execute(FindText:="Plc [0-9]%", MatchWildcards:=True,
> >>> Wrap:=wdFindContinue, Forward:=True) = True
> >>> Selection.Paragraphs(1).Range.Delete
> >>> Loop
> >>> End With
> >>> End Sub
>
>
>

Re: I only want to delete Plc 0% not L 5:0:0 by Greg

Greg
Mon May 29 03:04:50 CDT 2006

Steved,

You were insulted. Ok, the mule bit might have been bit sarcastic, but
insulting your was not my intent. My intent was to suggest that you "learn
from what you have already asked." Try a Google search for "Steved" and
"Find and Replace." I think that you will find that you are asking
questions that others have arleady answered for you. ;-)


--
Greg Maxey/Word MVP
See:
http://gregmaxey.mvps.org/word_tips.htm
For some helpful tips using Word.


Steved wrote:
> Hello Greg from Steved.
>
> Greg you need to take a step back, as I find what you have written to
> be completley out off context, you need to understand that someone
> like myself may have only one project, but tries to inprove ( "Yes
> you guessed it I do not use word very often ") so yes I ask questions
> which are important to me and may seem basic to you but not
> understanding the terminology in putting macros together in my case I
> believe that is why this forum was set up in the first place, if
> people desire not to answer me well that's fine, so here lies the
> lesson Greg as said earlier in my statement I am not a word person
> but value very much the input you have all given to me. So if I come
> back to this forum just ignore me, if that is how you feel.
>
> Thankyou.
>
> "Greg Maxey" wrote:
>
>> Steved,
>>
>> I think that the general consensus is that you have been shown
>> enough find and replace basics over the last year or so to educate a
>> mule. No offense intended mate. I also ask a lot of questions that
>> a master would consider primary. Often after asking I try, fail,
>> try again fail, try again and succeed. My point is that I wish that
>> you would try to apply the things that you have already learned.
>>
>>
>> --
>> Greg Maxey/Word MVP
>> See:
>> http://gregmaxey.mvps.org/word_tips.htm
>> For some helpful tips using Word.
>>
>>
>> Steved wrote:
>>> Thanks Greg
>>>
>>> And I will in future not thank in advance, I did not think.
>>>
>>> Cheers.
>>>
>>> "Greg Maxey" wrote:
>>>
>>>> Steved,
>>>>
>>>> Some consider thanking in advance as rude ;-)
>>>>
>>>> If you code to delete and entire paragraph then that is the deed
>>>> that will be done.
>>>>
>>>> Sub Win()
>>>> Selection.HomeKey wdStory
>>>> Selection.Find.ClearFormatting
>>>> With Selection.Find
>>>> Do While .Execute(FindText:="Plc [0-9]%", MatchWildcards:=True,
>>>> Wrap:=wdFindContinue, Forward:=True) = True
>>>> Selection.Range.Delete
>>>> Loop
>>>> End With
>>>> End Sub
>>>>
>>>>
>>>> --
>>>> Greg Maxey/Word MVP
>>>> See:
>>>> http://gregmaxey.mvps.org/word_tips.htm
>>>> For some helpful tips using Word.
>>>>
>>>>
>>>> Steved wrote:
>>>>> Hello from Steved Thankyou in Advance.
>>>>>
>>>>> When I run the below macro it deletes the whole paragraph is it
>>>>> possible please to modify the below macro to delete Plc 0% and
>>>>> leave L 5:0:0
>>>>>
>>>>> Plc 0% L 5:0:0
>>>>>
>>>>> Sub Win()
>>>>> Selection.HomeKey wdStory
>>>>> Selection.Find.ClearFormatting
>>>>> With Selection.Find
>>>>> Do While .Execute(FindText:="Plc [0-9]%", MatchWildcards:=True,
>>>>> Wrap:=wdFindContinue, Forward:=True) = True
>>>>> Selection.Paragraphs(1).Range.Delete
>>>>> Loop
>>>>> End With
>>>>> End Sub



Re: I only want to delete Plc 0% not L 5:0:0 by Jezebel

Jezebel
Mon May 29 03:28:06 CDT 2006

Well said.


"Greg Maxey" <gmaxey@mvps.oSCARrOMEOgOLF> wrote in message
news:eJjxOavgGHA.4708@TK2MSFTNGP04.phx.gbl...
> Steved,
>
> You were insulted. Ok, the mule bit might have been bit sarcastic, but
> insulting your was not my intent. My intent was to suggest that you "learn
> from what you have already asked." Try a Google search for "Steved" and
> "Find and Replace." I think that you will find that you are asking
> questions that others have arleady answered for you. ;-)
>
>
> --
> Greg Maxey/Word MVP
> See:
> http://gregmaxey.mvps.org/word_tips.htm
> For some helpful tips using Word.
>
>
> Steved wrote:
>> Hello Greg from Steved.
>>
>> Greg you need to take a step back, as I find what you have written to
>> be completley out off context, you need to understand that someone
>> like myself may have only one project, but tries to inprove ( "Yes
>> you guessed it I do not use word very often ") so yes I ask questions
>> which are important to me and may seem basic to you but not
>> understanding the terminology in putting macros together in my case I
>> believe that is why this forum was set up in the first place, if
>> people desire not to answer me well that's fine, so here lies the
>> lesson Greg as said earlier in my statement I am not a word person
>> but value very much the input you have all given to me. So if I come
>> back to this forum just ignore me, if that is how you feel.
>>
>> Thankyou.
>>
>> "Greg Maxey" wrote:
>>
>>> Steved,
>>>
>>> I think that the general consensus is that you have been shown
>>> enough find and replace basics over the last year or so to educate a
>>> mule. No offense intended mate. I also ask a lot of questions that
>>> a master would consider primary. Often after asking I try, fail,
>>> try again fail, try again and succeed. My point is that I wish that
>>> you would try to apply the things that you have already learned.
>>>
>>>
>>> --
>>> Greg Maxey/Word MVP
>>> See:
>>> http://gregmaxey.mvps.org/word_tips.htm
>>> For some helpful tips using Word.
>>>
>>>
>>> Steved wrote:
>>>> Thanks Greg
>>>>
>>>> And I will in future not thank in advance, I did not think.
>>>>
>>>> Cheers.
>>>>
>>>> "Greg Maxey" wrote:
>>>>
>>>>> Steved,
>>>>>
>>>>> Some consider thanking in advance as rude ;-)
>>>>>
>>>>> If you code to delete and entire paragraph then that is the deed
>>>>> that will be done.
>>>>>
>>>>> Sub Win()
>>>>> Selection.HomeKey wdStory
>>>>> Selection.Find.ClearFormatting
>>>>> With Selection.Find
>>>>> Do While .Execute(FindText:="Plc [0-9]%", MatchWildcards:=True,
>>>>> Wrap:=wdFindContinue, Forward:=True) = True
>>>>> Selection.Range.Delete
>>>>> Loop
>>>>> End With
>>>>> End Sub
>>>>>
>>>>>
>>>>> --
>>>>> Greg Maxey/Word MVP
>>>>> See:
>>>>> http://gregmaxey.mvps.org/word_tips.htm
>>>>> For some helpful tips using Word.
>>>>>
>>>>>
>>>>> Steved wrote:
>>>>>> Hello from Steved Thankyou in Advance.
>>>>>>
>>>>>> When I run the below macro it deletes the whole paragraph is it
>>>>>> possible please to modify the below macro to delete Plc 0% and
>>>>>> leave L 5:0:0
>>>>>>
>>>>>> Plc 0% L 5:0:0
>>>>>>
>>>>>> Sub Win()
>>>>>> Selection.HomeKey wdStory
>>>>>> Selection.Find.ClearFormatting
>>>>>> With Selection.Find
>>>>>> Do While .Execute(FindText:="Plc [0-9]%", MatchWildcards:=True,
>>>>>> Wrap:=wdFindContinue, Forward:=True) = True
>>>>>> Selection.Paragraphs(1).Range.Delete
>>>>>> Loop
>>>>>> End With
>>>>>> End Sub
>
>



Re: I only want to delete Plc 0% not L 5:0:0 by Steved

Steved
Mon May 29 03:32:01 CDT 2006

Hello Greg from Steved.

I know about Google and where you are coming from, but I am sorry you need
to understand that they got me started , but not what I need, to have a
satifactory result, meaning I have over 700 pages, I need to extract
information that in the end it will condense it down to 9 pages off
information I require. Yes it does it in a fashion. Just take last Sunday for
an example, I spent over two hours going through this forum trying to find
something similar to my issue, so believe me it is not for trying as is in my
case but I am determined to get a satifactory result, and believe me I will,
but in my case sadly it will it will take time.

ps No you did not insult me, I just felt that you needed to know that for
some off us it takes a bit longer for it to sink in.

Cheers.

"Greg Maxey" wrote:

> Steved,
>
> You were insulted. Ok, the mule bit might have been bit sarcastic, but
> insulting your was not my intent. My intent was to suggest that you "learn
> from what you have already asked." Try a Google search for "Steved" and
> "Find and Replace." I think that you will find that you are asking
> questions that others have arleady answered for you. ;-)
>
>
> --
> Greg Maxey/Word MVP
> See:
> http://gregmaxey.mvps.org/word_tips.htm
> For some helpful tips using Word.
>
>
> Steved wrote:
> > Hello Greg from Steved.
> >
> > Greg you need to take a step back, as I find what you have written to
> > be completley out off context, you need to understand that someone
> > like myself may have only one project, but tries to inprove ( "Yes
> > you guessed it I do not use word very often ") so yes I ask questions
> > which are important to me and may seem basic to you but not
> > understanding the terminology in putting macros together in my case I
> > believe that is why this forum was set up in the first place, if
> > people desire not to answer me well that's fine, so here lies the
> > lesson Greg as said earlier in my statement I am not a word person
> > but value very much the input you have all given to me. So if I come
> > back to this forum just ignore me, if that is how you feel.
> >
> > Thankyou.
> >
> > "Greg Maxey" wrote:
> >
> >> Steved,
> >>
> >> I think that the general consensus is that you have been shown
> >> enough find and replace basics over the last year or so to educate a
> >> mule. No offense intended mate. I also ask a lot of questions that
> >> a master would consider primary. Often after asking I try, fail,
> >> try again fail, try again and succeed. My point is that I wish that
> >> you would try to apply the things that you have already learned.
> >>
> >>
> >> --
> >> Greg Maxey/Word MVP
> >> See:
> >> http://gregmaxey.mvps.org/word_tips.htm
> >> For some helpful tips using Word.
> >>
> >>
> >> Steved wrote:
> >>> Thanks Greg
> >>>
> >>> And I will in future not thank in advance, I did not think.
> >>>
> >>> Cheers.
> >>>
> >>> "Greg Maxey" wrote:
> >>>
> >>>> Steved,
> >>>>
> >>>> Some consider thanking in advance as rude ;-)
> >>>>
> >>>> If you code to delete and entire paragraph then that is the deed
> >>>> that will be done.
> >>>>
> >>>> Sub Win()
> >>>> Selection.HomeKey wdStory
> >>>> Selection.Find.ClearFormatting
> >>>> With Selection.Find
> >>>> Do While .Execute(FindText:="Plc [0-9]%", MatchWildcards:=True,
> >>>> Wrap:=wdFindContinue, Forward:=True) = True
> >>>> Selection.Range.Delete
> >>>> Loop
> >>>> End With
> >>>> End Sub
> >>>>
> >>>>
> >>>> --
> >>>> Greg Maxey/Word MVP
> >>>> See:
> >>>> http://gregmaxey.mvps.org/word_tips.htm
> >>>> For some helpful tips using Word.
> >>>>
> >>>>
> >>>> Steved wrote:
> >>>>> Hello from Steved Thankyou in Advance.
> >>>>>
> >>>>> When I run the below macro it deletes the whole paragraph is it
> >>>>> possible please to modify the below macro to delete Plc 0% and
> >>>>> leave L 5:0:0
> >>>>>
> >>>>> Plc 0% L 5:0:0
> >>>>>
> >>>>> Sub Win()
> >>>>> Selection.HomeKey wdStory
> >>>>> Selection.Find.ClearFormatting
> >>>>> With Selection.Find
> >>>>> Do While .Execute(FindText:="Plc [0-9]%", MatchWildcards:=True,
> >>>>> Wrap:=wdFindContinue, Forward:=True) = True
> >>>>> Selection.Paragraphs(1).Range.Delete
> >>>>> Loop
> >>>>> End With
> >>>>> End Sub
>
>
>

Re: I only want to delete Plc 0% not L 5:0:0 by Greg

Greg
Mon May 29 03:44:06 CDT 2006

Ask an thou shalt recieve.

--
Greg Maxey/Word MVP
See:
http://gregmaxey.mvps.org/word_tips.htm
For some helpful tips using Word.


Steved wrote:
> Hello Greg from Steved.
>
> I know about Google and where you are coming from, but I am sorry you
> need to understand that they got me started , but not what I need, to
> have a satifactory result, meaning I have over 700 pages, I need to
> extract information that in the end it will condense it down to 9
> pages off information I require. Yes it does it in a fashion. Just
> take last Sunday for an example, I spent over two hours going through
> this forum trying to find something similar to my issue, so believe
> me it is not for trying as is in my case but I am determined to get a
> satifactory result, and believe me I will, but in my case sadly it
> will it will take time.
>
> ps No you did not insult me, I just felt that you needed to know
> that for some off us it takes a bit longer for it to sink in.
>
> Cheers.
>
> "Greg Maxey" wrote:
>
>> Steved,
>>
>> You were insulted. Ok, the mule bit might have been bit sarcastic,
>> but insulting your was not my intent. My intent was to suggest that
>> you "learn from what you have already asked." Try a Google search
>> for "Steved" and "Find and Replace." I think that you will find
>> that you are asking questions that others have arleady answered for
>> you. ;-)
>>
>>
>> --
>> Greg Maxey/Word MVP
>> See:
>> http://gregmaxey.mvps.org/word_tips.htm
>> For some helpful tips using Word.
>>
>>
>> Steved wrote:
>>> Hello Greg from Steved.
>>>
>>> Greg you need to take a step back, as I find what you have written
>>> to be completley out off context, you need to understand that
>>> someone like myself may have only one project, but tries to inprove
>>> ( "Yes you guessed it I do not use word very often ") so yes I ask
>>> questions which are important to me and may seem basic to you but
>>> not understanding the terminology in putting macros together in my
>>> case I believe that is why this forum was set up in the first
>>> place, if people desire not to answer me well that's fine, so here
>>> lies the lesson Greg as said earlier in my statement I am not a
>>> word person but value very much the input you have all given to me.
>>> So if I come back to this forum just ignore me, if that is how you
>>> feel.
>>>
>>> Thankyou.
>>>
>>> "Greg Maxey" wrote:
>>>
>>>> Steved,
>>>>
>>>> I think that the general consensus is that you have been shown
>>>> enough find and replace basics over the last year or so to educate
>>>> a mule. No offense intended mate. I also ask a lot of questions
>>>> that a master would consider primary. Often after asking I try,
>>>> fail, try again fail, try again and succeed. My point is that I
>>>> wish that you would try to apply the things that you have already
>>>> learned.
>>>>
>>>>
>>>> --
>>>> Greg Maxey/Word MVP
>>>> See:
>>>> http://gregmaxey.mvps.org/word_tips.htm
>>>> For some helpful tips using Word.
>>>>
>>>>
>>>> Steved wrote:
>>>>> Thanks Greg
>>>>>
>>>>> And I will in future not thank in advance, I did not think.
>>>>>
>>>>> Cheers.
>>>>>
>>>>> "Greg Maxey" wrote:
>>>>>
>>>>>> Steved,
>>>>>>
>>>>>> Some consider thanking in advance as rude ;-)
>>>>>>
>>>>>> If you code to delete and entire paragraph then that is the deed
>>>>>> that will be done.
>>>>>>
>>>>>> Sub Win()
>>>>>> Selection.HomeKey wdStory
>>>>>> Selection.Find.ClearFormatting
>>>>>> With Selection.Find
>>>>>> Do While .Execute(FindText:="Plc [0-9]%", MatchWildcards:=True,
>>>>>> Wrap:=wdFindContinue, Forward:=True) = True
>>>>>> Selection.Range.Delete
>>>>>> Loop
>>>>>> End With
>>>>>> End Sub
>>>>>>
>>>>>>
>>>>>> --
>>>>>> Greg Maxey/Word MVP
>>>>>> See:
>>>>>> http://gregmaxey.mvps.org/word_tips.htm
>>>>>> For some helpful tips using Word.
>>>>>>
>>>>>>
>>>>>> Steved wrote:
>>>>>>> Hello from Steved Thankyou in Advance.
>>>>>>>
>>>>>>> When I run the below macro it deletes the whole paragraph is it
>>>>>>> possible please to modify the below macro to delete Plc 0% and
>>>>>>> leave L 5:0:0
>>>>>>>
>>>>>>> Plc 0% L 5:0:0
>>>>>>>
>>>>>>> Sub Win()
>>>>>>> Selection.HomeKey wdStory
>>>>>>> Selection.Find.ClearFormatting
>>>>>>> With Selection.Find
>>>>>>> Do While .Execute(FindText:="Plc [0-9]%", MatchWildcards:=True,
>>>>>>> Wrap:=wdFindContinue, Forward:=True) = True
>>>>>>> Selection.Paragraphs(1).Range.Delete
>>>>>>> Loop
>>>>>>> End With
>>>>>>> End Sub



Re: I only want to delete Plc 0% not L 5:0:0 by Greg

Greg
Mon May 29 03:45:47 CDT 2006

Has your e-mail account been restored? Still anxiously awaiting offline
contact.

--
Greg Maxey/Word MVP
See:
http://gregmaxey.mvps.org/word_tips.htm
For some helpful tips using Word.


Jezebel wrote:
> Well said.
>
>
> "Greg Maxey" <gmaxey@mvps.oSCARrOMEOgOLF> wrote in message
> news:eJjxOavgGHA.4708@TK2MSFTNGP04.phx.gbl...
>> Steved,
>>
>> You were insulted. Ok, the mule bit might have been bit sarcastic,
>> but insulting your was not my intent. My intent was to suggest that
>> you "learn from what you have already asked." Try a Google search
>> for "Steved" and "Find and Replace." I think that you will find
>> that you are asking questions that others have arleady answered for
>> you. ;-) --
>> Greg Maxey/Word MVP
>> See:
>> http://gregmaxey.mvps.org/word_tips.htm
>> For some helpful tips using Word.
>>
>>
>> Steved wrote:
>>> Hello Greg from Steved.
>>>
>>> Greg you need to take a step back, as I find what you have written
>>> to be completley out off context, you need to understand that
>>> someone like myself may have only one project, but tries to inprove
>>> ( "Yes you guessed it I do not use word very often ") so yes I ask
>>> questions which are important to me and may seem basic to you but
>>> not understanding the terminology in putting macros together in my
>>> case I believe that is why this forum was set up in the first
>>> place, if people desire not to answer me well that's fine, so here
>>> lies the lesson Greg as said earlier in my statement I am not a
>>> word person but value very much the input you have all given to me.
>>> So if I come back to this forum just ignore me, if that is how you
>>> feel. Thankyou.
>>>
>>> "Greg Maxey" wrote:
>>>
>>>> Steved,
>>>>
>>>> I think that the general consensus is that you have been shown
>>>> enough find and replace basics over the last year or so to educate
>>>> a mule. No offense intended mate. I also ask a lot of questions
>>>> that a master would consider primary. Often after asking I try,
>>>> fail, try again fail, try again and succeed. My point is that I
>>>> wish that you would try to apply the things that you have already
>>>> learned. --
>>>> Greg Maxey/Word MVP
>>>> See:
>>>> http://gregmaxey.mvps.org/word_tips.htm
>>>> For some helpful tips using Word.
>>>>
>>>>
>>>> Steved wrote:
>>>>> Thanks Greg
>>>>>
>>>>> And I will in future not thank in advance, I did not think.
>>>>>
>>>>> Cheers.
>>>>>
>>>>> "Greg Maxey" wrote:
>>>>>
>>>>>> Steved,
>>>>>>
>>>>>> Some consider thanking in advance as rude ;-)
>>>>>>
>>>>>> If you code to delete and entire paragraph then that is the deed
>>>>>> that will be done.
>>>>>>
>>>>>> Sub Win()
>>>>>> Selection.HomeKey wdStory
>>>>>> Selection.Find.ClearFormatting
>>>>>> With Selection.Find
>>>>>> Do While .Execute(FindText:="Plc [0-9]%", MatchWildcards:=True,
>>>>>> Wrap:=wdFindContinue, Forward:=True) = True
>>>>>> Selection.Range.Delete
>>>>>> Loop
>>>>>> End With
>>>>>> End Sub
>>>>>>
>>>>>>
>>>>>> --
>>>>>> Greg Maxey/Word MVP
>>>>>> See:
>>>>>> http://gregmaxey.mvps.org/word_tips.htm
>>>>>> For some helpful tips using Word.
>>>>>>
>>>>>>
>>>>>> Steved wrote:
>>>>>>> Hello from Steved Thankyou in Advance.
>>>>>>>
>>>>>>> When I run the below macro it deletes the whole paragraph is it
>>>>>>> possible please to modify the below macro to delete Plc 0% and
>>>>>>> leave L 5:0:0
>>>>>>>
>>>>>>> Plc 0% L 5:0:0
>>>>>>>
>>>>>>> Sub Win()
>>>>>>> Selection.HomeKey wdStory
>>>>>>> Selection.Find.ClearFormatting
>>>>>>> With Selection.Find
>>>>>>> Do While .Execute(FindText:="Plc [0-9]%", MatchWildcards:=True,
>>>>>>> Wrap:=wdFindContinue, Forward:=True) = True
>>>>>>> Selection.Paragraphs(1).Range.Delete
>>>>>>> Loop
>>>>>>> End With
>>>>>>> End Sub



Re: I only want to delete Plc 0% not L 5:0:0 by Steved

Steved
Mon May 29 03:53:01 CDT 2006

Hello Greg from Steved

I shall.

Have a good day or evening what ever the time is, where you are at.

Cheers.




"Greg Maxey" wrote:

> Ask an thou shalt recieve.
>
> --
> Greg Maxey/Word MVP
> See:
> http://gregmaxey.mvps.org/word_tips.htm
> For some helpful tips using Word.
>
>
> Steved wrote:
> > Hello Greg from Steved.
> >
> > I know about Google and where you are coming from, but I am sorry you
> > need to understand that they got me started , but not what I need, to
> > have a satifactory result, meaning I have over 700 pages, I need to
> > extract information that in the end it will condense it down to 9
> > pages off information I require. Yes it does it in a fashion. Just
> > take last Sunday for an example, I spent over two hours going through
> > this forum trying to find something similar to my issue, so believe
> > me it is not for trying as is in my case but I am determined to get a
> > satifactory result, and believe me I will, but in my case sadly it
> > will it will take time.
> >
> > ps No you did not insult me, I just felt that you needed to know
> > that for some off us it takes a bit longer for it to sink in.
> >
> > Cheers.
> >
> > "Greg Maxey" wrote:
> >
> >> Steved,
> >>
> >> You were insulted. Ok, the mule bit might have been bit sarcastic,
> >> but insulting your was not my intent. My intent was to suggest that
> >> you "learn from what you have already asked." Try a Google search
> >> for "Steved" and "Find and Replace." I think that you will find
> >> that you are asking questions that others have arleady answered for
> >> you. ;-)
> >>
> >>
> >> --
> >> Greg Maxey/Word MVP
> >> See:
> >> http://gregmaxey.mvps.org/word_tips.htm
> >> For some helpful tips using Word.
> >>
> >>
> >> Steved wrote:
> >>> Hello Greg from Steved.
> >>>
> >>> Greg you need to take a step back, as I find what you have written
> >>> to be completley out off context, you need to understand that
> >>> someone like myself may have only one project, but tries to inprove
> >>> ( "Yes you guessed it I do not use word very often ") so yes I ask
> >>> questions which are important to me and may seem basic to you but
> >>> not understanding the terminology in putting macros together in my
> >>> case I believe that is why this forum was set up in the first
> >>> place, if people desire not to answer me well that's fine, so here
> >>> lies the lesson Greg as said earlier in my statement I am not a
> >>> word person but value very much the input you have all given to me.
> >>> So if I come back to this forum just ignore me, if that is how you
> >>> feel.
> >>>
> >>> Thankyou.
> >>>
> >>> "Greg Maxey" wrote:
> >>>
> >>>> Steved,
> >>>>
> >>>> I think that the general consensus is that you have been shown
> >>>> enough find and replace basics over the last year or so to educate
> >>>> a mule. No offense intended mate. I also ask a lot of questions
> >>>> that a master would consider primary. Often after asking I try,
> >>>> fail, try again fail, try again and succeed. My point is that I
> >>>> wish that you would try to apply the things that you have already
> >>>> learned.
> >>>>
> >>>>
> >>>> --
> >>>> Greg Maxey/Word MVP
> >>>> See:
> >>>> http://gregmaxey.mvps.org/word_tips.htm
> >>>> For some helpful tips using Word.
> >>>>
> >>>>
> >>>> Steved wrote:
> >>>>> Thanks Greg
> >>>>>
> >>>>> And I will in future not thank in advance, I did not think.
> >>>>>
> >>>>> Cheers.
> >>>>>
> >>>>> "Greg Maxey" wrote:
> >>>>>
> >>>>>> Steved,
> >>>>>>
> >>>>>> Some consider thanking in advance as rude ;-)
> >>>>>>
> >>>>>> If you code to delete and entire paragraph then that is the deed
> >>>>>> that will be done.
> >>>>>>
> >>>>>> Sub Win()
> >>>>>> Selection.HomeKey wdStory
> >>>>>> Selection.Find.ClearFormatting
> >>>>>> With Selection.Find
> >>>>>> Do While .Execute(FindText:="Plc [0-9]%", MatchWildcards:=True,
> >>>>>> Wrap:=wdFindContinue, Forward:=True) = True
> >>>>>> Selection.Range.Delete
> >>>>>> Loop
> >>>>>> End With
> >>>>>> End Sub
> >>>>>>
> >>>>>>
> >>>>>> --
> >>>>>> Greg Maxey/Word MVP
> >>>>>> See:
> >>>>>> http://gregmaxey.mvps.org/word_tips.htm
> >>>>>> For some helpful tips using Word.
> >>>>>>
> >>>>>>
> >>>>>> Steved wrote:
> >>>>>>> Hello from Steved Thankyou in Advance.
> >>>>>>>
> >>>>>>> When I run the below macro it deletes the whole paragraph is it
> >>>>>>> possible please to modify the below macro to delete Plc 0% and
> >>>>>>> leave L 5:0:0
> >>>>>>>
> >>>>>>> Plc 0% L 5:0:0
> >>>>>>>
> >>>>>>> Sub Win()
> >>>>>>> Selection.HomeKey wdStory
> >>>>>>> Selection.Find.ClearFormatting
> >>>>>>> With Selection.Find
> >>>>>>> Do While .Execute(FindText:="Plc [0-9]%", MatchWildcards:=True,
> >>>>>>> Wrap:=wdFindContinue, Forward:=True) = True
> >>>>>>> Selection.Paragraphs(1).Range.Delete
> >>>>>>> Loop
> >>>>>>> End With
> >>>>>>> End Sub
>
>
>