Hello,

Can someone help me to create a module (or other) in VBA for excel for the following pseydo-code:

for each [point] in [pointList]:
do until stop:
for each [point+1] in [pointList]:
if [end]: stop if [point].[measure] >= [point+1].[measure]:
[measure]+= [point+1].[measure] – [point].[measure]
else:
{function}FindNextHighestPoint
{function}InterpolateMeasure
[measure] += [interpolatedMeasure]
if {function}InterpolateMeasure or [end]: stop.

The main point of the code is to have one column with distance, and another column with elevations, and to find the distance from one point to the next highest point. Then to run through all of the locations.

Thanks for your help!