Comment redimensionner automatiquement dans une feuille de calcul Excel
Étape 1
Cliquez sur l'onglet "Développeur", puis sur "Visual Basic" pour ouvrir la fenêtre de l'éditeur VB. Cliquez sur le menu "Insérer" et cliquez sur "Module" pour ajouter un nouveau module de code.
Étape 2
Créer une nouvelle sous procédure:
Private Sub resizeSheet ()
Étape 3
Définissez l'emplacement de la fenêtre Excel principale à l'aide des propriétés Left et Top de l'objet d'application:
Application.Left = 133.75 Application.Top = 7.75
Étape 4
Définit la largeur et la hauteur de la fenêtre principale Excel:
Application.Width = 1173.75 Application.Height = 884.25
Étape 5
Ajoutez le code suivant pour définir l'emplacement de la feuille de calcul Excel à l'aide des propriétés Top et Left de l'objet d'application:
ActiveWindow.WindowState = xlNormal With ActiveWindow .Top = 111.25 .Left = 19.75 Terminer avec
Étape 6
Définissez la taille de la fenêtre de la feuille de calcul Excel à l'aide des propriétés "Largeur" et "Hauteur":
Avec ActiveWindow .Width = 1010.25 .Hauteur = 590.25 Terminer avec
Étape 7
Terminez la procédure avec "End Sub". Appuyez sur "F5" pour exécuter la procédure.