erreur enregister

jmcr · 3 Juin 2017

bonsoir le forum
voila mon petit problème j'ai un useforme avec un boutons que je nomme enregistrer je tente d' écrire un code vba pour enregistrer mon classeur quand je finis mon travaille voila le code
Private Sub CommandButton2_Click()
Sub sauvegarde()
'Cette feuille enregistre mon classeur
ActiveWorkbook.Save
End Sub
et cela marche pas pouvez vous me dire ou est ma grosse erreur svp
merci pour votre aide

Jacky67 · 3 Juin 2017

Bonsoir,
Deux solutions
1-Le code directement appliqué au bouton

Code:

Private Sub CommandButton2_Click()
ActiveWorkbook.Save
End Sub

2-Le bouton fait appel à une macro

Code:

Private Sub CommandButton2_Click()
Call sauvegarde
End Sub

et dans un module

Code:

Sub sauvegarde()
ActiveWorkbook.Save
End Sub

Si cela ne fonctionne pas, mettre en ligne le classeur.

jmcr · 3 Juin 2017

merci beaucoup jacky67 affaire réussis comme d'habitude et si rapide chapeau bas
peut tu me dire comment je peut retirer la croix dans mon useforme stp

jmcr · 3 Juin 2017

peut ton me dire comment ou quelle code bva pourrais retirer la croix de l'useform svp

mapomme · 4 Juin 2017

Bonjour jmcr (ou gardian ?),

Sans enlever la croix, mais en inhibant son action. Il faut donc un bouton "Quitter" puisque un clique-gauche sur la croix ne referme plus le userform.. On utilise aussi et surtout l'évènement QueryClose de l'userform. Le code n'utilise pas d'API.

Fichier exemple avec le userform avec l'horloge.
à noter: on a ajouté une instruction Application.OnTime... dans le code du bouton "Quitter" (pour arrêter l'horloge quand on quitte le userform).

jmcr · 4 Juin 2017

bonjour le forum ,MAPOMME
merci pour l'aide et le temps a m'accordé ici ,et vous présenter mes excuses
mais je suis bien jmcr je suis le fils de GARDIAN je voulais juste aidé mon père dans ses recherches pendant qu'il est en voyage d'affaire pour lui faire une surprise en le mettant moi même en place dans son dossier il est vraiment aussi que je suis allées poser la même question sur un autre forum avec son speudo je suis vraiment le seul responsable de cette erreur je vous prie de m'excuser je voulais froissées ou tromper personne
encore tout mes excuses
et encore un grand merci

erreur enregister

jmcr

XLDnaute Occasionnel

Jacky67

XLDnaute Barbatruc

jmcr

XLDnaute Occasionnel

jmcr

XLDnaute Occasionnel

mapomme

XLDnaute Barbatruc

Pièces jointes

jmcr

XLDnaute Occasionnel

Discussions similaires