Formule si ... alors

bonjour le forum,

voila je voudrais savoir s'il est possible d'avoir une formule qui dirait par exemple :

formule qui se trouve en E1 :

=si(A1="";"-" et B1="-" et C1="-" et D1="-";"")

en français ça donne :

si A1="" alors B1 et C1 et D1 doivent avoir "-", si c'est vide ""

Voila j'espere que ma demande est assez claire.

Merci par avance pour votre aide.

Laurent

=Si(A1="";et(B1="-";C1="-";D1="-");"")

A tester


Plus simple (je suis bète)

Met twa en C1:

=si(A1="";"-";"")

et ceci est à mettre en B1 C1, D1 ....etc

merci pour ta réponse surper rapide !!

je prefere te mettre un fichier pour exemple car je pense qu'il y a un souci au niveau d'une reference circulaire ...

Si plus simple, je suis preneur en vba car dans tous les cas, je vais le faire en vba

Merci

43si-alors.xlsx (10.15 Ko)

Bonjour lolo69490,

Sub Macro1()
'
' Macro1 Macro
'
Dim i As Integer
For i = 1 To 3
    If Cells(i, 1) = "" Then
    Cells(i, 2) = "-"
    Cells(i, 3) = "-"
    Cells(i, 4) = "-"
    End If
Next i
'
End Sub

Je te l'ai fait de manière à ce que tu puisse tester sur 3 cellules, pour le fun (si la cellule A1 est vide, la B1,C1 et D1 auront - à l'intérieur, si A2 est vide ...)

si tu veux retirer la boucle tu viresla déclaration du i (qui ne sert plus à rien) le For et le Next et tu conserves que les lignes if ..., Cells..., Cells,... remplaces le i par un 1 et c'est bon

Bonjour,

Une autre proposition en utilisant la protection de la feuille

38si-alors.xlsm (17.81 Ko)

A+

Bonjour Timothe URVOY,

Merci pour ton code

Sub Macro1()

'

' Macro1 Macro

'

Dim i As Integer

For i = 1 To 3

If Cells(i, 1) = "" Then

Cells(i, 2) = "-"

Cells(i, 3) = "-"

Cells(i, 4) = "-"

End If

Next i

'

End Sub

du coup, je suis parti la dessus ... je l'ai modifié mais ça marche nickel ...

Merci à toi aussi frangy, mais j'avoue que je n'ai pas réussi à utiliser ta macro.

a plus

Laurent

Rechercher des sujets similaires à "formule"