Dosyanın Olduğu Dizin İsmini Bulma

29 Temmuz 2021 1162

Dosyanın Olduğu Dizin İsmini Bulma isimli içerik, dosyanızın hangi klasörde kayıtlı olduğunu bulmaya yarayan kodları içermektedir.

Sub Tam_Dizin_Ismi()
    Dim ED, E
    Set ED = CreateObject("Scripting.FileSystemObject")
    E = ED.GetAbsolutePathName("")
    MsgBox E
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ı

Üstteki kodları çalıştırdıktan sonra, dosyanın olduğu klasörün tam yolu verilecektir.
Eğer dosya kayıtlı değilse, Excel'de en son hangi klasöre işlem yapıldıysa, o klasörün ismi ve yolu çıkacaktır.

Dosyanın Olduğu Dizin İsmini Bulma

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
Belirli Bir Metne Sahip Hücreleri Vurgulama
Bağlantılı Resim Ekleme
Aktif Sütuna Göre Diğer Sütunda İşlem
Sütunlardaki Farkı Renklendirme
Birleştirilmiş Hücrelerin Başlangıç Bitiş Sütununu Belirleme
Formül Bulunan Hücreleri Koruma ve Kilitleme
Excel Makroları ile Dosya Sayısını Bulma
Tüm Sütunda İşlem Yapan Döngü
ListBox Üzerindeki Verilere Çoklu Seçim Yapma
Satırı Kes Kopyala ve Yapıştır
Hangi Günde Olduğunu Bulma
Toplu Sütun Silme
Otomatik Sıra Numarası Ekleme
Birleştirilmiş Tüm Hücreleri Ayırma
Hesap Makinesini Açma
MsgBox Nesnesi ile Cevap Seçeneği Sunma
Makro ile Biçimleri Temizleme
Excel Makroları ile Form Çağırma
Makrolar ile Txt Dosya Silme
Aktif Hücreye Günün Tarihini Yazma
Son Dolu Satırın Bir Altına Yazdırma
Hücrenin Rengini Değiştirme
Excel Hücresini Seçme Makrosu
Tüm Satırda İşlem Yapan Döngü
Veri Giriş Formunu Etkinleştirme
Seçili Aralığa Ait Bilgilerin Listelenmesi
Giriş Kutusu ve Mesaj Yazma İşlemi
Sayfada Alan Seçme ve Listeleme
Alarmlı Saat Ekleme Kodu
Yanlış Yazılmış Hücreleri Vurgulama
Hücrenin Arka Plan Rengini Değiştirme
Tüm Satırları ve Sütunları Gösterme
2. Satırdaki Bilgileri Silmek
İçinde Bulunduğumuz AY Sayfasının Aktif Edilmesi
Tekrarlayan Verileri Vurgulama
ComboBox Nesneleri ile Toplama Yapma
Makro ile Dosya Açma
Excel Makro Modulü Silme Kodu
Klasörde Dosya Araması Yapma
56 Renk Kodunu Sıralama
Hoş Geldiniz Mesajı Ekleme
Açılışta İstediğiniz Sayfanın Aktif Edilmesi
Yorumları Yazdırma
X Sayı Atlayarak Satır Gizleme
A Sütunundaki Verileri C Sütununda Sıralama
Açıklama İçeren Tüm Hücreleri Vurgulama
Bilgisayardaki Sürücü Sayısını Bulma
Label Nesnesine Kayan Yazı Ekleme
Sayıyı Çift ya da Çiftin Katı Yapma
Boşluk Olan Hücreleri Renklendirme

Daha önce yorum yapılmamış!

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