VBA: Select specific cell in current column

[RLCornish]

Here's what I'm using...

For i = 15 To 17 Rows(ActiveCell.Row).Columns(i).Select
If (ActiveCell) >= 1 Then Range((ActiveCell.Column) & 1).Select
Next i

The bolded piece is where I'm stuck. I'm trying to

• Get to Cell 1 of the current column
• Copy what's there
• Do a little extra stuff which I have worked out
• Then get back to the cell I started in

Any suggestions how to get to cell 1 of whatever column I'm on?

 

[JoeMo]

Here's what I'm using...

For i = 15 To 17 Rows(ActiveCell.Row).Columns(i).Select
If (ActiveCell) >= 1 Then Range((ActiveCell.Column) & 1).Select
Next i

The bolded piece is where I'm stuck. I'm trying to

• Get to Cell 1 of the current column
• Copy what's there
• Do a little extra stuff which I have worked out
• Then get back to the cell I started in

Any suggestions how to get to cell 1 of whatever column I'm on?

cells(1,activecell.Column).select

 

[RLCornish]

Thanks Joe. I figured it was something simple. I'm still very green at this, but I muttle thru.

 

[Rick Rothstein]

Thanks Joe. I figured it was something simple. I'm still very green at this, but I muttle thru.

Here is another way... not necessarily better (I have no idea if it is or isn't), just different...

ActiveCell.EntireColumn.Cells(1).Select

 

[RLCornish]

Thanks Rick, I appreciate the help.