Excel elektronik tablosunda otomatik olarak yeniden boyutlandırma
1. Adım
"Geliştirici" sekmesine tıklayın ve VB editör penceresini açmak için "Visual Basic" e tıklayın. Yeni bir kod modülü eklemek için "Ekle" menüsüne tıklayın ve "Modül" e tıklayın.
2. Adım
Yeni bir alt yordam oluştur:
Özel Alt yeniden boyutlandırma Sayfası ()
3. adım
Uygulama nesnesinin Sol ve Üst özelliklerini kullanarak ana Excel penceresinin konumunu tanımlayın:
Application.Left = 133.75 Uygulama.Top = 7.75
4. Adım
Ana Excel penceresinin genişliğini ve yüksekliğini tanımlar:
Application.Width = 1173.75 Uygulama.Height = 884.25
Adım 5
Uygulama nesnesinin Üst ve Sol özelliklerini kullanarak Excel e-tablosunun konumunu tanımlamak için aşağıdaki kodu ekleyin:
ActiveWindow.WindowState = ActiveWindow .Top = 111.25 .Left = 19.75 ile birlikte xlNormal
6. Adım
"Genişlik" ve "Yükseklik" özelliklerini kullanarak Excel elektronik tablosu penceresinin boyutunu tanımlayın:
ActiveWindow .Width = 1010.25 .Height = 590.25 ile biten
7. adım
Prosedürü "End Sub" ile sonlandırın. Prosedürü uygulamak için "F5" e basın.