Discussion :

[ninette24]

Salut à tous !!
Je suis de retour
Avec un petit souci avec une recherche V

En fait j'ai écrit une macro pour une recherche V et elle s'exécute pendant un moment et Excel plante lors de l'exécution parce que j'ai plus de 14000 lignes sur chacunes des feuilles !!!!

Donc la macro ne s'execute pas jusqu'au bout

Mon code est le suivant

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
18
19
20
21
22
 
Sub Recherche_v()
 
Dim i, j, k, s, Code
 
For i = 2 To Sheets("feuil1").Cells(Rows.Count, 3).End(xlUp).Row
Code = Sheets("feuil1").Cells(i, 3).Value
 
With Sheets("feuil2")
For j = 2 To .Cells(Rows.Count, 1).End(xlUp).Row
If .Cells(j, 1) = Code Then
s = .Cells(j, 2).Value
End If
Next j
End With
 
With Sheets("feuil1")
.Cells(i, 4) = s
End With
Next i
 
End Sub

quelqu'un aurait une solution?
Merci d'avance

[Commodore]

salut!
as-tu un message d'erreur ?

[ninette24]

Non j'ai pas de message d'erreur
Je vois que la macro commence à s'executer, puique la colonne se la feuil1 s'alimente au fur et à mesure et au bout d'un moment Excel plante !!!

Je sais pas quoi faire

[Commodore]

as-tu essayé de remplir tes cellules avec cells(x,y).formulaLocal = "recherchev..." ?

/me cherche d'où peut venir le plantage excel

edit: pourrais-tu envoyer un fichier exemple stp ?

[ninette24]

Désolée mais je n'utilise pas les formules d'excel (que je ne connais pas en plus)
Je peut joindre un fichier au cas où ....

Si quelqu'un peut m'aider

[Commodore]

oui pour le fichier s'il te plait
(cf mon edit)