Code pour afficher une valeur avec condition

Bonjour,

Mes cellules A1:A10 m'indiquent 0 ou 1. J'aimerai connaître le code pour faire apparaître un "-" dans les lignes 10 à 12 ET 14 à 20 se situant dans les colonnes avec un 0 en ligne A.

Le code devrait commencer par :

Sub tiret()

Dim cellule As Range

For each cellule in Range ("A1:A10")

If cellule.Value = "0" Then C'est ici que je n'arrive pas à trouver la syntaxe ="-"

Next cellule

End Sub

Merci à vous pour votre aide.

bonjour Flo 456 le forum

a+

papou

For each cellule in Range ("A1:A10")
If cellule.Value = "0" Then cellule ="-"
Next cellule

Bonjour,

En fait ce n'est pas la cellule en ligne A qui doit être égale à "-", mais les cellules se trouvant en ligne 10 à 12 et 14 à 20 dans les colonnes où la cellule en ligne A = 0

Bonjour Flo456, Salut paritec,

La Ligne A n'existe pas. Sois précis dans ta demande. Reviens si possible avec un exemple de résultat voulu dans un fichier Excel.

Oui excusez-moi je me suis un peu embrouillé, voici un exemple sous forme de fichier avec explications.

N'hésitez pas si vous avez d'autres questions, merci à vous !

Bonjour,

Un code suivant à essayer :

Sub tiret()
    For i = 1 To 10
        If Cells(1, i) = 0 Then
            Range(Cells(10, i), Cells(12, i)) = "-"
            Range(Cells(14, i), Cells(20, i)) = "-"
        End If
    Next
End Sub

Ce code marchera dans ce cas précis. A adapter dans d'autres cas. Mais il y a beaucoup d'autres façons de le faire. Tout dépend de l'évolution de ton besoin.

Merci beaucoup Raja !