Je t'ai mis les modifs dans le post précédent...
Si tu peux mettre les macros dans le fichier des données c'est beaucoup mieux
A+ François
Je n'arrive pas hélas à appliquer ta méthode sur mon fichier... Snif
En revanche, je vois que tu supprimes mon "usine à gaz" permettant de "filter" les données de référence suivant leurs dates.
Private Sub BTN_Valider_Click()
'Variables
Dim Wb_Archives As Workbook 'Variable représentant le classeur des ARCHIVES
Dim i As Integer
'Attribution des Variables
Set Wb_Archives = Application.Workbooks.Open("C:\DOSSIER\ARCHIVES.xlsm")
Call Wb_Archives.Activate 'Ouverture du classeur de destination
Sheets("Période").Activate
For i = 10 To 50
If ComboBox1.Value = Wb_Archives.Worksheets("Période").Range("O" & i).Value Then
Wb_Archives.Worksheets("Période").Range("O" & i).Select
Offset(0, 8).Select
End If
Next i
Unload Me 'Masque l'UserForm Actif
End Sub
J'ai écrit ce code.
L'idée est de localiser la référence dans mon fichier et d'ensuite faire un décalage dans la cellule date concerné pour la modifier.
mais ça ne fonctionne pas.
Une idée peut-être ?
Merci