View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
Dave Peterson Dave Peterson is offline
external usenet poster
 
Posts: 35,218
Default VBA to find difference in cell locations

You don't need VBA for this.

You could use:
=column(h1)-column(e1)
and if you wanted the row difference:
=row(h1)-row(e1)

If you wanted to ignore the end points, you could just subtract 1 from the
formula.
=column(h1)-column(e1)-1

But I'm not sure I do that.

How many columns are between H1 and H2?

In code, you could use:

Dim Cell1 as range
dim Cell2 as range

with worksheets("SomeSheetNameHere")
set cell1 = .range("h1")
set cell2 = .range("e1")
end with

msgbox cell1.column - cell2.column '-1 'if you want.



James wrote:

Is it possible to find the difference between cell locations. Such as if I
am on cell E1 and pick another cell H1, I would like to know the difference
between the locations. In this case there are 2 cells between E1 and H1.

I am writting a code that needs to know the difference between the cell
location, I just don't know what the VBA looks like for something like this.

Thanks


--

Dave Peterson