Creación de hoja a partri de inscripción en una celda.

02/10/2006 - 12:23 por sercontri | Informe spam
Me gustaría saber de que manera, supongo que por SQL, podria hacer
para que cuando yo hiciera un registro en una celda de una hoja a modo
"índice" con el texto pj: 11000 se me creara una hoja nueva que se
llamara así, 11000 con la primera fila con titulos, y que la celda en
la hoja a modo índice se hiciera un hipervinculo de esta hoja creada.
Ya se que se ve raro pero me haria mundo.

Gracias por vuestros conocimientos.
 

Leer las respuestas

#1 Héctor Miguel
03/10/2006 - 03:48 | Informe spam
hola, ?

... de que manera... cuando yo hiciera un registro en una celda de una hoja a modo "índice" con el texto pj: 11000
se me creara una hoja nueva que se llamara asi, 11000 con la primera fila con titulos
y que la celda en la hoja a modo indice se hiciera un hipervinculo de esta hoja creada...



-> suponiendo que 'esa' celda pudiera ser cualquiera de la columna 'A' y a partir de la fila 2
y que en la nueva hoja los titulos en la fila 1 serian las columnas 'A:D' ???

[seguramente habra que hacer otras consideraciones segun expongas datos adicionales] :)
[por lo pronto]... prueba copiando las siguientes lineas... y

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

en el modulo de codigo de 'esa' hoja ==Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column > 1 Then Exit Sub
If Target.Row = 1 Then Exit Sub
If Target.Count > 1 Then Exit Sub
If IsEmpty(Target) Then Exit Sub
Application.ScreenUpdating = False
With Worksheets.Add
.Name = Target
.Range("a1:d1") = Array("Titulo 1", "Titulo 2", "Titulo 3", "Titulo 4")
End With
Me.Activate
Application.EnableEvents = False
Target.Hyperlinks.Add Target, "", Target & "!a1"
Application.EnableEvents = True
End Sub

Preguntas similares