J
john.9.williams
Hi,
I have a simple program that scrolls through a row collecting numbers,
at various points in the row i am trying to calulate a percentage.
i keep getting an error with the below code, (not very advanced)
Range("f9").Select
Do Until ActiveCell = ""
Selection.Offset(0, 1).Select
volume = ActiveCell
Selection.Offset(0, 1).Select
comp = ActiveCell
Selection.Offset(0, 1).Select
compercent = comp / volume * 100 (this is where it debugs to giving
me an overflow error)
activecell = compercent
I have tried declaring my variables as integers and long still no joy
any help would be great
John
I have a simple program that scrolls through a row collecting numbers,
at various points in the row i am trying to calulate a percentage.
i keep getting an error with the below code, (not very advanced)
Range("f9").Select
Do Until ActiveCell = ""
Selection.Offset(0, 1).Select
volume = ActiveCell
Selection.Offset(0, 1).Select
comp = ActiveCell
Selection.Offset(0, 1).Select
compercent = comp / volume * 100 (this is where it debugs to giving
me an overflow error)
activecell = compercent
I have tried declaring my variables as integers and long still no joy
any help would be great
John