Discussion :

[Klode784]

Bonjour à tous, j'ai une feuille dans un classeur que je peux effacer en cliquant sur un bouton. Dans VBA j'ai le code suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
' Purpose   : Permet d'effacer les cellules de Contrat (Ces cellules sont nommés MAPLAGE)
'---------------------------------------------------------------------------------------
Private Sub RAZ()
Dim c As Range
Application.EnableEvents = True
 
Application.ScreenUpdating = False
With Sheets("Contrat")
    For Each c In .Range("MAPLAGE")
        If Not c.HasFormula Then c.MergeArea.ClearContents
    Next c
    .Range("D30").Value = 0
    .Range("E8").Select
End With
End Sub

J'aimerais modifier les cellules de "MAPLAGE" mais je ne trouve pas. J'aimerais faire des modifications mais ça fait près de 6 ans que je n'ai pas touché à ce classeur. Merci de votre aide précieuse!

Claude

[joe.levrai]

Bonjour,

sur l'interface Excel : onglet "FORMULES" >> "Gestionnaire de Noms"

tu auras la liste de l'ensemble des plages nommées du classeur

[Klode784]

Bonjour,

sur l'interface Excel : onglet "FORMULES" >> "Gestionnaire de Noms"

tu auras la liste de l'ensemble des plages nommées du classeur

Merci beaucoup, c'est exactement ce que je cherchais!

Claude