• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Makro ile aynı klasördeki dosyaları açma problemi

  • Konbuyu başlatan Konbuyu başlatan ahuvan
  • Başlangıç tarihi Başlangıç tarihi
Katılım
3 Haziran 2007
Mesajlar
10
Excel Vers. ve Dili
2003 Türkçe
Ana çalışma sayfasındaki belli hücrelerde farklı doya isimleri yazılı. Flash belleğimdeki aynı klasörde bulunan bu dosyalardan sadece mevcut olanları açmak istiyorum. ben sadece ilk dosyayı açabildim ya da ilk bulamadığı dosyada takılıp kaldığı için mevcut olan dosyalar da açılmadı. Yardımlarınızı bekliyorum.

Kod:
Workbooks.Open (ActiveWorkbook.Path & "\" & Range("G3").Value)
    Workbooks.Open (ActiveWorkbook.Path & "\" & Range("I3").Value)
    Workbooks.Open (ActiveWorkbook.Path & "\" & Range("K3").Value)
    Workbooks.Open (ActiveWorkbook.Path & "\" & Range("M3").Value)
    Workbooks.Open (ActiveWorkbook.Path & "\" & Range("O3").Value)
    Workbooks.Open (ActiveWorkbook.Path & "\" & Range("Q3").Value)
    Workbooks.Open (ActiveWorkbook.Path & "\" & Range("S3").Value)
    Workbooks.Open (ActiveWorkbook.Path & "\" & Range("U3").Value)
    Workbooks.Open (ActiveWorkbook.Path & "\" & Range("W3").Value)
    Workbooks.Open (ActiveWorkbook.Path & "\" & Range("Y3").Value)
    Workbooks.Open (ActiveWorkbook.Path & "\" & Range("AA3").Value)
    Workbooks.Open (ActiveWorkbook.Path & "\" & Range("AC3").Value)
 
Geri
Üst