Çalışma Kitabı Ekran Ayarlarını Yapma

Bu kaynak, bilgisayarın geçerli ekran çözünürlüğünü Excel içinden gösteren ve istenirse Windows ekran ayarları penceresini açan küçük bir makro dosyasıdır. Çalışma kitabının ekranda nasıl görüneceği çözünürlüğe bağlı olduğundan, ayarı kontrol etmek ve değiştirmek için pratik bir başlangıç noktası sunar.

Dosyanın içeriği​

• Sayfa1: Boş çalışma sayfasıdır; işlem tamamen makro üzerinden yürür.
• Module1: Get_Change_ScreenSize adlı makroyu ve Windows'un user32.dll kütüphanesindeki GetSystemMetrics fonksiyonunun tanımını içeren VBA modülüdür.

Makrolar​

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.
Get_Change_ScreenSize makrosu şu adımlarla çalışır:

1. GetSystemMetrics fonksiyonu ile ekranın yatay ve dikey çözünürlüğü piksel olarak okunur.
2. "Ekran ayarınız: ... X ..." biçiminde bir mesaj kutusu açılır ve "Değiştirmek istiyor musunuz?" sorusu sorulur. Kutuda Evet ve Hayır düğmeleri bulunur.
3. Evet seçilirse Shell komutuyla Windows'un görüntü ayarları penceresi (desk.cpl) açılır. Hayır seçilirse hiçbir işlem yapılmaz.

Makro dosya silme ya da dışarıya bağlantı gibi bir işlem yapmaz; yalnızca ekran bilgisini okur ve Windows'un kendi ayar penceresini çağırır. Makro, Windows ortamında çalışacak şekilde yazılmıştır.

Nasıl kullanılır​

1. Dosyayı açın ve güvenlik uyarısında makroları etkinleştirin.
2. Alt+F8 tuşlarına basın, Get_Change_ScreenSize makrosunu seçip Çalıştır'a tıklayın.
3. Mesaj kutusunda görünen çözünürlük değerini kontrol edin.
4. Ayarı değiştirmek için Evet'e tıklayın ve açılan Windows ekran ayarları penceresinden istediğiniz çözünürlüğü seçin.

Makroyu bir düğmeye veya hızlı erişim çubuğuna atayarak tek tıkla çalıştırmak da mümkündür.