Trouver ligne d'une cellule contenant une variable

Résolu
Loiwi Messages postés 37 Statut Membre -  
Loiwi Messages postés 37 Statut Membre -
Bonjour,

Grâce aux membres de ce forum (merci à eux), nous avons défini la macro suivante:

Sub Date_of_exit()
nomfic = Left(ActiveWorkbook.Name, 13)
datemodif = ActiveWorkbook.BuiltinDocumentProperties.Item("Last Save Time")
nomfichsuiv = "Response time.xlsm"
Workbooks.Open ("\\adresse réseau)
ligne = Workbooks(nomfichsuiv).Sheets("Feuil1").Columns(1).Find("*", , , , xlByColumns, xlPrevious).Row
Workbooks(nomfichsuiv).Sheets("Feuil1").Range("C" & ligne) = datemodif
MsgBox "Please check that the date of exit were saved"
Workbooks(nomfichsuiv).Save
Workbooks(nomfichsuiv).Close

End Sub

L'objectif de cette macro est d'enregistrer la date à laquelle je clôture un dossier client
Le problème est qu'en l'état, elle enregistre cette date dans la troisième cellule de la dernière ligne non vide (peu importe que la cellule soit vide ou non). Comment modifier cette macro pour qu'elle trouve la ligne contenant le nom du dossier et qu'elle enregistre la valeur dans la troisième cellule de cette ligne?

Merci d'avance

Configuration: Windows / Chrome 80.0.3987.149
A voir également:

1 réponse

ccm81 Messages postés 11033 Statut Membre 2 433
 
Bonjour

Essaies ceci : en supposant que nom_du_dossier est dans la colonne 1 de la feuille Feuil1 du fichier nomfichsuiv
ligne = Workbooks(nomfichsuiv).Sheets("Feuil1").Columns(1).Find(nom_du_dossier).row

Cdlmnt
0
Loiwi Messages postés 37 Statut Membre 1
 
Cela fonctionne, merci beaucoup!
0