Macro excel fonction Cells.Find
Résolu
Fulista
-
Fulista -
Fulista -
Bonjour, dans le but d'automatiser du traitement de données je cherche à écrire une macro capable de trouver la valeur 0,1 (au format nombre) dans la colonne A. En gros si la valeur 0,1 se trouve dans la cellule A34, je veux copier la cellule C34 dans une autre cellule (par exemple T28 dans le programme ci-dessous). J'ai commencé à écrire ce programme qui a fonctionné une journée mais plus maintenant... Si vous avez des indications pour régler mon problème je suis preneur !
Merci d'avance :)
Sub test() Dim Trouve As Range Dim PlageDeRecherche As Range Dim DCR_dch As Double DCR_dch = 0.1 'Durée de la DCR 'Recherche des valeurs Set PlageDeRecherche = ActiveSheet.Columns(1) 'Première colonne de la feuille active Set Trouve = PlageDeRecherche.Cells.Find(what:=DRC_dch, LookAt:=xlPart) 'Range("T28") = Trouve.Offset(0, 2).Value End Sub
A voir également:
- Macro excel fonction Cells.Find
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Fonction si et excel - Guide
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Fonction moyenne excel - Guide
Top,
Merci beaucoup pour le coup de main et l'astuce !