Discussion :

[Fullhouser]

Bonjour à tous et merci de m’accueillir dans votre communauté.

Étant un utilisateur régulier je m’intéresse de plus en plus au fonctions qui attrait au VB. De ce fait je travaille présentement sur un classeur et j'aurais besoin d'aide pour l'intégration d'une commande. Voilà, sous excel 2010 j'aimerais faire en sorte qu'une image(Reset) cliquable fasse en sorte de supprimer toute les entrées qui ont été compilées par son utilisateur dans les cellules non-protégées et que par la suite, si possible il ait a répondre a un message de confirmation de son désir d remettre le document a son état original.

Je remercie tous ceux et celles qui pourrait m'apporter leur aide de par leur connaissances du sujet et au plaisir de faire votre connaissance.

P.S. Si ma recherche sur le sujet n'a pas donné de bons résultats, c'est sans doute que je ne sais pas par ou commencer vu la quantité d'information que ce site renferme. Alors n'hésitez surtout pas à m'indiquer le chemin si c'est le cas.

Claude

[Theze]

Bonjour,

Une piste. Tu colle un contrôle ActiveX "Image" sur ta feuille (tu y mets l'image Reset qui te convient), tu double clique dessus, dans le squelette tu colle ce code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
Dim Cel As Range
 
If MsgBox("Voulez-vous supprimer toutes les " & _
          "valeurs se trouvant dans les cellules non verrouillées !", _
          vbQuestion + vbYesNo, _
          "Suppression.") = vbNo Then Exit Sub
 
For Each Cel In ActiveSheet.UsedRange
 
    If Cel.Locked = False Then Cel.Value = ""
 
Next Cel

tu quitte le mode création (bouton avec une équerre, un crayon et une règle) puis tu teste.

Hervé.