Excel Makroları ile İşlemci Bilgilerini Bulma
26 Aralık 2020
27 Aralık 2020
692
Excel Makroları ile İşlemci Bilgilerini Bulma isimli kod, bilgisayarınızın işlemci bilgilerinizi bir MsgBox nesnesinde size gösterme işlevi görmektedir.
Option Explicit
Sub ProcessorSpeed()
Dim objWMI As Object
Dim Cpu As Object
Set objWMI = GetObject("WinMgmts:").instancesOf("Win32_Processor")
For Each Cpu In objWMI
MsgBox Cpu.Name & "" & Cpu.CurrentClockSpeed & "Mhz", vbInformation
Next
Set objWMI = Nothing
End SubGerekli Adımlar
Kodu çalıştırmanız için aşağıdaki adımları yerine getirmeniz gerekir.
- Microsoft Visual Basic for Applications penceresini (Alt + F11) açın.
- Project - VBAProject alanının, ekranın sol tarafında görüldüğünden emin olun. Görünmüyorsa, Ctrl + R kısayolu ile hızlıca açın.
- Araç çubuklarından Insert -> Module yazısına tıklayın.
- Solunda klasör simgesi olan Modules yazısının başındaki + simgesine tıklayın.
- Alt kısma eklenecek gelecek olan Module(1) yazısına çift tıklayın.
- Üstteki kodu yapıştırın.
Kod Açıklaması
Kodu Modules içine ekleyip, çalıştırdıktan sonra MsgBox nesnesine bilgisayarınızın işlemci bilgileri gelecektir.
Etiketler :
| YARARLI KISAYOLLAR | |
|---|---|
| Kaydet / Alternatif | Shift F12 |
| Kılavuz Çizgilerini Gizleme Gösterme | Alt P Ç |
| Satır/Sütun/Hücre Ekleme | Ctrl + |
| Üstteki Veriyi Kopyalama | Ctrl D |
| Satır/Sütun/Hücre Silme | Ctrl - |