Come ridimensionare automaticamente in un foglio di calcolo di Excel

Passaggio 1

Fare clic sulla scheda "Sviluppatore" e fare clic su "Visual Basic" per aprire la finestra dell'editor VB. Fare clic sul menu "Inserisci" e fare clic su "Modulo" per aggiungere un nuovo modulo di codice.

Passaggio 2

Crea una nuova sottoprocedura:

Private Sub resizeSheet ()

Passaggio 3

Definire la posizione della finestra principale di Excel utilizzando le proprietà Left e Top dell'oggetto dell'applicazione:

Application.Left = 133, 75 Application.Top = 7, 75

Passaggio 4

Definisce la larghezza e l'altezza della finestra principale di Excel:

Application.Width = 1173, 75 Application.Height = 884.25

Passaggio 5

Aggiungere il codice seguente per definire il percorso del foglio di calcolo di Excel, utilizzando le proprietà Top e Left dell'oggetto dell'applicazione:

ActiveWindow.WindowState = xlNormal con ActiveWindow .Top = 111.25 .Left = 19.75 Fine con

Passaggio 6

Definire la dimensione della finestra del foglio di calcolo di Excel utilizzando le proprietà "Larghezza" e "Altezza":

Con ActiveWindow .Width = 1010.25. Altezza = 590, 25 Fine con

Passaggio 7

Terminare la procedura con "End Sub". Premere "F5" per eseguire la procedura.