Macro sous condition
Denis35
-
Denis35 -
Denis35 -
Bonjour,
J'ai créé une macro qui déplace une plage.
Je souhaiterais qu'en appuyant sur le bouton de la macro elle ne s'exécute que si A1<4;
La macro :
Sub Deplacer ()
Deplacer Macro
Range ("B1:F5").Select
Selection.Cut Destination:= Range ("B2:F6")
Range("B2:F6").Select
End Sub
Merci
J'ai créé une macro qui déplace une plage.
Je souhaiterais qu'en appuyant sur le bouton de la macro elle ne s'exécute que si A1<4;
La macro :
Sub Deplacer ()
Deplacer Macro
Range ("B1:F5").Select
Selection.Cut Destination:= Range ("B2:F6")
Range("B2:F6").Select
End Sub
Merci
Configuration: Windows / Firefox 67.0
A voir également:
- Macro sous condition
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Excel cellule couleur si condition texte - Guide
- Jitbit macro recorder - Télécharger - Confidentialité
- Télécharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Macro maker - Télécharger - Divers Utilitaires
4 réponses
Bonjour,
Cdlt
Sub Deplacer()
If [A1] < 4 Then Range("B1:F5").Cut Destination:=Range("B2:F6")
End Sub
Cdlt
Tout d'abord excusez le retard de la réponse, pour une raison indépendante de ma volonté.
J'ai complété le code la macro. Quand la condition est remplie la macro s'exécute.
Par contre quand la condition n'est pas remplie les données de la plage destinataire sont effacées alors que je souhaiterais qu'aucune action ne se produise. Comment résoudre ce problème.
Cdlt