Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Offset
Hi guys sorry I made a blob I apologize
The T should have been AG I'm wanting it to paste the Content of AH2 to "AH3 to AH10" which is to the right of any data cells in column AG, until it finds a blank cell in column AG then stops pasting to cells in column AH. AG1 has header AG2 to AG10 has data in cells AH1 has header AH2 data AH3 to AH10 Blank Thanks for your reply DaveM |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Offset
Sub AAA()
Range("AH1").End(xlDown).Select Selection.Copy ActiveCell.Offset(1, 0) ActiveCell.Offset(1, 0).Select Do ActiveCell.Copy _ ActiveCell.Offset(1, 0) ActiveCell.Offset(1, 0).Select Loop Until IsEmpty(Cells(ActiveCell.Row, "AG")) ActiveCell.ClearContents End Sub -- Regards, Tom Ogilvy "DavidM" wrote: Hi guys sorry I made a blob I apologize The T should have been AG I'm wanting it to paste the Content of AH2 to "AH3 to AH10" which is to the right of any data cells in column AG, until it finds a blank cell in column AG then stops pasting to cells in column AH. AG1 has header AG2 to AG10 has data in cells AH1 has header AH2 data AH3 to AH10 Blank Thanks for your reply DaveM |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Compare Cell Values, Offset(-1,0), Offset(-1,-1), and xlFillDefaul | Excel Worksheet Functions | |||
Offset | Excel Discussion (Misc queries) | |||
Find, Copy offset to offset on other sheet, Run-time 1004. | Excel Programming | |||
select offset (variable ,1) to offset(variable ,variable) | Excel Programming | |||
Problem with Range.Cells.Offset and Range.Cells( row + offset, column) | Excel Programming |