Try this small user defined function:

Function IP_Bumper(r As Range) As String
n = Split(r.Value, ".")
n(UBound(n)) = n(UBound(n)) + 1
IP_Bumper = Join(n, ".")
End Function
--
Gary''s Student - gsnu200811


"calvin" wrote:

I have a ton (546) of ip address and i need to change just the last digit so
there wont be a conflic when i try connecting to the network

ex 10.191.168.223 to 10.191.168.224
10.14.129.10 to 10.14.129.11
and the list goes on an on
help please