Bilgisayardaki Sürücü İsimlerini Listeleme

29 Temmuz 2021 1131

Bilgisayardaki Sürücü İsimlerini Listeleme isimli içerikte, Excel VBA yöntemi ile sürücülerin isimlerinin listelenmesini öğreten bir kod yer almaktadır.

Sub Surucu_Isimleri()
    Dim ED, E, D
    Set ED = CreateObject("Scripting.FileSystemObject")
    Set E = ED.Drives
    For Each sürücü In E
        D = D & vbCrLf & sürücü
    Next
    MsgBox D
End Sub

Gerekli Adımlar

Kodu çalıştırmanız için aşağıdaki adımları yerine getirmeniz gerekir.

  1. Microsoft Visual Basic for Applications penceresini (Alt + F11) açın.
  2. 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.
  3. Araç çubuklarından Insert -> Module yazısına tıklayın.
  4. Solunda klasör simgesi olan Modules yazısının başındaki + simgesine tıklayın.
  5. Alt kısma eklenecek gelecek olan Module(1) yazısına çift tıklayın.
  6. Üstteki kodu yapıştırın.

Kod Açıklaması

Bilgisayardaki Sürücü İsimlerini Listeleme

Kodu çalıştırdığımızda, üst resimde göreceğiniz şekilde bir MsgBox nesnesinde sürücü isimleri listelenecektir.

Hazır Dosyayı İndir

Dosyayı indirmek için giriş yapmanız ve VIP Üyelik Paketine sahip olmanız gerekir.
50 Farklı Hazır Makro (VBA) Kodu
Aktif Çalışma Sayfasını Koruma
Satırı Kes Kopyala ve Yapıştır
Çoklu Bulma ve Karşısındaki Değeri Listeleme
Yorumları Yazdırma
Grafik Türünü Değiştirme
Hücredeki Değişikliklerin Kaydını Tutma
Bir sayfadaki Veriyi Diğer Sayfaya Aktarma
Salt Okunur Excel Dosyasını Kontrol Etme
Ondalık Sayıları Tam Sayıya Çevirme
Seçili Hücrelerdeki Harfleri Büyük Harfe Değiştirme
Bir Dizeden Sayısal Veriler Elde Etme
Veri Giriş Formunu Etkinleştirme
Hücre Aralığını Görüntüye Dönüştürme
Her Bir Sütundaki Maksimum Değeri Bulma
Makrolar ile Klasör Oluşturma
Sütun Genişliğini Ayarla
Makro ile Açılan Liste Oluşturma
TextBox Nesnelerinin Arasında Boşluk Bırakma
Metin Sarmayı Kaldırma
Excel Makroları İle Not Defterini Açmak
Tüm Çalışma Sayfalarını Tek Adımda Koruma
Kullanıcı Adınızı Bulma
Klavyeye Makro Atama ve Çalıştırma
Excel Hücresine Gitme Makrosu
İlk ve Son Hücre Arasındaki Satır Sayısı
Bir Aralığa Alfabenin Harflerini Ekleme
UserForm Nesnesine Otomatik Buton Ekleme
Excel Seçenekleri Penceresini Açma
56 Koşula Kadar Biçimlendirme Yapma
Çalışma Kitabının Yedeğini Oluşturma
Aktif Hücreye Açıklama Ekleme
ListBox Üzerindeki Verilere Çoklu Seçim Yapma
UserForm Üzerinde Dört İşlem
Açılışta UserForm Nesnesinin Otomatik Gösterilmesi
Çalışma Kitabını Kapatırken Otomatik Kaydetme
Aktif Hücreye Günün Tarihini Yazma
Toplu Satır Silme
Son Satır Numarasını Bulma
Makro ile Klasör Açma
Sayfadaki Kelime ve Sayı Adetlerini Bulma
Belirli Kriterlere Sahip Satırları Silme
Tekrar Eden Verileri Farklı Sütunda Yazma
Kapanış Mesajı Ekleme
Açılışta Üç Kere Şifre Hakkı Vermek
Tarih ve Saatten Tarihi Kaldırma
Sayıyı Çift ya da Çiftin Katı Yapma
Otomatik Sıra Numarası Ekleme
Sütunlardaki Farkı Renklendirme
56 Renk Kodunu Sıralama
Negatif Sayıları Vurgulama

Daha önce yorum yapılmamış!

Backlink Reklam Bu alanda 50 karakterlik açıklama ile web sitenize ait Backlink Reklam yayınlayabilirsiniz.
Yükleniyor...