Erreur 35

[Ilino]

Bonjour Forum
que signifier cette erreur?

Erreur d’exécution '35'

merci

 

[Ilino]

Re : Erreur 35

Bonjour Ilino, Efgé, Hasco,

L'erreur se situe en fait dans la macro Sup.

A+

Re MAITRE,Efgé, Hasco
Oui tu as raison je l'ai modifié j'ai ajouté dans le ThisWorkbook_Open
Private Sub Workbook_Open()

End Sub
mais j'ai rencontré un autre Pblm
dans le cas (quand je click sur le bouton Copier) ou le classeur Existe deja j'ai un autre Bug
Erreur d'execution 1004
La methode 'SaveAs' de l'objet '_WorkBook' à echoué

 

[Ilino]

Re : Erreur 35

Re
ça bug a ce niveau du code

ActiveWorkbook.SaveAs Filename:=adr & chemin & ".xlsm", FileFormat:=52

Merci

 

[job75]

Re : Erreur 35

Re,

Quand le fichier existe déjà il y a normalement d'abord un message.

L'erreur se produit si l'on clique sur "Non" ou "Annuler", c'est très normal.

Il suffit de gérer l'erreur :

On Error GoTo 1
ActiveWorkbook.SaveAs adr & chemin & ".xlsm"
On Error GoTo 0
'----
1 ActiveSheet.Protect ""

A+

 

[Ilino]

Re : Erreur 35

Re
merci c'est exactement ce que je cherchais
ci dessous autre proposition

'MACRO CHARLET
Sub copie()
    Dim wbks As Workbook, adr$
    [COLOR="#FF0000"]On Error Resume Next[/COLOR]
ActiveSheet.Unprotect ""

A+

 

[Ilino]

Re : Erreur 35

Grazie a tutti voi, ed i miei maestri

 

[job75]

Re : Erreur 35

Re,

Oui autre proposition... L'as-tu essayée avec un fichier déjà créé ?

La ComboBox, le bouton, les macros seront supprimés, tant pis pour toi 🙄

A+

 

[Ilino]

Re : Erreur 35

Re
c'est noté MAÎTRE🙂
A+