Move cell to top of unknown column w/irregular blanks 1

[gestaltphoenix]

Hey ppl,

I have a script running where information is filled into columns and rows dynamicly, meaning if certain criteria is checked off then it will appear in the next unused column. This means I dont know what column I'm going to be in when I need to move to the top of it in to fill in a label value.

xlUp wont always work because I have some blanks occuring at irregular intervals. Any idea how to move the active cell to the (1,COLUMN) slot?

Thanx

 

[DaleWatson123321]

Hi gestaltphoenix,

This will work...

Sub Go_TopRow()
curcolm = ActiveCell.Column
Cells(1, curcolm).Activate
End Sub

Please advise as to how it fits.

Regards, ...Dale Watson

HOME: nd.watson@shaw.ca

 

[gestaltphoenix]

dale,

Thanx a lot...still learnin some of the syntax...worked like a charm...

GP