Taille du classeur adaptée à l'UserForm

[kuja777]

Bonjour,

Le code

Me.Height = Application.Height /Me.Width = Application.Width

permet de tailler l'USF à l'échelle du classeur Excel.

Existe-t-il la fonction inverse, à savoir configurer la taille de mon classeur à celle de mon USF, dans le style

Workbooks("Classeur1").Height = UserForm1.Height

?

Dans l'idéal, cela ne parametrerait que le classeur nommé et non l'application?

Malgré mes recherches, je ne trouve pas de solution.

A défaut, j'avais tenté de cacher mon classeur ou de masquer mes feuilles, mais une fois caché/masqué, mon UserForm ne parvient plus à récupérer ni à envoyer les informations sur les feuilles masquées. Y a-t- il une façon de permettre au VBA de modifier les feuilles cachées?

Merci d'avance et bonne journée à tous.

 

[job75]

Re : Taille du classeur adaptée à l'UserForm

Re,

Rectification au 2) de mon post précédent :

on ne peut pas manipuler la fenêtre Excel tant que l'USF est affiché. On peut donc utiliser :

Private Sub UserForm_QueryClose(cancel As Integer, closemode As Integer)
[COLOR="Red"]Me.Hide[/COLOR]
Agrandir
End Sub

Voir le fichier (3). On peut le tester maintenant sans le télécharger sur le bureau.

A+