Excel - Macros condicional

   
Vista:

Macros condicional

Publicado por David (14 intervenciones) el 19/11/2014 01:33:31
Saludos amigos de la comunidad

Estoy desarrollando una macro que compare 3 cantidades, por ejemplo:

SI 2.5 <= 3 entonces

por lo tanto, estoy trabajando con unos vectores que tienen los valores, por ejemplo:
VECTOR1(1)= 2,5
VECTOR2(1)= "<="
VECTOR3(1)= 3

He tratado de expresarlo de la sgte madera pero nome reconoce el valor decimal, ni siquiera cambiandolo a punto (.)

If Excel.Evaluate(VECTOR1(1) & VECTOR2(1) & VECTOR3(1)) Then

Saben algunas forma de expresarlo de otra manera? o de solucionar el problema?

Les agradezco mucho su ayuda
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
información
Otras secciones de LWP con contenido de Excel
- Código fuente de Excel
- Cursos de Excel
- Temas de Excel
- Chat de Excel
información
Códigos de Excel
- CARDEX
- Liquidacion de Sueldo
- Resolución de sudoku
Imágen de perfil de JuanC

Macros condicional

Publicado por JuanC juanc2942@gmail.com (1052 intervenciones) el 19/11/2014 15:46:26
parece que nadie responde...
probá con algo así:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Option Explicit
Option Base 1
 
Sub asa()
Dim vector1(1), vector2(1), vector3(1)
Dim s$
vector1(1) = 2.5
vector2(1) = "<="
vector3(1) = 3
s = VBA.Replace(vector1(1), ",", ".") & vector2(1) & vector3(1)
If Excel.Evaluate(s) Then
   MsgBox 1
End If
End Sub

Saludos, desde Baires, JuanC
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar