Adapter a toutes tailles d'écran?

Bonjour,

Est il possible dans Excel d'adapter la feuille de mon programme Range("A1:AE27") a toutes tailles d'écran petits ou grands, large ou étroits?

ShrinkToFit et ExpandToFit ? ça existe?

Merci,

Daniel

Bonjour,

Macro à mettre dans le module ThisWorkbook

Private Sub Workbook_Open()
Dim i%
For i = 1 To Worksheets.Count
Worksheets(i).Activate
   Range("A1:AE27").Select
   ActiveWindow.Zoom = True
Next
End Sub

A+

Hello

Code Parfait. Grand merci.

Autre question.

je développe un programme Sudoku.

Je souhaiterais savoir si dans Excel VBA, je pourrais copier et agrandir 9 cells vers la droite de mon écran pour permettre a l'utilisateur d'effacer 1 ou plusieurs cells qui ne peuvent pas être prétendante a une sélection successful.

Possible?

Merci,

Daniel

Bonjour,

Je ne comprends pas. Reformuler la question SVP

Peut-être :

   Range("A1:AN27").Select
   ActiveWindow.Zoom = True

A+

Je m'excuse de ne pas être clair mais en fait pour faire ce que je veux, je vais créer des cells a droite de ma feuille, y copier le contenu des 9 cells du Sudoku et dans ces cells copiées le joueur pourra effacer les cells qu'il veut.

Si je ne fais pas ça, en cliquant sur une cell pour l'effacer il ferait une merge des cells.

Il faudrait que vous voyez mon programme pour comprendre.

Pas de problèmes, je vais développer ceci au dessus. Je n'ai pas besoin d'aide. Zoomer n'est pas une solution dans ce cas là.

merci,

Cordialement,

Sympa de répondre.

Daniel