Crear Macro para Consolidar Varias Hojas en una Sola

En esta Video-Clase te mostrare como combinar datos de varias hojas de calculo en una sola Hoja para generar algún reporte de varias tablas en una sola tabla.
Código
------------------------------------------------------------------------------------------
Sub unionhojas()
ultimf = Range("B" & Cells.Rows.Count).End(xlUp).Row + 1
For hoja = 2 To Sheets.Count
Sheets(hoja).Select
ufh = Range("B" & Cells.Rows.Count).End(xlUp).Row
Range("B3:F" & ufh).Copy
Sheets("Reporte Anual").Select
ultimf = Range("B" & Cells.Rows.Count).End(xlUp).Row + 1
Range("B" & ultimf).PasteSpecial Paste:=xlPasteAll
Next hoja
MsgBox ("Finalizado")
End Sub
---------------------------------------------------------------------------------------------
═══════════════════════════════════
Si te gusta este vídeo y VOLUNTARIAMENTE quieres
hacerme una donación, puedes hacerlo
a mi cuenta de PayPal. ✅✅✅
www.paypal.com...
═══════════════════════════════════
Suscríbete a mi canal y comparte el contenido.
▶️ n9.cl/exceltra...
Pagina Facebook:
▶️ / evega.tuto
Sígueme en Facebook:
▶️ / tutoinformatica
════『🎬 Videos Que Te Pueden Interesar🎬 』════
▶️Unir Datos de dos o mas Archivos en un Solo Excel
▶️ • Unir Datos de dos o ma...
═══════════════════════════════════