Re : Condition "Si" dans une procèdure
Bonjour pascal,
Dans ce cas, il peut peut être l'enregistrer comme ca :
Sub mamacro()
If Range("A1").Value = "01" Then
Sheets("ma feuille").usedRange.copy destination:=Sheets("destination").Range("A65536") .End(XlUp)
Else
Sheets("ma feuille").usedRange.copy destination:=Sheets("destination").Range("A65536") .End(XlUp)(15)
End If
End sub
et y affecter un bouton