+ Reply to Thread
Results 1 to 3 of 3

CREATE Excel from WORD Table - HELP PLEASE

  1. #1
    bas
    Guest

    CREATE Excel from WORD Table - HELP PLEASE

    Looking for help to - Find text, replace with carriage return in cell.

    Previous posts most helpful in converting badly formatted Word table to
    formatted Excel worksheet. The goal is to copy bulleted cells in Word
    to become bulleted cells in Excel. I replace ^t^t and ^p with "zz" in
    Word doc. Then copy to Excel. That prevents bulleted lists becoming
    separate cells in Excel. Now I want to find "zz" and replace with
    "Alt-Return" for a carriage return within the cell. Obviously looking
    for simple solution for newbie.

    CRITICAL NEED: I'm looking for a macro to Global replace all "zz" with

    <Alt-return> {next line} and " " within the cell

    I do have a limited range A1-J1100 that I need to search.

    Also the final end users won't be using macros, and would like to not
    get error msg re MACROS - is there a way to bypass the error msg,
    disabling macros?

    EVEN BETTER: Each "copy and paste" will go into a separate range, not
    a specific # of rows, but will always be same column and preceding row
    has special format. Long-term I would like "onaction" buttons - find
    formatted cell, down 1 = active cell, prompt user to select to "paste &
    replace" or go to next target cell. But for now, I could use 2 macros,
    if macro can find next target cell, user can just re-run appropriate
    macro, either find next target or PASTE & FORMAT.
    I have a few pieces from previous posts, but can't bring it together.

    Sub PASTE & FORMAT

    Application.ScreenUpdating = False
    Range("C4:C1080").
    Range(Selection, Selection.End(xlDown)).Select
    FIND NEXT Font =
    .Name = "Times New Roman"
    .FontStyle = "Bold"
    .Size = 10
    Activecell.offset(1,0).select

    <need help here to find "zz", replace with paste, add Alt-Return>

    Sub FIND NEXT TARGET
    On (F8 or press user button) "run paste & replace routine as above" -
    or
    on (double click or user button) "find next target"

    THIS IS A GREAT GROUP, MANY HELPFUL SUGGESTIONS


  2. #2
    bas
    Guest

    Re: CREATE Excel from WORD Table - HELP PLEASE

    EXAMPLE - Formatted Cell "DAYS OF WEEK" would be followed by a single
    cell listing days of week. Must be bulleted cells, partly because we
    were given formatting constraints, also because end user for the table
    will transfer to PDA.

    C2 DAYS OF WEEK:
    C3 Work Days
    Monday
    Tuesday
    Wednesday
    Thursday


    C42 MONTHS OF YEAR
    C43 Months for 2006
    March - first work day after start
    April
    May

    This is very simplified - actual data data being copied is very
    erratic, sometimes 1 word, sometimes a list, sometimes an entire
    paragraph, but hopefully this shows what we're trying to accomplish.


  3. #3
    bas
    Guest

    Re: CREATE Excel from WORD Table - HELP PLEASE

    WORD to EXCEL - help with moving from section to section.
    I have the hard return & bullets working well, with lots of trial&error
    and "copy and paste" from the Group - see below. Since this worked so
    well, would like to incorporate 2d part of puzzle, moving to next
    section. Hard Return and replace bullets:

    Sub HardReturn()

    Range("A1:J1070").Select
    Selection.Replace What:=3D"zz", _
    Replacement:=3DChr(10) & "=B7 ", LookAt:=3DxlPart, _
    SearchOrder:=3DxlByRows, MatchCase:=3DFalse
    Selection.Replace What:=3D"=B7=B7", _
    Replacement:=3D"=B7 ", LookAt:=3DxlPart, _
    SearchOrder:=3DxlByRows, MatchCase:=3DFalse
    Selection.Replace What:=3D"=B7 =B7", _
    Replacement:=3D"=B7 ", LookAt:=3DxlPart, _
    SearchOrder:=3DxlByRows, MatchCase:=3DFalse


+ Reply to Thread

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts

Search Engine Friendly URLs by vBSEO 3.6.0 RC 1