Matriz Fuera de intervalo

[cristian_fg]

Hola ComprasDesdeCasa... gracias por responder.

Mira lo solucione de esta forma:

Código:

    paso5_d2 = Format(paso5_d2, "##,##0.00"
    
    Dim paso5_5_d2() As String   

    paso5_5_d2 = Split(paso5_d2, ".")
    
    If Val(paso5_d2) - Int(Val(paso5_d2)) <> 0 Then
        paso5_5_d2 = Split(paso5_d2, ".")
    
    Else
        ReDim paso5_5_d2(0 To 1)
        paso5_5_d2(0) = Str(Int(paso5_d2))
        paso5_5_d2(1) = "0"
    End If