Probleme de fermeture

Bonjour le forum et bonne année

j'ai un petit soucis dans la fermeture d'un dossier excel

avec ce code

Windows("toto").Close SaveChanges:=False (dans un userform)

cela fonctionne tres bien sur mon pc mais des que je veux le mettre sur un serveur et

apres télchargement la fermeture ne marche plus.

merci de votre aide

croky

Bonjour,

Windows("toto").Close SaveChanges:=False (dans un userform)

Peux-tu

• donner le code complet
• dire où le code se trouve --> dans ton fichier à fermer ou dans un autre ?

A te relire

Dan

PS : Je te souhaite la bienvenue parmi nous. Si ce n'est déjà fait je t'invite à lire La Charte du forum afin que tes demandes et interventions soient également utiles à d'autres participants.

D'avance, merci de ta participation.

Dan

merci de ton aide et de ta rapidité

voici le code:

Private Sub fermer_Click()

ActiveWindow.Close SaveChanges:=False

End Sub

mondossier s'ouvre sur un userform en page entière

et dans un CommandButton le code

c'est un dossier destiné à charger sur un site et donc empêcher toutes modifications et enregistrement , même en copie.

sur mon pc cela fonctionne mais apres l'avoir chargé via filezilla sur le serveur du site

à la fermeture cela me donne:

erreur '-2147417848(80010108):'

le méthode close de l'objet à échoué

merci

re,

Je pense que c'est parce que tu veux fermer ton fichier depuis l'USF sans "déchager" l'USF préalablement.

Essaye ceci :

Private Sub fermer_Click()
Unload UserForm1
ActiveWindow.Close SaveChanges:=False
End Sub

Avec :

• le nom de ton bouton --> "fermer"
• le nom de l'USF --> Userform1

A te relire

Dan

j'avais déja essayé avec unload me

j'ai quand meme fait un essai avec le nom de l'userform

qui s'appelle us

mais cela ne fonctionne pas non plus

même verdict

merci

voila j'ai fait un petit dossier simple qui me donne le meme résultat

merci

merci de votre aide

j'ai trouvé la solution

Dim r As Integer

For r = 1 To ActiveWorkbook.Windows.Count

Windows(r).Close SaveChanges:=False

Next

bonne journée

re,

Je ne peux pas ouvrir ton lien et bien entendu ton fichier. As-tu envoyé ton fichier comme le prévoit la procédure sur ce forum ?

Si ton pb est résolu, merci d'utiliser de cloturer ton intervention comme indiqué dans la charte du forum.

Dan