Vraag : Het combineren van Vba- Verklaring

Is er een manier om lijn 2 en 3 te combineren?  Met een bepaalde bedoeling selecteert het niet het Mfl- blad en schrapt verkeerde.  Ook is er een manier om te schrappen het of het of niet een verborgen blad is? />Please

" codeBody "
1:
2:
3:
4:
" notpretty "
Application.DisplayAlerts = Vals
Bladen („MFL“). Selecteer
ActiveWindow.SelectedSheets.Delete
Application.DisplayAlerts = Waar

Antwoord : Het combineren van Vba- Verklaring

voor verborgen blad, kunt u controleren indien het verborgen blad, dan het zichtbaar maakt alvorens u schrapt.

als Bladen („MFL“). Zichtbaar = vals toen
   Bladen („MFL“). Zichtbaar = waar
    Bladen („MFL“). Selecteer
    ActiveWindow.SelectedSheets.Delete
anders
 Bladen („MFL“). Selecteer
    ActiveWindow.SelectedSheets.Delete
beëindig als
Andere oplossingen  
 
programming4us programming4us