Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Macro Nombre de Hoja

28/06/2007 - 16:43 por Mario | Informe spam
Ayuda Hacer una pregunta
Tengo esta macro:

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

Su función es colocar en la pestaña de la hoja el nombre que tenga en
U3; pero debo correr la macro manualmente. Lo que quiero hacer es que
me la corra inmediatamente presione ENTER en la casilla U3.

Gracias,
email Siga el debateRespuesta 2 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 Anonimo
28/06/2007 - 17:28 | Informe spam
Hola, Mario, Utiliza esta rutina en ThisWorkbook, y me cuentas como te va:

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target <> [U3] Then Exit Sub
If [U3] <> "" Then
For Each Hoja In ThisWorkbook.Sheets
If [U3] = Hoja.Name Then Exit Sub
Next
Sh.Name = [U3]
End If
End Sub

Preguntas similares

 

Busqueda sugerida :