Bouton "Clean"

Résolu
bgee2000 Messages postés 101 Statut Membre -  
ccm81 Messages postés 11033 Statut Membre -
Bonjour,
J'aimerais insérer un bouton qui me permettrait de nettoyer un ensemble de cellule précis.
(donc delete)

c'est possible ?
%Merci
Bruno

7 réponses

  1. M-12 Messages postés 1349 Statut Membre 285
     
    Bonjour,

    En réponse: Oui c'est possible

    Mais sans savoir lesquelles ?
    Tu n'as pas testé avec l'enregistreur de macro ?
    0
  2. ccm81 Messages postés 11033 Statut Membre 2 434
     
    Bonjour

    Un exemple très simple à adapter
    http://www.cjoint.com/c/GJwkySpSsMB

    Cdlmnt
    0
  3. The_boss_68 Messages postés 959 Date d'inscription   Statut Membre Dernière intervention   182
     
    Bonjour,

    Ou comme ça pour des cellules ou plage spécifique, et bien sûr a adapter

    https://www.cjoint.com/c/GJwlBOjMqbj

    Slts
    0
  4. bgee2000 Messages postés 101 Statut Membre 1
     
    genial ca marche! merci!
    (ma première macro!, suis ému... :-)
    --
    0
    1. bgee2000 Messages postés 101 Statut Membre 1
       
      Et tiens tant que j'y suis, une macro pour copier des cellules vers d'autres cellules, ça ressemblerait à quoi ?
      0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. ccm81 Messages postés 11033 Statut Membre 2 434
     
    Pour faire simple et copier la valeur de A3 dans B3
    Range("B3").Value = Range("A3").Value

    Cdlmnt
    0
    1. bgee2000 Messages postés 101 Statut Membre 1
       
      super, mais le code c omplet je mets quoi?
      car en l'état "Range("B3").Value = Range("A3").Value )
      ca ne marche pas
      0
  7. ccm81 Messages postés 11033 Statut Membre 2 434
     
    Il te faut l'intégrer dans le corps d'une procedure

    Public Sub OK()
    .....
    Range("B3").Value = Range("A3").Value
    .....
    End Sub
    0
    1. bgee2000 Messages postés 101 Statut Membre 1
       
      bonjour,
      merci beaucoup mais ca ne marche pas. Je pense que ce sont les pointillés non ?
      0
  8. ccm81 Messages postés 11033 Statut Membre 2 434
     
    les pointillés sont là pour remplacer le reste de ton code
    Si ta procedure OK ne fait que copier A3 dans B3
    Public Sub OK()
    Range("B3").Value = Range("A3").Value
    End Sub

    Cdlmnt
    0