Ajouter un paramétre à des macros

Question

Bonjour

Ci dessous 2 macros qui me permettent de valider ou supprimer une sélection.
J'aimerai qu'elles ne puissent fonctionner que sur la plage suivante:
M11:X11

merci de votre aide.

Sub ValiderSelection()
'
' ValiderSelection Macro
'
    ActiveCell.FormulaR1C1 = "1"
    Selection.FillRight
    Selection.FillLeft
    With Selection.Interior
        .ColorIndex = 1
        .Pattern = xlSolid
        .PatternColorIndex = xlAutomatic
    End With
End Sub

Sub AnnulerSelection()
'
' AnnulerSelection Macro
'
    Selection.ClearContents
    Selection.Interior.ColorIndex = xlNone
End Sub

jordane45 · Answer

Bonjour, je n'ai pas eu le temps de trop regarder.. mais je peux déjà te proposer un code qui vérifie si la ligne et la colonne de la cellule sélectionnée se situe bien dans la plage demandée... Sub Toto() 'recup les N° de ligne et de colonne de la cellule active Ligne = ActiveCell.Row colo = ActiveCell.Column 'test si la cellule se trouve dans > M11:X11.. sinon.. sort du sub If Ligne <> 11 Then Exit Sub If colo < 13 Or colo > 24 Then Exit Sub 'La suite du code ici..... ';... end sub Il doit exister d'autres solutions.. mais pour ma part j'utilise celle ci. Cordialement, Jordane, ______________________________________________________ Règles du forum à lire avant de poster une question : ICI

Ajouter un paramétre à des macros

1 réponse

Votre réponse