Cartelle di lavoro | Fogli di lavoro | Vettore
Il 'pedice fuori portata' errore in Excel VBA si verifica quando si fa riferimento a un membro della raccolta inesistente o a un elemento di matrice inesistente.
Posiziona un pulsante di comando sul foglio di lavoro e aggiungi le righe di codice di seguito. Per eseguire le righe di codice, fare clic sul pulsante di comando sul foglio.
cartelle di lavoro
La raccolta Workbooks in Excel VBA contiene tutti gli oggetti Workbook attualmente aperti.
1. La riga di codice sottostante chiude sales.xlsm.
Cartelle di lavoro("sales.xlsm").Chiudi
Risultato quando non è presente alcuna cartella di lavoro aperta con questo nome:
Nota: per correggere questo errore di "indice fuori intervallo" (errore di runtime 9), aprire sales.xlsm prima di fare clic sul pulsante di comando.
Fogli di lavoro
La raccolta Worksheets in Excel VBA contiene tutti gli oggetti Worksheet in una cartella di lavoro. La nostra cartella di lavoro ha 3 fogli di lavoro.
1. La riga di codice seguente tenta di inserire la parola Hello nella cella A1 nel foglio di lavoro 4th.
Fogli di lavoro(4).Range("A1").Value = "Hello"
Risultato quando si fa clic sul pulsante di comando sul foglio:
Spiegazione: viene visualizzato l'errore "pedice fuori intervallo" perché non esiste un quarto foglio di lavoro. Per correggere questo errore, cambia il 4 in 1, 2 o 3 (o inserisci un nuovo foglio di lavoro facendo clic sul segno più).
Vettore
Un array è un gruppo di variabili. In Excel VBA è possibile fare riferimento a una variabile specifica (elemento) di una matrice utilizzando il nome della matrice e il numero di indice.
1. La prima riga di codice seguente dichiara un array di stringhe con il nome Films. L'array è composto da cinque elementi.
2. Successivamente, inizializziamo ogni elemento dell'array.
3. La riga di codice finale tenta di visualizzare il sesto elemento utilizzando un MsgBox.
Dim Film (da 1 a 5) come stringa
Film (1) = "Il Signore degli Anelli"
Film(2) = "Velocità"
Film (3) = "Guerre stellari"
Film(4) = "Il Padrino"
Film(5) = "Pulp Fiction"
MsgBox Film(6)
Risultato quando si fa clic sul pulsante di comando sul foglio:
Spiegazione: viene visualizzato l'errore 'pedice fuori intervallo' perché non esiste un sesto elemento. Per correggere questo errore, cambia il 6 in 1, 2, 3, 4 o 5 (o dichiara un array di stringhe con 6 elementi).
