Discussion :

[NulenVBA]

'Subscript out of range' mais pour moi la fonction est bonne... c'est assez décourageant j'arrive pas à faire un programme seul.

J'assigne une identité aux cells(i,2)
je recherche la première occurence de la valeur dans une autre feuille et j'écris l'adresse dans la cellule à côté, mais rien ne marche.

Code :

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

1
2
3
4
5
6
7
8
9
10
Sub rechercheAppli()
For i = 2 To 40
Cells(i, 2).Value = appli
With Worksheets("Conso").Sheets(1).Range(Cells(1, 13), Cells(10, 13))
Set appliutilisee = .Find(appli, LookIn:=xlValues)
End With
firstadress = appliutilisee.Address
Cells(i, 3).Value = firstadress
Next i
End Sub

*Merci de votre aide*
NulEnVBA

[edelweisseric]

Bonjour à tous
Bonjour

Rapidement et sans pouvoir tester ce que je te donne, essaie ceci :

Code :

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

1
2
3
4
5
6
7
8
9
10
Sub rechercheAppli()
For i = 2 To 40
'Cells(i, 2).Value = appli
appli = Cells(i, 2).Value 
With Worksheets("Conso").Range(Cells(1, 13), Cells(10, 13))
Set appliutilisee = .Find(appli, LookIn:=xlValues)
End With
Cells(i, 3).Value = appliutilisee .Address
Next i
End Sub

Tu dis

Eric

[NulenVBA]

alors déjà je vais changer worksheets en workbooks ...

il me manque les bases je crois

[Godzestla]

il me manque les bases je crois

Oui, je crois aussi. Essaie de t'y mettre.

Ici par exemple :

Code :

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

1
2
 
Cells(i, 2).Value = appli

Tu n'initialises pas Appli mais la cellule avec applic (qui est vide).

Pas bon....

Bon courage. Il te reste du chemin. As-tu déjà pris le temps de lire les docs de VBA disponibles sur ce site. Je crois que c'est nécessaire sinon tu vas continuer à pagayer sur la plage.

[NulenVBA]

comment initialiser appli alors? j'ai vu ce genre de code dans un livre vba dapplications financières et m'en suis inspiré.

[edelweisseric]

comment initialiser appli alors? j'ai vu ce genre de code dans un livre vba dapplications financières et m'en suis inspiré.

As tu essayé ce que je t'ai donné ?
En cliquant sur F8 (pas à pas), cela te permettras de vérifier ce qu'il y a dans tes variables.

Eric

[Godzestla]

Eric t'a donné la solution à mon avis.

[pgz]

Bonjour.

En fait, tu veux faire quoi avec ce code? Je n'ai pas compris tes explications et le code lui même me laisse perplexe

Mais si tu as une solution, laisse tomber.

PGZ

[NulenVBA]

merci pour votre aide, de toute façon je ne coderai jamais bien, c'est pas naturel pour moi cette façon de s'exprimer j'ai fait un IEP je suis beaucoup plus dans les mots.
j'ai vidé la feuille de ses données et le programme semble marcher. Un #N/A dans une cellule peut-il mettre en l'air un programme ?

[pgz]

Un #N/A dans une cellule peut-il mettre en l'air un programme ?

Cela dépend, bien sûr, du programme!

PGZ