+ Reply to Thread
Results 1 to 3 of 3

1st Timer: Transpose separated data sets into adjacent row, put on loop x 1000

  1. #1
    Registered User
    Join Date
    03-01-2012
    Location
    Seattle
    MS-Off Ver
    2010
    Posts
    1

    1st Timer: Transpose separated data sets into adjacent row, put on loop x 1000

    I did cheat however
    I used the record actions for the following example data set which extends into the 1000s:

    Follow Stephen
    Stephen Andresres •*Company Name: Software Co.
    Description: employees indirect spend
    Size: 35 employees,

    Follow Johan
    Website: kingkiioa.com
    Size: 25 Employees
    For more info call 65.96566.66666
    Telephone: 0177 g44 4455

    Tom Holder*•*Company Name: Barracks
    Description of Service: Online Backup, Virtual Recovery, Replication, Virtual Private Cloud computing
    Size: 18 Employees
    website: www.thebarracks.com


    I need to transpose each "set" into its own row and then skip down to the next "set"
    So I recorded this:

    SHIFT CTRL DOWN
    CTRL C
    RIGHT ARROW
    ALT E S E ENTER
    LEFT
    CTRL DOWN
    CTRL DOWN

    And here's the output - which doesn't work properly:
    I would like the data to be transposed into column B and one cell to the right of the first piece of data (usually name) in each set.

    Sub Macro3()
    '
    ' Macro3 Macro
    '
    ' Keyboard Shortcut: Ctrl+q
    '
    Range(Selection, Selection.End(xlDown)).Select
    Application.CutCopyMode = False
    Selection.Copy
    Range("B252").Select
    Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
    False, Transpose:=True
    Range("A252").Select
    Selection.End(xlDown).Select
    Selection.End(xlDown).Select
    End Sub

  2. #2
    Forum Expert DGagnon's Avatar
    Join Date
    02-23-2012
    Location
    Ontario, Canada
    MS-Off Ver
    Excel 2003, 2007
    Posts
    1,645

    Re: 1st Timer: Transpose separated data sets into adjacent row, put on loop x 1000

    the macro has no idea what row it is on, so it will always output to the same row, try this:

    Please Login or Register  to view this content.
    If you liked my solution, please click on the Star -- to add to my reputation

    If your issue as been resolved, please clearly state so and mark the thread as [SOLVED] using the thread tools just above the first post.

  3. #3
    Forum Expert DGagnon's Avatar
    Join Date
    02-23-2012
    Location
    Ontario, Canada
    MS-Off Ver
    Excel 2003, 2007
    Posts
    1,645

    Re: 1st Timer: Transpose separated data sets into adjacent row, put on loop x 1000

    Or you could build it into a loop to process the whole sheet:

    Please Login or Register  to view this content.

+ Reply to Thread

Thread Information

Users Browsing this Thread

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

Tags for this Thread

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