Macro avec 2 conditions "SI"

R

Raja

XLDnaute Accro

• 1 Juillet 2009

• #2

Re : Macro avec 2 conditions "SI"

Bonjour,

Donne-nous un peu plus de précisions, car pour le moment il en manque pas mal.

 

Vote positif 0 Vote négatif

T

Tom87

Guest

• 1 Juillet 2009

• #3

Re : Macro avec 2 conditions "SI"

L'opérateur remplie les cellules "B3" et "B4"

Si en B3 il rempli "1" et si en B4 il rempli "0", je veux qu'une macro me copie et colle les valeurs en "E" et "F" dans les colonnes " C et D " ou "G et H".

Si les 2 conditions sont remplies, il faudra copier les valeurs en C et D sinon en G et H

Merci


" Le nombre de valeurs en E et F sera toujours le meme"

 

Vote positif 0 Vote négatif

T

Tom87

Guest

• 1 Juillet 2009

• #4

Re : Macro avec 2 conditions "SI"

up svp

merci

 

Vote positif 0 Vote négatif

R

Raja

XLDnaute Accro

• 1 Juillet 2009

• #5

Re : Macro avec 2 conditions "SI"

Re,

Veux-tu absolument une macro ? Et dis-nous aussi ce qu'il faut faire dans ces 4 cas possibles :

1) B3=0 ET B4=0
2) B3=0 ET B4=1
3) B3=1 ET B4=0
4) B3=1 ET B4=1

Parce que avec 2 variables 2² combinaisons possibles.

 

Dernière édition: 1 Juillet 2009

Vote positif 0 Vote négatif

T

Tom87

Guest

• 1 Juillet 2009

• #6

Re : Macro avec 2 conditions "SI"

oui, je veux une macro car je reprendrai le code pour ensuite l'intégrer a une macro déja existante.

C'est simple, si "B3" = 1 et "B4" = 0, je veux que les valeurs soient copiées a gauche.

pour le reste, à droite ( meme si "B3= 1 et "B4= 12 par exemple")

Merci

 

Vote positif 0 Vote négatif

R

Raja

XLDnaute Accro

• 1 Juillet 2009

• #7

Re : Macro avec 2 conditions "SI"

Bonjour,

Essaye ce code :

Code:

Sub test()
  If ([B3] = 1 And [B4] = 0) Then
    [E3:F8].Copy
    [C15].PasteSpecial Paste:=xlValues
  Else
    [E3:F8].Copy
    [G15].PasteSpecial Paste:=xlValues
  End If
End Sub

 

Vote positif 0 Vote négatif