UniversoExcelForo

Respuesta a consultas.
Fecha de creación: 09.Abril.2012

Fundadores: Wibly,Tyno,Servando,Sakkar,Rosendo2,RMaximo,Railar,Mcoronel,Ioyama,Igtelo,Hugotron,Drochar,Dedos,Alberto,Adolfo

No se pueden hacer consultas de Excel o VBA por mensaje privado.
Utiliza el botón buscar del foro y te ahorras tiempo para obtener "ayuda".

No estás conectado. Conéctate o registrate

Ver el tema anterior Ver el tema siguiente Ir abajo  Mensaje [Página 1 de 1.]

rubito1


hola gente del foro;solicito ayuda;necesito una macro que tome datos(nombres)de una columna y me los transforme en hojas(solapas);gracias
Archivos
convertir datos a hojas.xls
No tienes los permisos para descargar los archivos.
(32 KB)

tyno


Hola rubito.
En la Hoja1 crea un botón control activex he insertale este código:

Private Sub CommandButton1_Click()
On Error Resume Next
For a = 4 To Range("a10000").End(xlUp).Row
n_hoja = Cells(a, 1)
Sheets.Add After:=Sheets(Sheets.Count)
ActiveSheet.Name = n_hoja
Next a
End Sub


Saludos

3RESUELTO GENIAL el 10/03/14, 11:09 pm

rubito1


MARAVILLOSOOOOOOOOOOOO;esta genial;gracias de nuevo tyno!!!!!sos un capo total;sencillo y superefectivo el codigo

Ver el tema anterior Ver el tema siguiente Volver arriba  Mensaje [Página 1 de 1.]

Permisos de este foro:
No puedes responder a temas en este foro.