Previous Topic Next Topic

Columns & Rows Help

Solved/Closed
futurepsych92 Posts 8 Registration date Monday January 4, 2016 Status Member Last seen February 19, 2016 - Jan 4, 2016 at 10:40 PM
futurepsych92 Posts 8 Registration date Monday January 4, 2016 Status Member Last seen February 19, 2016 - Jan 14, 2016 at 06:11 PM
Hello all,

In short, here is what I need help doing:

I would like to take 15 items in one column and transfer them into a row in another spreadsheet. When the items are transferred, I would like for them to be pasted every 3 spaces. For example, if something is pasted in (1,3), then the next item will be pasted in (1,6).

Thank you so much for your help.

2 responses

Answer 1 / 2
TrowaD Posts 2921 Registration date Sunday September 12, 2010 Status Moderator Last seen December 27, 2022 555
Jan 12, 2016 at 11:17 AM
Hi Futurepsych92,

Here you go: 
Sub RunMe()
Dim x As Integer

Sheets("Sheet1").Select

For Each cell In Range("A1:A15")
    x = x + 3
    cell.Copy Sheets("Sheet2").Cells(1, x)
Next cell
End Sub


Best regards,
Trowa
futurepsych92 Posts 8 Registration date Monday January 4, 2016 Status Member Last seen February 19, 2016
Jan 12, 2016 at 12:22 PM
It works! Thank you so much!
futurepsych92 Posts 8 Registration date Monday January 4, 2016 Status Member Last seen February 19, 2016
Jan 12, 2016 at 04:38 PM
Hi Trowa,

I have a quick question:


While the Macro works, I need for it to copy every four spaces starting from Cell (2,2).

So, it would be Cell (2,2), then (2,6), then (2,10)....


How would I alter this Macro to make it do this?
  • I apologize, I accidentally made a mistake in my original request for help. :(
Answer 2 / 2
TrowaD Posts 2921 Registration date Sunday September 12, 2010 Status Moderator Last seen December 27, 2022 555
Jan 14, 2016 at 11:32 AM
Hi Futurepsych92,

Apology accepted :).


Here you go: 
Sub RunMe()
Dim x As Integer

Sheets("Sheet1").Select
x = 2

For Each cell In Range("A1:A15")
    cell.Copy Sheets("Sheet2").Cells(2, x)
    x = x + 4
Next cell
End Sub


Best regards,
Trowa
futurepsych92 Posts 8 Registration date Monday January 4, 2016 Status Member Last seen February 19, 2016
Jan 14, 2016 at 06:11 PM
Thanks!

Similar discussions

How to add Rows automatically based on Cell Value In Excel?
Raj_2823 -
TrowaD -

Hi All, I have a requirement to add the Rows Based On Cell Value In Excel. Below I have attached the snapshot of the requirement details. I have two sheets in excel. "Sheet 1" is static, and "Sheet 2" is dynamic. The Sheet 2 values will change based on system transactions. Here my requirement is to bring all those values in sheet 1. I described the requirement in "Sheet 3" and I am expecting the output to look like Sheet 3. Can you please help me with how to add the Rows Based On Cell Value In Excel? Regards, Raj

7 responses
Converting rows of data in notepad to columns
Need help -
Philgood_FR -

Hello,

Needing help please. From a pdf data base supplied, I have copied the contents over onto notepad. The data within this notepad contains first name, last name, postal address and a whole host of other non related data. The challenge is that the data exists in "rows", and I need to import into excel in column format-that way I can clean up the unecessary data and continue with my mail merge. Sample of data in present format:

943850========================================

App. Name One: Anonymous Mr Dec 15, 1963
App. Name Two:
Corp. Name:
Address: PLOT 99 Witels Street


DELFT 7100
Busines...

2 responses
Macro to Select Multiple Columns by Columns Specific Headings to Delete Dupes
jackied25 -
TrowaD -

Hello All,

I have been struggling to find a code that allows me to select multiple columns by name to then delete duplicates in those specific columns. The reason behind this is the workbook i am using will soon be adding columns and i need to specifically reference these exact columns rather than the numerical placement of the columns. If anyone can help that would be great!

2 responses
Copy range data in a column to new column.
anthonyishere -
anthonyishere -

Need help here please !!!

Data available : A range of data in a column. Some of the cells are blank.

My requirement : Is there any formula wherein I can copy data from the range in the column to another column in another sheet. I need to copy only filled cells. I also need to have a command which will automatically copy data by the click of one button maybe!! I tried a macro but it doesn't work.

6 responses
Excel Macro/Code help: Creating sheet for each name in column of another sheet
excelnovice2019 -
vcoolio -

Hello!
I am working on a project at my internship and ran into some issues finishing up some of the features I want to implement. The excel is a file to track training for a specific role at the company. The first sheet (pictured below) has a list of the employees and the courses as well as a record of the date of each employees' completion of the course. What I want to implement is something to create a specific sheet for each name in each column. The person's name should be the name of this new sheet and the sheet needs to follow a specific format (pictured below as well). As you can see, this new sheet pulls the original course list as well as that employee's completion record and ...

21 responses