Mettre une condition à l'exécution d'une macro
Résolu
Patrick50
-
Patrick50 -
Patrick50 -
Bonjour,
J ai créé une macro qui ne doit s'exécuter que si une condition est remplie.
La condition : BV10=CJ10
Que faut-il ajouter an début de macro?
Merci
J ai créé une macro qui ne doit s'exécuter que si une condition est remplie.
La condition : BV10=CJ10
Que faut-il ajouter an début de macro?
Merci
A voir également:
- Mettre une condition à l'exécution d'une macro
- 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 word - Guide
Absent je n ai pu consulter votre réponse jusqu'à présent.
Je suis sur Excel 2000.
Pour lancer la macro je clic sur un bouton ou je peux également faire "Outils - Macros - Exécuter "
J'espère que cela réponds à votre question.
adaptez le nom de la feuille
Sub MaMacro If Worksheets("feuil1").Range("BV10") = Worksheets("feuil1").Range("CJ10") Then 'votre code '..... End If End SubJ 'ai complété la macro et quand je veux l'exécuter il s'affiche le message "Erreur de compilation - End If sans bloc If".
La macro se présente ainsi :
___________________________________________________________________________
Sub Subsanschangement159()
'
' Sans changement159 Macro
' Macro enregistrée le 14/10/2015 par Patrick
'
'If Worksheets("Associations 1").Range("BV10") = Worksheets("Associations 1").Range("CJ10") Then
Range("BM10:BZ3169").Select
Selection.Copy
Application.CutCopyMode = False
Selection.Copy
ActiveWindow.ScrollRow = 27
Application.Left = 16.75
Application.Top = 8.5
ActiveWindow.SmallScroll Down:=2
Range("BM30:BZ3189").Select
ActiveSheet.Paste
Range("CA10:CN29").Select
Selection.Copy
Range("BM10").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone,
SkipBlanks:= _ False, Transpose:=False
'
End IF
End Sub
___________________________________________________________________________
Ou y a t-il une erreur?
Merci
cette ligne est en commentaire
'If Worksheets("Associations 1").!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!Je viens d'apprendre a faire des macros, mais je ne connais pas encore VBA.
Concrètement que dois je modifier dans la macro?
Merci