Discussion :

[supersilk31]

Bonjour developpez.com =).

Je souhaite réaliser un fichier Excel qui fasse un travail redondant à ma place.
Je pense que cela ne doit pas être trop compliqué mais je ne connais rien au VB et je ne sais absolument pas par ou commencer.

Voilà le fichier excel :
CONVERSION.xlsx

J'ai à gauche la date et le taux de conversion pour différentes dates.
Et à droite des transactions avec une date.

Je voudrai automatiser la recherche du taux pour trouver le montant converti.
Manuellement ça va pour quelques lignes, mais avec des centaines ou des milliers... L'horreur !

Merci d'avance pour vos insights.
Bonne jounée.

[supersilk31]

Pour l'instant j'en suis la mais :
1 : c'est moche :'(
2 : ça ne fonctionne pas :'(

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
 
Sub test()
'
' test Macro
' test
'
' Touche de raccourci du clavier: Ctrl+q
'
    ActiveCell.Select
    Set dateToFind = Selection.Copy
    ActiveCell.Offset(0, -6).Columns("A:A").EntireColumn.Select
    Selection.Find(What:=dateToFind, After:=ActiveCell, LookIn:=xlFormulas _
        , LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
        MatchCase:=False, SearchFormat:=False).Activate
    ActiveCell.Offset(0, 2).Range("A1").Select
    Application.CutCopyMode = False
    Selection.Copy
    Range("I2").Select
    ActiveSheet.Paste
    Range("G3").Select
End Sub

[supersilk31]

Nevermind, en fait c'est faisable beaucoup plus simplement avec la méthode de recherche =RECHERCHEV(G2;A:C;3;FAUX)