hi copy all the content of the document and paste i t in col a of sheet 1 then run this macro
Option Compare Text
Sub test()
Dim i As Long
j = 1
For i = 1 To Range("a65356").End(xlUp).Row
If Left(Cells(i, 1).Value, 7) = "School:" Then
j = j + 1
Cells(j, 8).Value = Right(Cells(i, 1).Value, Len(Cells(i, 1).Value) - 8)
ElseIf Left(Cells(i, 1).Value, 7) = "Course:" Then
Cells(j, 9).Value = Right(Cells(i, 1).Value, Len(Cells(i, 1).Value) - 8)
ElseIf Left(Cells(i, 1).Value, 6) = "Grade:" Then
Cells(j, 10).Value = Right(Cells(i, 1).Value, Len(Cells(i, 1).Value) - 7)
ElseIf Left(Cells(i, 1).Value, 10) = "Objective:" Then
Cells(j, 11).Value = Right(Cells(i, 1).Value, Len(Cells(i, 1).Value) - 11)
ElseIf Left(Cells(i, 1).Value, 5) = "Date:" Then
Cells(j, 12).Value = Right(Cells(i, 1).Value, Len(Cells(i, 1).Value) - 6)
End If
Next i
End Sub
check the attachmnet
On Sun, Jul 24, 2011 at 8:04 AM, dkelb <dkelb1...@gmail.com> wrote:
> How can I attach!? Sorry -- I'm new.
>
>
>
> On Jul 22, 11:50 pm, "Rajan_Verma" <rajanverma1...@gmail.com> wrote:
> > Attached your word document.
> >
> > From: excel-macros@googlegroups.com [mailto:
> excel-macros@googlegroups.com]
> > On Behalf Of Darin Kelberlau
> > Sent: Saturday, July 23, 2011 9:04 AM
> > To: excel-macros@googlegroups.com
> > Subject: Re: $$Excel-Macros$$ Copy text from Word and paste into Excel
> >
> > I dont' know the details of the code. Do you mind scripting it up??
> >
> > Thanks.
> >
> > On Fri, Jul 22, 2011 at 11:23 AM, hari kumar <prekkeh...@gmail.com>
> wrote:
> >
> > Do the following 1.creTe word app 2.take microsoft word library in the
> > references 3m specify the path of word doc and
> >
> > On 7/22/11, dkelb <dkelb1...@gmail.com> wrote:> I am a newbie to
> VBA........
> > > I have a word document that is composed of many pages with text. I
> > > want to find the first occurance of "Objective" and copy the text that
> > > follows then paste it into A1. Find the next occurance and past it
> > > into A2. Do this until the end of the word file. Then find the first
> > > occurance of "Date" and copy the text that follows then paste it into
> > > B1. Find the next occurance and paste it into B2. Do this until the
> > > end of the word file.
> >
> > > Thanks in advance for some VBA code for Excel that can save me tons
> > > of
> > > time!
> >
> > > --
> >
> >
> ---------------------------------------------------------------------------
> -
> > ------
> >
> > > Some important links for excel users:
> > > 1. Follow us on TWITTER for tips tricks and links :
> > >http://twitter.com/exceldailytip
> > > 2. Join our LinkedIN group @http://www.linkedin.com/groups?gid=1871310
> > > 3. Excel tutorials athttp://www.excel-macros.blogspot.com
> > > 4. Learn VBA Macros athttp://www.quickvba.blogspot.com
> > > 5. Excel Tips and Tricks athttp://exceldailytip.blogspot.com
> >
> > > To post to this group, send email to excel-macros@googlegroups.com
> >
> > > <><><><><><><><><><><><><><><><><><><><><><>
> > > Like our page on facebook , Just follow below link
> > >http://www.facebook.com/discussexcel
> >
> > --
> > Hari kumar
> > Our strength grows out of our weaknesses.
> >
> > --
> >
> ---------------------------------------------------------------------------
> -
> > ------
> > Some important links for excel users:
> > 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> > 2. Join our LinkedIN group @http://www.linkedin.com/groups?gid=1871310
> > 3. Excel tutorials athttp://www.excel-macros.blogspot.com
> > 4. Learn VBA Macros athttp://www.quickvba.blogspot.com
> > 5. Excel Tips and Tricks athttp://exceldailytip.blogspot.com
> >
> > To post to this group, send email to excel-macros@googlegroups.com
> >
> > <><><><><><><><><><><><><><><><><><><><><><>
> > Like our page on facebook , Just follow below linkhttp://
> www.facebook.com/discussexcel
> >
> > --
> >
> ---------------------------------------------------------------------------
> -
> > ------
> > Some important links for excel users:
> > 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> > 2. Join our LinkedIN group @http://www.linkedin.com/groups?gid=1871310
> > 3. Excel tutorials athttp://www.excel-macros.blogspot.com
> > 4. Learn VBA Macros athttp://www.quickvba.blogspot.com
> > 5. Excel Tips and Tricks athttp://exceldailytip.blogspot.com
> >
> > To post to this group, send email to excel-macros@googlegroups.com
> >
> > <><><><><><><><><><><><><><><><><><><><><><>
> > Like our page on facebook , Just follow below linkhttp://
> www.facebook.com/discussexcel
>
> --
>
> ----------------------------------------------------------------------------------
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/discussexcel
>
--
*Regards*
* *
*Ashish Koul*
*akoul*.*blogspot*.com <http://akoul.blogspot.com/>
http://akoul.posterous.com/
*akoul*.wordpress.com <http://akoul.wordpress.com/>
My Linkedin Profile <http://in.linkedin.com/pub/ashish-koul/10/400/830>
P Before printing, think about the environment.
--
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to excel-macros@googlegroups.com
<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/discussexcel
SampleExcel.xlsm
Description: Binary data
