Rechercher et remplacer sur une cellule vide

Question

Dan le fichier joint je souhaite insérer le même texte en C17, C32, C47 ainsi de suite jusqu'au C3842 ... Je tente avec CTRL-F comme vous pouvez le voir sur la capture en attaché. Malheureusement le texte s'insère sur toutes les cellules vides. Il doit bien y avoir un moyen, mais je sèche ... Merci pour votre aide...

Meryem Ben Lahbib · Accepted Answer

Bonsoir,

Ce que j'ai compris, vous souhaitez insérer le texte "Assiette de fromage" à partir de la cellule C17, puis faire un pas de 15 pour insérer le texte dans les cellules suivantes jusqu'à C3842.

Essayez cette macro et remplacez "Feuil1" par le nom de votre feuille :

Sub InsererTexte()

Worksheets("Feuil1").Select
Dim i As Long
For i = 17 To 3842 Step 15
Cells(i, "C").Value = "Assiette de fromage"
Next i
End Sub