Imposer La Fermeture D’un Classeur

[salamanko]

Bonjour le forum, bonjour les spécialistes

Un petit appel car mes compétences s'arrêtent là.

Dans un classeur Excel, j’ai 3 feuilles de calcul nommé Feuil1, Feuil 2 et Feuil3

Sur feuil1 qui sert de page d’accueil, divers infos et un bouton qui lance un Usf.
Sur Feuil2 le résultat des saisies de l’Usf de la Feuil1 et un bouton de confirmation qui enregistre, archive en Feuil3, ferme le classeur et revient automatiquement à la feuil1.


Mon problème est que je travaille sous réseau et certains utilisateurs du classeur ferment directement sur l’icône Enregistrer et ferme le classeur. Action qui à pour effet de rouvrir le classeur sur une feuille différente que la feuil1.

Quelle est la syntaxe qui rend impossible cette manière de fermer le classeur et/ou informe par Msgbox la procédure à suivre ?

 

[flo2002]

Re : Imposer La Fermeture D’un Classeur

Si j'ai bien tout compris,
tu veux que a l'ouverture de ton fichier ce soit la feuille 1 qui apparaise.
Je te propose donc:
à mettre sur le workbook

Private Sub Workbook_Open()
Sheets("Feuil1").Select 'on selectionne la feuille
UserForm1.Show ' ca c'est si tu veux lancer ton usf des le debut mais tu peux le virer
End Sub

bon courage

j'espere ne pas avoir repondu à coté!😀

 

[salamanko]

Re : Imposer La Fermeture D’un Classeur

Salut, flo

Non, je ne veux pas ouvrir directement l'Usf,Mon projet est fonctionnel si on le quitte en appuyer sur le bouton de validation et non en utilisant soit l'icône Enregistrer et ferme le classeur ou enregistrer et fermer de la barre de fonction.

Le fait de ne pas fermer le programme par le bouton enregistre une fin differente que j'ai programmé et a l'ouverture du fichier, je me retrouve pas sur la feuil1 d'accueil.

 

[Mouchty85]

Re : Imposer La Fermeture D’un Classeur

Pourquoi ne pas demander la séléction de la feuil 1 avant que le classeur ne se ferme

 

[salamanko]

Re : Imposer La Fermeture D’un Classeur

Je la demande, est ca marche si tu fermes avec le bouton prévu à cette effet, mais si tu fermes en cliquant sur fichier, enregistrer puis fermer, ton classeur se rouvrira sur la feuille qui était à l'écran lors de la precedente fermeture. enfin, chez moi, c'est si qui arrive. Quelle est la syntaxe pour empeché ce probleme???

 

[Mouchty85]

Re : Imposer La Fermeture D’un Classeur

Tu peu m'envoyer ton fichier que je jette un coup d'oeil
Merci

 

[chris]

Re : Imposer La Fermeture D’un Classeur

Bonjour
Il faut associer le passage à feuil1 à l'événement beforesave du classeur :

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Sheets("Feuil1").Select
End Sub

Mais pour gérer au mieux utilises aussi l'évenement before close : si le classeur n'a pas été enregistré (tester la valeur de ThisWorkbook.Saved)et qu'on n'est pas sur feuil1 alors il faut se placer sur feuil1 et enregistrer.

 

[salamanko]

Re : Imposer La Fermeture D’un Classeur

Je ne l'ai pas chez moi, il est au boulot, RDV demain si je n'ai pas de reponses

 

[dhiouf]

Re : Imposer La Fermeture D’un Classeur

Bonjour
met l'instruction suivante dans thisworkbook,et tester si çà te plaît

[COLOR="Blue"]Private Sub Workbook_BeforeClose(Cancel As Boolean)
Sheets("Feuil1").Select
ThisWorkbook.Save
End Sub[/COLOR]

 

[salamanko]

Re : Imposer La Fermeture D’un Classeur

Salut le forum, bonsoir à tous,

Suite au fil de hier, je félicite dhouif car sa syntaxe me convient tres bien.
Il faut dire que chris avait fait 90% du chemin.

Chris, quelle est la signification de "ByVal SaveAsUI As Boolean" je n'ai pas vu de changement?

pour mieux comprendre ma question, si joint le classeur, cela aidera peut etre quelqu'un.

bye et merci encore à tous

 

[salamanko]

Re : Imposer La Fermeture D’un Classeur

le classeur n'avait pas suivi

 

[Dan]

Re : Imposer La Fermeture D’un Classeur

Bonjour,

Par rapport à ta demande et ton dernier post contenant le fichier, je vois pas ce que tu veux.

Dans THISWORKBOOK, tu sélectionnes la feuille4 alors que tu parles de la feuille1. dhiouf, chris et flo2002 t'ont proposé.

Si tu veux toujours ouvrir ton classeur sur la feuille 1, prends la macro de Flo2002.

Merci de tes précisions.

Cdlt

 

[lesarthois]

Re : Imposer La Fermeture D’un Classeur

bonjour
tu trouvera une approche de ton problème ici

https://www.excel-downloads.com/threads/aide-mot-de-passe-sur-classeur.65701/

bonne journée
@+

 

[Dan]

Re : Imposer La Fermeture D’un Classeur

Re,

Ben lesarthois, certe pas mal cela mais je vois pas le rapport du mot de passe avec la demande ici.
Il va plus s'y retrouver je crois.

Salamanko, je viens de penser aussi à une solution qui serait de travailler en mode pleine écran. Cela éviterait à l'utilisateur de voir les barres d'outils. Restera toutefois la barre de menu mais, comme c'est plus long d'enregistrer là, il y aura fort à parier qu'il utilisera le bouton "enregistrer" sur ta feuille.

 

[lesarthois]

Re : Imposer La Fermeture D’un Classeur

oups
en effetje suis a coté de la plaque
l'erreur est humaine
et moi je suis une erreure

mes escuses pour cette gaffe
bonne soirée tout de même
@+