Solved

Grab 5 rows of 25 numbers and paste them as one line of 125

Posted on 2014-01-27
8
116 Views
Last Modified: 2014-02-01
Hi,

I have 5 rows, each contains 25 numbers (125) numbers in total.  Which is the easiest and fastest way to grab this 5 x 25 numbers and paste them elsewhere as one row of 125 numbers?

Thank you
0
Comment
Question by:DemonForce
8 Comments
 
LVL 6

Expert Comment

by:Spyder2010
ID: 39813321
You could save the file as a .csv file, then open it with Notepad... it would give you all 5 of your rows separated by a ','.  Just delete the 4 commas in the file, save it, then open it back up w/ Excel.
0
 
LVL 6

Expert Comment

by:Spyder2010
ID: 39813324
There are also numerous ways you could automate this process with PowerShell... not sure how comfortable you are with scripting, but I could create a sample script that would do this if you're comfortable running scripts.  What operating system are you using?
0
 

Author Comment

by:DemonForce
ID: 39813350
Hi, needs to be in Excel VBA so its automated thanx
0
Master Your Team's Linux and Cloud Stack!

The average business loses $13.5M per year to ineffective training (per 1,000 employees). Keep ahead of the competition and combine in-person quality with online cost and flexibility by training with Linux Academy.

 
LVL 46

Accepted Solution

by:
Martin Liss earned 500 total points
ID: 39813370
Here's a macro you can use. It assumes the data is in rows 1 to 5 and it puts the data in row 6.

Sub CombineRows()
Dim intSel As Integer
Dim intPaste As Integer

Application.ScreenUpdating = False

intPaste = 1
' Assumes the data is in rows 1 to 5
For intSel = 1 To 5
    Range("A" & intSel & ":" & "Y" & intSel).Select
    Selection.Copy
    ' Puts the result in row 6
    Cells(6, intPaste).Select
    ActiveSheet.Paste
    intPaste = intPaste + 25
Next

Application.CutCopyMode = False
Application.ScreenUpdating = True

Open in new window

0
 
LVL 6

Expert Comment

by:Spyder2010
ID: 39813391
ahh, sorry, misunderstood... not really an Excel expert, so apologies for wasting time here.... that being said, it looks like you can just concatenate your rows with '&':

=A1&B1&C1&D1&E1

That's making the assumption that when you say you have 25 numbers per row, that they are 25 numbers in a single column.... if they are 5 rows x 25 columns, then this would take longer to type in for 125 cells.

reference:
http://www.techonthenet.com/excel/formulas/concat2.php
0
 
LVL 6

Expert Comment

by:Spyder2010
ID: 39813394
ahh, looks like someone posted who is way more familiar with this than I am... signing out, looks like you have a better person to ask than me:)
0
 
LVL 43

Expert Comment

by:Saqib Husain, Syed
ID: 39813992
You can also try this one-liner. C10 is where the table starts. A7 is where the results starts (this should remain in column A. If you want to change it some modification is required).

Sub tab2row()
Range("A7").Resize(, 25).Formula = "=index(" & Range("C10").Resize(5, 5).Address & ",(COLUMN()-1)/5+1,MOD(COLUMN()-1,5)+1)"
End Sub

Open in new window

0
 
LVL 46

Expert Comment

by:Martin Liss
ID: 39826476
I'm glad I was able to help.

In my profile you'll find links to some articles I've written that may interest you.
Marty - MVP 2009 to 2013
0

Featured Post

ScreenConnect 6.0 Free Trial

Want empowering updates? You're in the right place! Discover new features in ScreenConnect 6.0, based on partner feedback, to keep you business operating smoothly and optimally (the way it should be). Explore all of the extras and enhancements for yourself!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
Excel formula Sumif not working 4 28
If help 9 48
vba autofilter in row 4 6 11
excel formula to sum column 13 15
Convert between Excel file formats (.XLS, .XLSX, .XLSM) with/without macro option David Miller (dlmille) Intro Over this past Fall, I've had the opportunity to see several similar requests and have developed a couple related solutions associate…
This code takes an Excel list of URL’s and adds a header titled “URL List”. It then searches through all URL’s in column “A”, looking for duplicates. When a duplicate is found, it is moved to the top of the list. The duplicate URL’s are then highlig…
The viewer will learn how to use the =DISCRINV command to create a discrete random variable, use this command to model a set of probabilities and outcomes in a Monte Carlo simulation, and learn how to find the standard deviation of a set of probabil…
This Micro Tutorial will demonstrate how to use a scrolling table in Microsoft Excel using the INDEX function.

809 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question