Cara mengubah ukuran secara otomatis dalam spreadsheet Excel

Anda dapat menggunakan Visual Basic for Applications (VBA) untuk mengotomatisasi proses di Excel.

Langkah 1

Klik pada tab "Pengembang" dan klik "Visual Basic" untuk membuka jendela editor VB. Klik pada menu "Sisipkan" dan klik "Modul" untuk menambahkan modul kode baru.

Langkah 2

Buat prosedur sub baru:

Private Sub resizeSheet ()

Langkah 3

Tentukan lokasi jendela utama Excel menggunakan properti Kiri dan Atas dari objek aplikasi:

Application.Left = 133.75 Application.Top = 7.75

Langkah 4

Menentukan lebar dan tinggi jendela utama Excel:

Application.Width = 1173.75 Application.Height = 884.25

Langkah 5

Tambahkan kode berikut untuk menentukan lokasi spreadsheet Excel, menggunakan properti Atas dan Kiri dari objek aplikasi:

ActiveWindow.WindowState = xlNormal Dengan ActiveWindow .Top = 111.25 .Left = 19.75 Berakhir Dengan

Langkah 6

Tentukan ukuran jendela spreadsheet Excel menggunakan properti "Lebar" dan "Tinggi":

Dengan ActiveWindow .Width = 1010.25 .Height = 590.25 Akhiri Dengan

Langkah 7

Akhiri prosedur dengan "End Sub". Tekan "F5" untuk menjalankan prosedur.