Prise en compte des en-têtes dans mon tableau

Bonjour

J'ai fais une macro me permettant de récupérer toutes les valeurs contenues dans les cellules.

Il fonctionne mais là ou je ne comprends pas c'est pourquoi il prend en compte les en-têtes des colonnes, ce que je ne voudrais pas.

La récupération se fait à l'ouverture du classeur, la macro se trouve donc dans ThisWorkBook.

Ou est l'erreur ? Merci.

18classeur1.xlsm (70.96 Ko)

Bonsoir,

Cells prend comme premier argument le numéro de ligne, et pas celui de colonne.

Private Sub Workbook_Open()
Dim colonne, ligne As Integer
'Dim essai(0 To 11, 0 To 9) As Variant
Dim essai(1 To 12, 1 To 10) As Variant
For ligne = 2 To 13
    For colonne = 1 To 10
        essai(ligne - 1, colonne) = Cells(ligne, colonne).Value
    Next colonne
Next ligne
MsgBox essai(1, 4)
End Sub

Bonjour

Merci pour ta réponse qui répond bien à ce que je chercher.

Mais pourquoi essai(ligne - 1, colonne) ligne - 1, cela devrait ramener à la ligne 1 puisque ma boucle ligne démarrer à 2 ?

Autre chose, je voudrais via un userform choisir une fonction qui se trouve dans un combox, afficher toutes les plages qui correspondent au choix et surtout comment remplir ce combox ?

Merci

16classeur1.xlsm (62.01 Ko)

J'ai trouvé comment remplir ma ComboBox :

Private Sub Userform_Initialize()
With ComboBox1
.AddItem "Paris"
.AddItem "Fonction"
End With
End Sub

Bon maintenant il ne me reste plus comment faire pour récupérer cette valeur et surtout comment remplir mes champs en fonction de cette valeur. Mais progresse.

Bonjour,

Mais pourquoi essai(ligne - 1, colonne) ?

Ça dépend des indices de ton tableau, par défaut, le 1er élément est en position 0, mais tu peux en décider autrement (voir ligne de commentaire).

Bien, merci pour cette explication.

Rechercher des sujets similaires à "prise compte tetes mon tableau"