Actividad pública reciente
Ha valorado "Excelente" la respuesta
Transportar registros de una tabla a otras hojas
h o l a: Te anexo la macro Sub copiar() 'Por.DAM Set h1 = Sheets("Hoja1") Set h2 = Sheets("Hoja2") Set h3 = Sheets("Hoja3") Set h4 = Sheets("Hoja4") A = "Manualidades" B = "Baile" C = "Teatro" j = 2 For i = 2 To h1.Range("D" &...
Hector Pacheco