Skipping Through Empty Cells to find Data

[ih8xc]

I'm just learning VBA, and trying to figure things out as best I can. I have a text book to work from but a lot of the very basics are skipped over while emphasis is on the logic based functions.

What I am trying to do is start in a certain cell and move to the right one column at a time until I find a cell that has data (numerical) in it. I think I have the logic correct but the syntax wrong.

This is what it basically looks like:

Please Login or Register  to view this content.

The worksheet with data is called "Elevations" and the row_count and col_count are defined as integers and given start points. I'm not sure the "IsEmpty" function is what I want, or if how I am referencing the worksheet and cell is right.

Following this I need to do calculations based on the values in worksheet "Elevations" and report them to the same cell in worksheet "Settlement".

Any help is greatly appreciated.

[Dulanic]

Well the simple way without moving cell by cell (never a good idea) is:

Please Login or Register  to view this content.

Or if you want to loop as you were trying to:

Please Login or Register  to view this content.

[ih8xc]

I don't want to use ActiveCell because this whole workbook will be a template sheet for multiple projects and people, most of whom wont have any idea what they are doing (including me apparently). I want the macro to find the data itself without needing the user to select a start point.

[Dulanic]

So replace ActiveCell with a specific cell.

Please Login or Register  to view this content.

For example.

Another way using your method of changing the column value is:

Please Login or Register  to view this content.

[ih8xc]

Thank you very much. I've got it working, albeit I'm getting zeros in cells that I want to appear blank, but that shouldn't be too hard to figure out.