Copie d'une feuille sans code

[Ilino]

Bonjour Forum
Je sais que ce n’est pas le bon moment, mais permettez moi de postuler mo souci
Ci-joint un fichier exemple, je l’ai ajusté selon les exemples de ce forum (un grand merci pour les bénévoles de ce forum), je souhaiterai enregistrer une copie de la feuille « Rapport Activités » mais sans le code ?
Gracie
NB: c'est la suite de mon file precedent

 

[Ilino]

Re : Copie d'une feuille sans code

Re Bonjour
Oui je l’ai testé mais ça marche pas (il fusionne toutes les cellules du mon tableau)
Donc j’ai pas le choix.
GRACIE

 

[Ilino]

Re : Copie d'une feuille sans code

Re Bonjour
Oui je l’ai testé mais ça marche pas (il fusionne toutes les cellules du mon tableau)
Donc j’ai pas le choix.
GRACIE

Re Bonjour
je suis désolé apparemment je me suis ….
Qlq un peut m’aider à délacer mon pblm
Merci

 

[Papou-net]

Re : Copie d'une feuille sans code

RE :

Ah oui, effectivement, je l'avais aussi remarqué.

Tu peux donc conserver "Range("B7:27").ClearContents" à condition de modifier la macro du bouton Save :

Private Sub CommandButton1_Click()
With Feuil1.Range("B7:D27")
  .ClearContents
  .UnMerge
End With
Feuil1.ComboBox1.ListIndex = -1
End Sub

Je ne suis pas certain que ça apporte un plus, si ce n'est d'alléger l'écriture ou la modification éventuelle du code.

Cordialement

 

[Ilino]

Re : Copie d'une feuille sans code

RE :

Ah oui, effectivement, je l'avais aussi remarqué.

Tu peux donc conserver "Range("B7:27").ClearContents" à condition de modifier la macro du bouton Save :

Cordialement

Re Papou
mais si je modifier la Macro du SAVE...comment je fais pour créer une copie de la feuille"Rapport Activités"
a+

 

[Ilino]

Re : Copie d'une feuille sans code

Bonjour forum
Que signifier ce code d’erreur :

Erreur d’execution 1004
La methode ‘Range de l’objet _Global a echoué

merci