Celdas en Excel con un Mensaje mediante Msgbox

"ARamirez" escribió en el mensaje news:%
Mostrar la cita

Saludo listeros,

me gustaria conocer algún código para que al seleccionar
una determinada celda (s) estan alerten al usuario mediante
un msgbox que dicha celda no se debe modificar.
No quiero protegerla, solo un pequeño mensaje de advertencia.

Gracias de antemano por las sugerencias

Una posibilidad, y sin necesidad de código VBA, es usar una validación para la celda (Datos->Validación), permitiendo 'Cualquier valor' y poniendo en 'Mensaje entrante' el mensaje que quieras que aparezca cuando se seleccione la celda.
Un saludo.


Fernando Arroyo
MS MVP - Excel

El problema con la validación sería que el mensaje no sería un message box
sería como un comentario de excel, solo saldría un message box en dado caso
de que no cumplieran la validación.

En VBA sería:
Sub validacion()
if Range("A1").Select Then
msgbox("No modifiques esta celda")
Endif
End Sub

Espero te sea de utilidad

Oscar Aceves
"ARamirez" escribió en el mensaje
news:#
Mostrar la cita

Saludo listeros,

me gustaria conocer algún código para que al seleccionar
una determinada celda (s) estan alerten al usuario mediante
un msgbox que dicha celda no se debe modificar.
No quiero protegerla, solo un pequeño mensaje de advertencia.

Gracias de antemano por las sugerencias

Hola chicos,

"Oscar" wrote in message...
Mostrar la cita

En VBA sería:
Sub validacion()
if Range("A1").Select Then
msgbox("No modifiques esta celda")
Endif
End Sub

Oscar, te sugiero q pruebes tu macro - creo q no hace lo que se busca.

"ARamirez" wrote in message...
Mostrar la cita

Mostrar la cita

me gustaria conocer algún código para que al seleccionar
una determinada celda (s) estan alerten al usuario mediante
un msgbox que dicha celda no se debe modificar.

ARamirez,

Prueba poner el siguiiente codigo en el modulo VBA de la hoja en cuestion.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(ActiveCell, Range("A1")) Is Nothing Then _
MsgBox ("No modifiques esta celda")
End Sub

Saludos,
KL

"Oscar" escribió en el mensaje news:
Mostrar la cita

El problema con la validación sería que el mensaje no sería un message box
sería como un comentario de excel, solo saldría un message box en dado caso
de que no cumplieran la validación.

No. El 'Mensaje entrante' de las validaciones aparece siempre que se selecciona la celda que tiene la validación, y tiene la obvia ventaja de que no necesita código VBA, así como la menos obvia (pero no menos interesante) de que no "congela" la "navegación" por la hoja como haría un MsgBox.
Un saludo.


Fernando Arroyo
MS MVP - Excel


Mostrar la cita

En VBA sería:
Sub validacion()
if Range("A1").Select Then
msgbox("No modifiques esta celda")
Endif
End Sub

Espero te sea de utilidad

Oscar Aceves
"ARamirez" escribió en el mensaje
news:#
> Saludo listeros,
>
> me gustaria conocer algún código para que al seleccionar
> una determinada celda (s) estan alerten al usuario mediante
> un msgbox que dicha celda no se debe modificar.
> No quiero protegerla, solo un pequeño mensaje de advertencia.
>
> Gracias de antemano por las sugerencias
>
>
>
>

gracias a todos. A KL, a Fernando Arroyo, a Oscar.

las tres alternativas que me plantearon se ajustan a lo que deseaba.

Mil gracias nuevamente.