Selecting the last empty cell in a column
Closed
ChrisBelfast82
-
27 Apr 2010 à 11:47
ChrisBelfast Posts 10 Registration date Tuesday 27 April 2010 Status Member Last seen 7 September 2010 - 27 Apr 2010 à 13:07
ChrisBelfast Posts 10 Registration date Tuesday 27 April 2010 Status Member Last seen 7 September 2010 - 27 Apr 2010 à 13:07
Related:
- Selecting the last empty cell in a column
- Clear only the formatting from the selected cell - Guide
- How to delete a column in word - Guide
- Excel vba find last non empty cell in column - Guide
- How to select at the rate in laptop - Guide
- What function can automatically return the value in cell c77 - Excel Forum
3 responses
victoryz
Posts
9
Registration date
Monday 26 April 2010
Status
Member
Last seen
4 May 2010
10
27 Apr 2010 à 11:59
27 Apr 2010 à 11:59
Hi Chris,
Copy data from b2:L2, put cursor on Q cell, right click mouse and select "paste special - transpose" ur data will be copied in Q column
Copy data from b2:L2, put cursor on Q cell, right click mouse and select "paste special - transpose" ur data will be copied in Q column
ChrisBelfast
Posts
10
Registration date
Tuesday 27 April 2010
Status
Member
Last seen
7 September 2010
27 Apr 2010 à 12:09
27 Apr 2010 à 12:09
Whoops!
Thanks for the fast reply but i didnt make it clear now that ive read it again...
I have data in cells "B2:L2" that i need to copy to the next empty cell in column "Q:AA", I was trying the following:
Range("B2:L2").Select
Selection.Copy
Range("Q2").Select
ActiveCell.End.Select
ActiveSheet.Paste
The next time that the macro is run i want it to then insert the cells "B2:L2" into the next empty cell in column "Q" which would then be "Q3".
Again thanks in advance
Thanks for the fast reply but i didnt make it clear now that ive read it again...
I have data in cells "B2:L2" that i need to copy to the next empty cell in column "Q:AA", I was trying the following:
Range("B2:L2").Select
Selection.Copy
Range("Q2").Select
ActiveCell.End.Select
ActiveSheet.Paste
The next time that the macro is run i want it to then insert the cells "B2:L2" into the next empty cell in column "Q" which would then be "Q3".
Again thanks in advance
ChrisBelfast
Posts
10
Registration date
Tuesday 27 April 2010
Status
Member
Last seen
7 September 2010
27 Apr 2010 à 13:07
27 Apr 2010 à 13:07
Figured it out
Range("B2:L2").Select
Selection.Copy
Cells(Rows.Count, "Q").End(xlUp).Offset(1).Select
ActiveSheet.Paste
Thanks for trying hope this helps someone else
Range("B2:L2").Select
Selection.Copy
Cells(Rows.Count, "Q").End(xlUp).Offset(1).Select
ActiveSheet.Paste
Thanks for trying hope this helps someone else
