wenner hay manera de agregar for?

[mobiniak]

con respecto a tu ayuda con:
Sub MenorDiferencia()
Dim RangoDatos As Range
Dim ValorObjetivo As Double

Set RangoDatos = Range("A2:A5")

ValorObjetivo = Evaluate("=INDEX("...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[wenner]

El acceso al editor vba tiene contraseña.

 

[mobiniak]

PERDON ESTE ES EL BUENO

 

[wenner]

No entiendo lo que quieres hacer, quizás algo así ?:

<i>
</i>    Dim RangoDatos As Range
    Dim ValorObjetivo As Double
    Dim MatrizObjetivos
    Dim n As Long
    
    MatrizObjetivos =...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[wenner]

El código anterior pone el valor más cercano (del rango I2:I13) en la celda que está a la derecha.

 

[mobiniak]

creo que no se explicar, perdon y te agradezco mucho tu tiempo eres muy bueno con toda esa sintaxis tan compleja, te explico lo mejor que puedo en el archivo espero me ayudes , saludos,,,,,,,

 

[wenner]

Si te entendido bien, creo que no es necesario macros. Revisa el adjunto, lo he hecho con fórmulas interpolando.

 

[mobiniak]

gracias, te agradezco tu tiempo