Sürücü Adı Kontrolü Yapma

27 Temmuz 2021 921

Sürücü Adı Kontrolü Yapma içeriğinde, bilgisayarınızda bulunan sürücüler arasında yazdığınız harfe atanmış sürücü olup olmadığını kontrol eden kod vardır.

Sub Surucu_Ara()
    Set ED = CreateObject("Scripting.FileSystemObject")
    E = ED.DriveExists("Ğ:\")
    If E = True Then
        MsgBox "Bu isimde bir sürücü var"
    Else
        MsgBox "Bu isimde bir sürücü yok"
    End If
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ı

Sürücü Adı Kontrolü Yapma

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
Hücre Aralığını Görüntüye Dönüştürme
Formül Bulunan Hücreleri Koruma ve Kilitleme
Tam Dizin İsmini Bulma
Verileri Birden Çok Sütuna Göre Sıralama
Excel Makroları ile Dosya Sayısını Bulma
Çalışma Kitabındaki Tüm Pivot Tabloları Yenileme
Yardım Menüsünü Açma
Checkbox ile Exceli Kapatıp Açmak
Sütunlardaki Farkı Renklendirme
MsgBox Nesnesi ile Cevap Seçeneği Sunma
Aralıklı Olarak Satır Silme
Kopyala ve Özel Yapıştır
56 Renk Kodunu Sıralama
Bir Dizeden Sayısal Veriler Elde Etme
ListBbox ve ComboBox Satır Kaydırma
Sayıların Önündeki Tek Tırnak İşaretini Kaldırma
Hücredeki Değer Boşsa Kayıt Gerçekleşmesin
Sendkey Yöntemi ile F Q Klavye Dönüşümü
Satırı Kes Kopyala ve Yapıştır
Disk Sürücü Kapasitesini Gösterme
İçinde Bulunduğumuz AY Sayfasının Aktif Edilmesi
Excel Hücrelerini Çözme
Kaydedilmemiş Açık Çalışma Kitaplarını Sayma
UserForm Nesnesine Otomatik Buton Ekleme
Ad Yöneticisindeki Tüm Adları Görünür Yapmak
UserForm Açılırken Efekt Ekleme
Bir Değeri Renklendirme
Hücrenin Rengini Değiştirme
Çalışma Sayfalarını Ayrı PDF Olarak Kaydetme
İlk ve Son Hücre Arasındaki Satır Sayısı
Excel Makroları ile Dosya Taşıma
Seri Numaralarını Ekleme
Transparan UserForm Oluşturmak
UserForm Kapatma Kodu
Toplu Sütun Silme
56 Koşula Kadar Biçimlendirme Yapma
Yazı Efekti Verme Kodu
Makro ile Boş Satırları Silme
Çalışma Sayfalarını Tek Adımda Korumasını Kaldırma
Hücredeki Değer Sıfırdan Büyükse İşlem Yapma
Makro ile Açılan Liste Oluşturma
Boş Hücreleri Vurgulama
Kullanılan Tüm Sütunları Otomatik Sığdır
Excel Şerit Menü Çubuğunu Gizleme
Son Dolu Satırı Başka Sayfaya Kopyala
Birden Çok Çalışma Sayfası Ekleme
Açılışta İstediğiniz Sayfanın Aktif Edilmesi
Açılışta Üç Kere Şifre Hakkı Vermek
Hücrede Değişiklik Olduğunda Makroyu Çalıştırma
Program Başlangıcı Kodları

Daha önce yorum yapılmamış!

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