userform

13/09/2012 - 15:32 por palo | Informe spam
¡ Hola !
Gente necesito su ayuda, tengo un libro en el cual tengo a los clientes por lo tanto genere una macro que me crea hojas nuevas para cada cliente nuevo. hice un userform para cargar datos en las hojas de mi libro. se el codigo para que cada vez que habra la hoja me aparezca el userform,pero lo tengo que hacer individualmente a cada hoja.la pregunta es como hago para que al crear una hoja nueva automaticamente se le agregue el (userform) .
muchas gracias

Preguntas similare

Leer las respuestas

#1 dave
13/09/2012 - 17:57 | Informe spam
palo escribió el 13/09/2012 15:32 :
¡ Hola !
Gente necesito su ayuda, tengo un libro en el cual tengo a los clientes por lo
tanto genere una macro que me crea hojas nuevas para cada cliente nuevo. hice
un userform para cargar datos en las hojas de mi libro. se el codigo para que
cada vez que habra la hoja me aparezca el userform,pero lo tengo que hacer
individualmente a cada hoja.la pregunta es como hago para que al crear una hoja
nueva automaticamente se le agregue el (userform) .
muchas gracias


Quiero creer que la información que capturas en cada hoja es la misma, porque no utilizas un solo "UserForm" en el cual al ejecutarse se carguen todas tus hojas de tu libro en un "ComboBox" y tu seleccionas la hoja en la que quieras capturar tu información; te comparto un ejemplo como puedes hacer ésto. Espero sea la solución a tu problema.

Private Sub UserForm_Initialize()

Dim hoja As Worksheet

For Each hoja In Worksheets
ComboBox1.AddItem hoja.Name
Next hoja
End Sub

Y para que se active tu hoja seleccionada utiliza éste codigo.

Private Sub ComboBox1_Change()

MsgBox "La hoja seleccionada es : " & ComboBox1.Value, vbOKOnly, "Prueba"
hoja = ComboBox1.Value
Application.Worksheets(hoja).Activate
End Sub
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida