Celda que identifique un texto en especifico y salga un imputbox

Preguntas y respuestas relacionadas

¿Cómo puedo hacer una conversión en ambos sentidos (€/$-$/€)?

Necesito realizar una tabla en la que se utilizan varias monedas, actualmente € y $, aunque en un futuro podría haber más. Mi duda es si existe alguna forma de que se haga la conversión de una moneda a otra, independientemente de la moneda en que...
1 respuesta

Como hacer para mostrar mensaje de advertencia

Tengo una hoja de 5 columnas con 600 datos en cada columna, entonces lo que necesito es que si en cualquier celda de la columna 5 (E) aparece el dato de texto que contenga la palabra "rampa", siempre me muestre en mensaje de advertencia (msgbox). Los...
1 respuesta

Ejecutar una macro dependiendo de otra macro?

Tengo una pequeña duda... Tengo dos botones con macros uno de ellos dice IMPRIMIR y otro dice REPARTO.. Lo que quiero es que no se pueda ejecutar el botón REPARTO si no se ha impreso nada osea si no le han dado clic al botón IMPRIMIR... En el botón...
3 respuestas

Bloquear celdas a través de fórmula

Necesito bloquear una celda desde una fórmula, es decir si el valor de la celda A1 es 0, quisiera que el usuario no pudiese digitar en la celda B1; pero si el valor es 1, debe digitar un valor o en su defecto colocar un texto.
1 respuesta

Me gustaría simplificar esta macro

Esta es la macro: Sub BorrarMiaSeleccion() Call BorrarDesbloqueadas Call Borrar1 Call finalizar_las_macros_así End Sub Y esto depende de : Sub BorrarDesbloqueadas() ActiveSheet.Protect Password:="1" Dim r As Range For Each r In Selection If r.Locked...
1 respuesta

Ocultar hojas dependiendo contenido de una celda

Necesito un crear un macro que dependiendo del contenido de una celda me muestre una hoja y me oculte dos con nombres especificados. Ejemplo. Si el contenido de la celda BM 16 es “TODOS”, me muestre la hoja llamada “TODOS” y me ocultes las hojas...
1 respuesta

Macro de mayúsculas, con un problema

Tengo esta macro para todo mayúsculas: Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range(" A12:A41,C12:C41")) Is Nothing Then Target.Value = AMayusculas(Target.Value) End If End Sub Y en un modulo: Public Function...
2 respuestas

Código para pasar de una celda a otra con un ENTER o retroceder a la celda anterior con TAB

Ok, como dice la pregunta en el encabezado esto es lo que tengo... Estas son las celdas de captura (B1, C2, D3) ejemplo: .........A................B.............C................D...... 1 NOMBRE:...LUIS 2 ... COLOR:...ROJO 3 ... ... PUNTOS:...78 Lo...
1 respuesta

Como utilizar dos macros que empiezan con Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Quiero integrar dos macros que realizan una funcion cada una pero el asunto es que las dos deben funcionar el la misma hoja y empiezan con Private Sub Worksheet_SelectionChange(ByVal Target As Range) y a la hora de ejecutar las dos marcan error. ¿Qué...
2 respuestas

Ir a hoja al haber ejecutado una macros previamente

Tengo esta macro en un botón el cual guarda información: If estado <> 1 Then MsgBox "NO SE HA IMPRESO LA NOTA", vbOKOnly + vbExclamation, "NO SE PUEDE PROCEDER" Exit Sub End If 'vuelvo a colocar en 0 la variable para futuras ejecucuiones estado = 0...
2 respuestas
¿No es la pregunta que estabas buscando?
Puedes explorar otras preguntas de los temas