Elaboration d'une to do list

Bonjour a vous,

Dans le fichier joint

J'aurai besoin de vos lumières pour la création d'une macro qui permettrait:

1 chercher dans une plage toutes les cellules = une autre cellule

2 rechercher la première colonne et la première ligne des cellules concernées

3 lister dans une todo. "premère colonne : première ligne"

Je vous remercie mille fois par avance.

Bonjour ptitlo63230, le forum,

Un essai...

Sub Créer_liste()
 Dim plage As Range, c As Range
 Dim lig As Integer

 Application.ScreenUpdating = False

  With Sheets("planning")
   Set plage = .Range("C6:H12"): lig = 20
   .Range("C20:C30").ClearContents '......à adapter
    For Each c In plage
     If c.Value = .Range("F4").value Then
      .Range("C" & lig) = .Cells(c.Row, "C") & ": " & .Cells(6, c.Column)
      lig = lig + 1
     End If
    Next c
  End With
End Sub

Cordialement,