Hola.. lo que pasa es que te está marcando un error de desbordamiento.. es decir... estas usando una funcion que recibe un doble y regresa un doble....
en tu caso... estás usando
Math.Floor que recibe un doble... que en tu operacion es correcta.. pero le estás diciendo que te lo convierta despues a Entero.. cosa que no es correcta y marca un OverFlow.
Mas bien tu opearacion sería:
iNumPW =
CDbl(Math.Floor(CDbl((Ancho - (SepLateral * 2)) / pAncho)))
Saludos y suerte...
