Help creating part of a macro (find Empty column)

J

Jay

I have created a macro which seems to be working fine, however I can't
get it to copy into the right location.

The macro selects a portion of a work sheet, copies it, selects a
different work sheet, and then pastes it.

Now my problem is that every time I run this macro it is pasting over
the same area, but I want to to select the area just to the right of
the current data.

So basically what I need is a way to test if a cell is empty (starting
at B1), if this cell is not empty I want it to move to the next cell
(C1), and repeat until it hits an empty cell, but I can't figure out
how to get this working since I am very new to excel marcos.

Thanks in advance
 
B

Bob Phillips

Show us the code, and we can then help more.

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
 
D

David

Sub Macro2()
Sheets("Sheet1").Select
Range("A1").Select
Do Until ActiveCell.Value = ""
ActiveCell.Offset(0, 1).Select
Loop
NewAddress = ActiveCell.Address
End Sub
 
Top