Macro en excel

[serllic]

Hola a todos.
Necesito macro que pueda hace lo siguiente:
Si x < 7 = entonces x = 0
si x >= 7.1 y <= 10 entonces x - 7 * 1% /12

Espero me puedan ayudar y de antemano mil gracias.

 

[wenner]

Hola,

Quizás te refieres a esto:

<i>
</i>    If x < 7 Then x = 0
    If x >= 7.1 And x <= 10 Then x = -7 * 0.01 / 12

 

[serllic]

Hola Wenner muchas gracias por atender mi solicitud.
Esto es lo que quiero que haga la macro.

Option Explicit
Public Function ir_salarios(ByVal Numero As Double)
Dim IR As String

IR = Numero *...

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í

 

[Adrian]

Hola, no entiendo mucho lo que se piede, peor lo que puedo acotar es que IR esta decalrado como string y luego se quiere hacer una operación matemática. Otro punto, es una función lo que se esta...

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í

 

[serllic]

Hola, no entiendo mucho lo que se piede, peor lo que puedo acotar es que IR esta decalrado como string y luego se quiere hacer una operación matemática. Otro punto, es una función...

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í

 

[elcibernauta08]

Hola Sercill eh ingresado la otra validacion que solicitabas

Function ir_salarios(ByVal Numero) As Double
If Numero >= 75001 And Numero <= 100000 Then
    ir_salarios = (Numero - 75000) *...

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í

 

[Adrian]

Hola, te brindo una mini ayuda:

Function Ir_Salarios(Numero)
Dim Respuesta
Respuesta = Numero
If Respuesta >= 75001 And Respuesta <= 100000 Then
Respuesta = (Numero - 75000) * 0.1 / 12...

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í

 

[serllic]

Hola, te brindo una mini ayuda:

Function Ir_Salarios(Numero)
Dim Respuesta
Respuesta = Numero
If Respuesta >= 75001 And Respuesta <= 100000 Then
Respuesta = (Numero - 75000)...

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í