Javier Vigo

He intentado lo siguiente a partir de tu 2ª opción: Sub ListaHojas() 'x Elsamatilde 'arma lista de hojas excluyendo algunas x = 10 For Each sh In Sheets If sh.Name = "LISTAS" Or sh.Name = "PLAN PLAZA" Or sh.Name = "CONTACTOS" Or sh.Name =...