Copiar un Sub - procedimiento - de una hoja a otra
publicado
Hola:
Tengo un libro con una hoja “base”, que tiene un combobox ( le cargo los nros del 1 al 12).
Hice un Sub del combobox1_click() para que al seleccionar un nro. me lleve a la hoja que seleccioné.
Ej seleccioné el 1 me lleva a la hoja “1”
Private Sub ComboBox1_Click()
Sheets(ComboBox1.Value).Select
End sub
Necesito copiar esta hoja “base” y pegar en nueva hoja ej. La hoja “1” (esto lo tengo resuelto) Pero además que me copie también la macro que tiene la hoja “base”
Se puede hacer?
O también se me ocurrió poner el sub en un módulo como public (pero no me funcionó)
Agradezco si alguien puede ayudarme..
Gracias!!!
Featured Replies
Archivado
Este tema está ahora archivado y está cerrado a más respuestas.
Hola:
Tengo un libro con una hoja “base”, que tiene un combobox ( le cargo los nros del 1 al 12).
Hice un Sub del combobox1_click() para que al seleccionar un nro. me lleve a la hoja que seleccioné.
Ej seleccioné el 1 me lleva a la hoja “1”
Private Sub ComboBox1_Click()
Sheets(ComboBox1.Value).Select
End sub
Necesito copiar esta hoja “base” y pegar en nueva hoja ej. La hoja “1” (esto lo tengo resuelto) Pero además que me copie también la macro que tiene la hoja “base”
Se puede hacer?
O también se me ocurrió poner el sub en un módulo como public (pero no me funcionó)
Agradezco si alguien puede ayudarme..
Gracias!!!