Discussion :

[chou2best]

Bonjour,

j'ai un petit problème avec ma macro qui donc ne fonctionne pas. En fait, dans ma colonne I j'ai soit la valeur "Y" ou "N" et en face de chaque valeur j'ai une action ("BNP.PA" etc) en colonne H. Ce que je tente faire c'est que mon tableau "stocksToImport" stock le nom de l'action en fonction de si j'ai ou pas la valeur "Y" correspondante dans la colonne I.

Le problème de mon code est que: supposant que la première action identifiée par 'Y' soit la cinquième de ma liste.
L'instruction StocksToImport(j)=worksheets("p").cells(i+2,9).value va renseigner le cinquième élément de mon tableau. Les 4 premiers resteront vides. Or je veux que peut import le rang, le nom des action soit stocké à la suite dans mon tableau stockToImport en commençant par le début.

Merci d'avance pour votre aide.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
If AllOrSpecified = 1 Then
Dim j As Integer
 
For i = 1 To nb_stocks
    For j = 1 To nb_stocks
 If Worksheets("p").Range("I" & i + 2).Value = "N" Then s = Worksheets("p").Range("H" & i + 2).Value Else GoTo next_i
 
  If Worksheets("p").Range("I" & i + 2).Value = "Y" Then s = Worksheets("p").Range("H" & i + 2).Value
 
         stocksToImport(j) = s
 
next_i:
   Next i    
         Next j
 
 
End If

[Marc-L]

Bonjour,

cela devrait être simple en utilisant un filtre avancé …



______________________________________________________________________________________________________
Je suis Charlie, Bardo, Sousse

[chou2best]

Merci pour votre réponse mais en fait je dois absolument faire en sorte que "stockToImport" (qui n'est pas à proprement parlé un tableau figurant dans une feuille excel) mais un tableau "variable" que me permettra d'utiliser son contenu dans une autre procédure. J'ai besoin que le tableau se remplisse depuis le début parce que j'utilise un Redim Preserve pour ne conserver que les éléments du tableau contenant une valeur. Or si le tableau sur rempli en fonction du rang i Redim Préserve ne fonctionnera pas.

[Marc-L]

Un filtre avancé est bien plus simple !

[chou2best]

Exactement ça....rooo je suis déçu de moi-même :-( C'est dépitant de voir que la réponse était si simple. Bref, en tout cas merci et désolé d'avoir insisté ;-)