Discussion :

[Crimsim]

Bonjour,

Merci d'avance pour votre aide.

J'ai une matrice de taille (1 to 270 , 1 to 15). Elle est composée de données mais chaque colonne ne détient pas forcément le même nombre de données. Exemple colonne 1 j'ai 270 données, colonne 2 145, colonne 3 240 ainsi de suite. Quand il n'y a pas de donnée, c'est considéré comme vide.

Je souhaite déterminer pour chaque colonne le nombre de ligne qui contient des données.

Pouvez-vous me donner une ou plusieurs pistes de réflexion. J'ai pensé à Xldown ou à faire une boucle à l'aide de IsEmpty mais je ne vois pas comment l'appliquer à une matrice.

[Jean-Philippe André]

Salut,

sous quelle forme souhaiterais tu avoir ton resultat ?

un tableau d'entier ? une chaine de caracteres (concatenation) ?

[Crimsim]

Je souhaite avoir cette info pour chaque colonne à un instant t et pas forcément stocké.

Mon but étant d'appliquer à chaque colonne un calcul mais j'ai besoin de déterminer à quel moment je n'ai pas les données pour dire à ma macro de stopper et ne pas avoir "l'indice n'appartient pas à la sélection"

Exemple :

une matrice de taille (1 to 270 , 1 to 15).

J'ai une bloucle, i = 1 to 15 correspondant au nombres de colonne et x = 1 to 270 au nombre de lignes de ma matrice qui exécute un calcul

Sauf que dans ma première colonne, je dispose uniquement de 240 données et dans ce cas précis j'aimerais dire que SI on arrive à la dernière ligne de la colonne 1 la macro passe à la prochaine colonne ainsi de suite.

Merci Jean-Philippe André

[Jean-Philippe André]

Tu n'as pas exactement repondu a ma question, mais je me contenterai pour l'instant de cela.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
Dim i As Integer
For i=1 To 15
    msgbox "Colonne " & i & " " & Cells(270,i).End(xlup).Row
Next i

[Crimsim]

Désolé, je ne souhaite pas afficher le résultat trouvé mais juste avoir cette info à un instant T.

Un exemple de code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Dim PriceRange(1 to 270, 1 to 15), x As integrer, i As integrer, DlyRet (1 to 270, 1 to 15), N as integrer, V as integrer
 
'PriceRange() des données sont récupérées à partir d'un fichier ou autre source
 
N = UBound(PriceRange, 1) 'Nombre de lignes ici 270
V = UBound(PriceRange, 2) 'Nombre de colonne ici 15
 
For i = 2 To V
    For x = 2 To N           
        DlyRet(x, i) = Log(PriceRange(x, i) / PriceRange(x + 1, i))               
    Next x    
Next i

Dans la boucle, je souhaite déterminer à quel moment j'arrive à la dernière ligne en fonction de la colonne présente dans la matrice. Afin de ne pas avoir "l'indice n'appartient pas à la sélection" étant donné que pour chaque colonne je ne dispose pas du même nombre de données.

J'espère avoir été assez clair. Merci encore pour ton aide.

[joe.levrai]

Bonjour,

il s'agit aussi de savoir comment sont remplies tes deux tableaux

car si ça provient d'une plage, même des cellules vides génèrent un indice dans le tableau
si ça provient d'une saisie réalisée par une procédure, c'est dans celle-ci qu'il est préférable de collecter les bornes de chaque colonnes, en passer par une variable tableau publique ou en transmettant ceci au titre d'argument d'un nouveau paramètre à créer