heroi112

Caros, Estou fazendo uma macro em excel para trabalhar com endereços IP. O problema é que em determinado ponto preciso fazer um bit mask usando um "And" lógico e o excel não permite pois ocorre overflow... a linha de código é a seguinte: IPmasked = IPmasked + (IP + Hexmask) E aqui a seção inteira Dim IP2 As Double Dim IPmasked As Double Dim Hexmask As Double Set IP2Add = Parse_String(IP2Cell.Text) IPmasked = 0 Hexmask = 2147483648# For counter = 1 To IP2Add.mask - 1 IPmasked = IPmasked + (IP + Hexmask) 'Problema esta aqui, não existe como fazer o and logico sem dar erro de overflow Hexmask = Hexmask / 2 Next Obrigado por qualquer ajuda.....qualquer coisa do vba do excel que ajudasse a converter decimal para binario em uma string tambem ajuda.