fermeture d'un classeur

[Hugues]

Bonsoir Le forum,

Dans un userform, j'ai positionné un bouton afin de fermer le classeur.
Je souhaiterais connaître le code afin :
- de fermer le classeur sans fermer les autres classeurs ouverts
- je précise que le classeur n'a pas toujours le même nom.
Merci par avance

 

[Robert]

Bonsoir Hugues, bonsoir le forum,

Si le classeur que tu dois fermer est celui qui contient l'userform alors ThisWorkbook.Close
devrait faire l'affaire. Sinon il nous faudra plus de détails pour pouvoir t'aider davantage.

 

[CBernardT]

Bonsoir Hugues et Robert,

Comme Robert, sans explication complèmentaire, je te livre ce code qui permet d'enregistrer le classeur actif et de le fermer.

Private Sub CommandButton1_Click()
Range('A1').Select
ThisWorkbook.Save
ThisWorkbook.Close
End Sub

Cordialement

Bernard

 

[excalibur]

bonjour Hugues robert bernard le forum tu peus utiliser ce code pour ton bouton Sub quitte()
If Workbooks.Count > 1 Then
ActiveWorkbook.Close
Else
Application.Quit
End If
End Sub'salutations

 

[Hugues]

Merci à tous pour l'aide.

Hugues