Selezione dinamica di più fogli

Stato
Chiusa ad ulteriori risposte.

giulianovac

Access/VBA Expert
Staff
9 Giugno 2018
4.027
145
Italy
2019
306
In genere, per selezionare più fogli contemporaneamente, è sufficiente usare l'istruzione:
Visual Basic:
Sheets(Array("Foglio 1", "Foglio 2", "Foglio 3", "Foglio 4")).Select
Ma può accadere che non sempre si sappia a priori quanti fogli abbiamo nel file Excel, o che il loro numero vari in modo voluto (aggiunta o eliminazione) per cui diventa impossibile usare l'istruzione sopra.
Però possiamo farlo in modo dinamico. così:
Visual Basic:
    Dim mArray() As String
    Dim i As Long
    Dim conta As Long
    For i = 1 To Sheets.Count
        If i = 1 Then
            ReDim mArray(1)
        Else
            ReDim Preserve mArray(conta)
        End If
        mArray(conta) = Sheets(i).Name
        conta = conta + 1
    Next i
    Sheets(mArray()).Select
Ciao e alla prossima. Saluto_saluto
 
Stato
Chiusa ad ulteriori risposte.

Sostieni ForumExcel

Aiutaci a sostenere le spese e a mantenere online la community attraverso una libera donazione!