Hola, tengo una planilla para cargar datos sobre ingresos y egresos, estos datos se guardan con una macro y se cargan en otra hoja.
Las opciones al completar en la planilla son "Ingresos en efectivo", "ingresos por transferencia" y "egresos", el problema es que no quiero que la macro funcione cuando la opción que se elija sea "ingresos por transferencia" ya que la hoja donde se cargan los datos corresponde a una caja real en efectivo (la opción de "ingresos por transferencia" esta por otro motivo).

La macro utilizada es así:

If movimiento = "Ingresos en efectivo" Then
Sheets("caja H").Cells.Range("d5") = importe
Else
Sheets("caja H").Cells.Range("e5") = importe

 

Finalizando, necesitaría ayuda para omitir el funcionamiento de una macro según la opción elegida (en este caso, "ingresos por transferencia") y también ponerle un msjbox de porque no funciona.

 

Desde ya, muchas gracias. Saludos!

@Mariela Lopez solo debes poner un condicional con una salida de la macro:
 

If movimiento = "ingresos por transferencia" Then
	MsgBox "No funciona por lo que sea..."
	End Sub
End If

 

Hola José, lo he probado y no funciona, quizás tenga mal algún paso anterior. Adjunto la macro.

Hace 3 horas, Haplox dijo:

@Mariela Lopez solo debes poner un condicional con una salida de la macro:
 

If movimiento = "ingresos por transferencia" Then
	MsgBox "No funciona por lo que sea..."
	End Sub
End If

 

 

Hace 46 minutos , Mariela Lopez dijo:

Hola José, lo he probado y no funciona, quizás tenga mal algún paso anterior. Adjunto la macro.

 

 

Hace 46 minutos , Mariela Lopez dijo:

Hola José, lo he probado y no funciona, quizás tenga mal algún paso anterior. Adjunto la macro.

 

@Haplox

Hola.

Elimina el End Sub subrayado.

 

Saludos.

Hace 32 minutos , Toldeman dijo:

Hola.

Elimina el End Sub subrayado.

 

Saludos.

En lugar de suprimirlo yo lo cambiaría por Exit Sub. 

Un abrazo Juan. ?

Hace 2 horas, Antoni dijo:

En lugar de suprimirlo yo lo cambiaría por Exit Sub.

Eso pasa por contestar con prisa. Es exactamente lo que dice @Antoni

Hace 13 horas, Haplox dijo:

Eso pasa por contestar con prisa. Es exactamente lo que dice @Antoni

Animo amigo que esto ya está. ¡Quedate en casa!

 

Hace 28 minutos , Antoni dijo:

Animo amigo que esto ya está. ¡Quedate en casa!

A partir de esta semana por narices... . Hasta ahora media semana en teletrabajo y media en fábrica. Y sogo vivo!!!

Hola @Haplox, @Antoni, @Toldeman. Gracias por su aporte, he probado con eliminar el End Sub o colocando Exit Sub pero la macro sigue funcionando normalmente.?

Sube tu archivo y seguro que tendrás una solución.