Cahiers d'exercices | Feuilles de travail | Déployer
Le 'indice hors limites' erreur dans Excel VBA se produit lorsque vous faites référence à un membre de collection inexistant ou à un élément de tableau inexistant.
Placez un bouton de commande sur votre feuille de calcul et ajoutez les lignes de code ci-dessous. Pour exécuter les lignes de code, cliquez sur le bouton de commande sur la feuille.
Cahiers d'exercices
La collection Workbooks dans Excel VBA contient tous les objets Workbook actuellement ouverts.
1. La ligne de code ci-dessous ferme sales.xlsm.
Classeurs("ventes.xlsm").Fermer
Résultat lorsqu'il n'y a pas de classeur ouvert avec ce nom :
Remarque : pour corriger cette erreur « indice hors plage » (erreur d'exécution 9), ouvrez sales.xlsm avant de cliquer sur le bouton de commande.
Des feuilles de calcul
La collection Worksheets dans Excel VBA contient tous les objets Worksheet dans un classeur. Notre classeur contient 3 feuilles de travail.
1. La ligne de code ci-dessous essaie de placer le mot Hello dans la cellule A1 de la 4e feuille de calcul.
Feuilles de calcul(4).Range("A1").Value = "Bonjour"
Résultat lorsque vous cliquez sur le bouton de commande sur la feuille :
Explication : l'erreur « indice hors plage » apparaît car il n'y a pas de 4e feuille de calcul. Pour corriger cette erreur, remplacez le 4 par 1, 2 ou 3 (ou insérez une nouvelle feuille de calcul en cliquant sur le signe plus).
Déployer
Un tableau est un groupe de variables. Dans Excel VBA, vous pouvez faire référence à une variable spécifique (élément) d'un tableau en utilisant le nom du tableau et le numéro d'index.
1. La première ligne de code ci-dessous déclare un tableau String avec le nom Films. Le tableau se compose de cinq éléments.
2. Ensuite, nous initialisons chaque élément du tableau.
3. La dernière ligne de code essaie d'afficher le 6e élément à l'aide d'un MsgBox.
Dim Films (1 à 5) en tant que chaîne
Films(1) = "Le Seigneur des Anneaux"
Films(2) = "Vitesse"
Films(3) = "La Guerre des étoiles"
Films(4) = "Le Parrain"
Films(5) = "Pulp Fiction"
Films MsgBox(6)
Résultat lorsque vous cliquez sur le bouton de commande sur la feuille :
Explication : l'erreur 'indice hors limites' apparaît car il n'y a pas de 6ème élément. Pour corriger cette erreur, remplacez le 6 par 1, 2, 3, 4 ou 5 (ou déclarez un tableau String avec 6 éléments).
