Macro

"Mario" escribió en el mensaje

Tengo esta macro:

Sub Nombre_Hoja_Caja()
ActiveSheet.Name = Range("U3").Value
End Sub

Su funcion es colocarle el nombre a la pestaña de la hoja activa el
texto de la celda U3; pero debo correr la macro manualmente. Como
puedo hacer para q

Hola Mario,

No es necesario el empleo de macros,
Revisa esto: http://tinyurl.com/jzher

si de todas formas lo prefieres hacer con una macro, podrías colocar esa
rutina en el evento de la hoja
Worksheet_SelectionChange

un saludo,
Juan

Hola Mario,

Hoy debo tener mal día o he olvidado leer los mensajes antes de contestar.

Lo que buscas es algo parecido a esto;

Private Sub Worksheet_Change(ByVal Target As Range)
If Target = Range("U3") And Range("U3") <> "" Then
ActiveSheet.Name = Range("U3")
End If
End Sub

deberías ponerlo en cada le módulo de cada hoja.

Un saludo,
Juan

"Juan M" escribió

"Mario" escribió en el mensaje

Tengo esta macro:

Sub Nombre_Hoja_Caja()
ActiveSheet.Name = Range("U3").Value
End Sub

Su funcion es colocarle el nombre a la pestaña de la hoja activa el
texto de la celda U3; pero debo correr la macro manualmente. Como
puedo hacer para q

Hola Mario,

No es necesario el empleo de macros,
Revisa esto: http://tinyurl.com/jzher

si de todas formas lo prefieres hacer con una macro, podrías colocar esa
rutina en el evento de la hoja
Worksheet_SelectionChange

un saludo,
Juan