Bienvenido a la mayor comunidad de usuarios EXCEL

Regístrate gratis ahora para ver contenidos y descargas sin restricciones!

Regístrate gratis

Excluir una hoja del procesamiento de una Macro

Diego Barajas

New member
Registrado
21 Ago 2021
Mensajes
1
Buenas tardes a todos.

Estoy utilizando el siguiente código para unir las hojas de un libro que tienen la misma estructura, funciona a la perfección, pero ahora necesito que unifique todas las...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes
iniciar sesión aquí
 
Solución
Código:
Sub ExcluirHoja()
Dim Hoja As Worksheet, h As Integer
Application.DisplayAlerts = False
For h = Sheets.Count To 2 Step -1
   If Sheets(h).Name <> "Hoja a excluir" Then '<- Nombre de la hoja a excluir
      Sheets(h).UsedRange.Copy Sheets(1).Range("A" & Rows.Count).End(xlUp).Offset(1)
      Sheets(h).Delete
   End If
Next
Application.DisplayAlerts = True
End Sub


Por cierto Leopoldo, tu macro no funciona, la variable hHojas no existe y en el bucle de eliminación de hojas, también eliminas la hoja a excluir del proceso.
Código:
Sub ExcluirHoja_LBV()
Dim hHoja As Worksheet, Sig As Byte
    Application.DisplayAlerts = False
    For Each hHoja In Worksheets
        If hHoja.Name <> "Hoja1" Then...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes
iniciar sesión aquí
 
Última edición:
Código:
Sub ExcluirHoja()
Dim Hoja As Worksheet, h As Integer
Application.DisplayAlerts = False
For h = Sheets.Count To 2 Step -1
   If Sheets(h).Name <> "Hoja a excluir" Then '<- Nombre de la...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes
iniciar sesión aquí
 
Volver
Arriba