Error 6 - Overflow. What now?

I'm completely new to VBA and don't know very little programming in general.

I am trying to run this VBA:

hxxps : //github.com/niko86/RamerDouglasPeucker-ExcelVBA

(not allowed to post live links)

However I am getting an Error 6 - Overflow, and if I press Debug it points to this line:

Please Login or Register  to view this content.

Unfortunately I have no idea how to proceed from here. I've looked at the MS docs for both Error 6 and for the UBound function, but it's not been very fruitful.

Any help would be appreciated.



-----------
Why am I trying to run this VBA? Well, I have a dataset with about 12000 datapoints. I need to graph this. But my computer is not really powerful enough to do so smoothly. So I was hoping to reduce the number of data points to about 1000. I don't need the graph to be accurate. It just needs to "look" similar enough. I'm trying to graph in GraphPad Prism. Not excel btw.

Hi there,

It's VERY difficult to make meaningful suggestions without seeing the full code (which I can't access using the link you posted).

The "Overflow" error means that a variable is being asked to store a value which exceeds the allowable limits for the type of variable.

If your rowCount variable is declared (in a Dim statement) as being of type Integer, it might be worth declaring it to be of type Long and seeing if that makes a difference.

Hope this helps.

Regards,

Greg M

Hi again,

Thanks for posting your code.

The "Type Mismatch" error is generated when a variable of type (e.g.) Long is passed to a routine in which the corresponding dummy argument is declared to be of type (e.g.) Integer.

I've changed various declarations in your code to achieve consistency. Please note that I haven't attempted to understand what your code does, I've just got it to compile successfully.

The modified code is as follows:

Please Login or Register  to view this content.

Hope this helps.

Regards,

Greg M

Awesome! Thank you both That cleared that problem. But now I have a new error.

Error 13 - Type Mismatch. It points to this line.

Please Login or Register  to view this content.

In the instructions to use this VBA it says you need to define a range in your excel book and name it epsilon. I'm not entirely sure I've done that the correct way. Maybe that is what is giving me this error? How does VBA want you to define a range anyway?

Originally Posted by rorya

It needs to be a one cell range with a number in it - is it?

Currently it is not. I am working from the assumption that epsilon is the target number for the macro, I want to reduce my data to 1000, so I tried creating a range that spans a 1000 cells. Probably not the way to do it eh?

Hi again,

You don't need to define a named range using VBA - you can do it, but it's probably a bit easier to do it in "native" Excel.

On the Ribbon, click on FORMULAS >> Name Manager, and specify the name ("epsilon") of the range, and the range of cells to which you want that name to be applied.

Hope this helps.

Regards,

Greg M

If "epsilon" is declared as a Range, the "Type Mismatch" error you indicated can be avoided by using:

Please Login or Register  to view this content.

Regards,

Greg M

Originally Posted by Greg M

Hi again,

You don't need to define a named range using VBA - you can do it, but it's probably a bit easier to do it in "native" Excel.

On the Ribbon, click on FORMULAS >> Name Manager, and specify the name ("epsilon") of the range, and the range of cells to which you want that name to be applied.

Hope this helps.

Regards,

Greg M

That solved it. Now it runs as intended. Thank you so much!!

Hi again,

Many thanks for all of your feedback.

You're welcome - glad I was able to help.

Regards,

Greg M