Problème avec variable

[erics83]

Bonjour,

J'ai un fichier : en A des noms, en B des dates, en C le nom d'une activité

J'essaye de mettre en mémoire (pour ré-utilisation plus tard dans un diagramme Gantt) les informations.
J'ai fait

dim ident (50,100) ' nbr de noms,  , Nbr de dates

for i = 2 to 10000
ident(cells(i,1).value,cells(i,2).value)=cells(i,3)
next

Mais le code bloque car (je pense) on arrive pas à mettre une valeur alphanumérique (ici les noms) dans le tableau....
je pense que c'est tout simple, mais....pas trouvé....

Merci pour votre aide et/ou pistes

 

[Staple1600]

Bonjour le fil, le forum

@erics83

J'ai un fichier

Et nous on a que dalle!

Pas même l'ombre de la queue d'un petit fichier exemple fourni par tes soins

 

[Theze]

Bonjour,

Ce serait plutôt ça que tu veux faire ?

Sub Test()

    Dim ident(1 To 3, 1 To 100)
   
    For i = 2 To 101
   
        ident(1, i) = Cells(i, 1).Value
        ident(2, i) = Cells(i, 2).Value
        ident(3, i) = Cells(i, 3).Value
       
    Next
   
End Sub

 

[erics83]

Merci Staple1600,

Effectivement avec un fichier test, c'est mieux....glups....sorry...

Merci Theze,
En fait, je pensais passer par un tableau, car ensuite, comme indiqué, je souhaite mettre tout ça sous forme de Gantt : en ligne 1 les dates et ensuite ligne 3 (le nom1), ligne 5(le nom2), etc... et ensuite écrire et/ou mettre en couleur la cellule (pour l"instant, je l'ai fait avec un sommeprod (cf Feuil2), mais je pense qu'il y a plus rapide, d'où cette idée de passer par un tableau

 

[Staple1600]

Re,

Pourquoi ne pas envisager d'utiliser un TCD?

 

[erics83]

Merci Staple1600,

Effectivement mon fichier test pourrait le suggérer, mais c'est un classeur test....j'ai de nombreuses colonnes et je souhaitais voir comment utiliser et/ou ré-utiliser les données (cf diagramme de Gantt), d'où l'idée de passer par des tableaux....

Merci pour ton aide,