makroda path belirtme

Katılım
27 Temmuz 2016
Mesajlar
18
Excel Vers. ve Dili
excel 2010
Merhabalar,

Network üzerindeki ortak alanda a.xlsm excelinden b.xlsm exceline veri aktarabilmek için a.xlsm exceline yazdığım bir makroda

Workbooks.Open Filename:=ThisWorkbook.Path &"\b.xlsm" ' path of b. xlsm

yapısını kullandım fakat bu makro a ve b excelleri aynı klasör içindeyken çalışıyor.

Benim b.xlsm excelimin olduğu klasör içinde A isimli bir klasör var ve a.xlsm excelim bu klasörün içinde.

Bu durumda içeriği b.xlsm'e aktarabilmek için path te nasıl bir değişiklik yapmalıyım?

İyi çalışmalar
 

Necdet

Moderatör
Yönetici
Katılım
4 Haziran 2005
Mesajlar
15,372
Excel Vers. ve Dili
Ofis 365 Türkçe
Merhaba,

Yolu biliyorsanız doğrudan yazın.

"\\abc\def\b.xlsm" gibi
 
Katılım
27 Temmuz 2016
Mesajlar
18
Excel Vers. ve Dili
excel 2010
Merhaba,

Yolu biliyorsanız doğrudan yazın.

"\\abc\def\b.xlsm" gibi
Necdet Bey merhabalar tekrar,

Dosyanın taşınabilir olması açısından net bir dosya yolu belirtmek yerine dosya veya dizinler üzerinden path belirtebilmemiz mümkün müdür?

Örneğin; bir alt dizin, iki üst dizin gibi..

Teşekkürler, iyi çalışmalar
 
Katılım
27 Temmuz 2016
Mesajlar
18
Excel Vers. ve Dili
excel 2010
Sorun ile ilgili fikri olan başka birileri var mıdır acaba ??

Yardımcı olursanız çok sevinirim
 

Necdet

Moderatör
Yönetici
Katılım
4 Haziran 2005
Mesajlar
15,372
Excel Vers. ve Dili
Ofis 365 Türkçe
Merhaba,

İsteğinizin çok mantıklı olacağını sanmıyorum ama aşağıdaki kodlarla istediğiniz Yol'u belirleyebilirsiniz.

Kod:
Sub Yol_Bul()
 
    Dim Klasor  As Object, _
        Yol     As String
    
    Set Klasor = CreateObject("Shell.Application").BrowseForFolder(0, "Lütfen bir klasor seçin !", 1)
    If Klasor Is Nothing Then Exit Sub
    Yol = Klasor.self.Path
    MsgBox Yol
    
    Set Klasor = Nothing
    
End Sub
 
Katılım
27 Temmuz 2016
Mesajlar
18
Excel Vers. ve Dili
excel 2010
Necdet Bey öncelikle teşekkür ederim, istediğim şey tam olarak

Workbooks.Open Filename:=ThisWorkbook.Path &"\b.xlsm"

gibi bir yapı. Bu yapıda belirgin bir path yok. makronun tanımlı olduğu a workbookunun mevcut path değerini kullanıyor.

Ben de istiyorum ki yine ThisWorkbook.Path &"\b.xlsm" yapısına benzer ama makronun tanımlı olduğu a workbookunun bulunduğu dizinin bir üst dizinindeki c.xlsm workbook'unu gösteren bir yapı olsun.

Böylece kullanıcı klasörleri nereye taşırsa taşısın makro içeriklerine müdehale etmek zorunda kalmayacak.

Sanıyorum yazdığınız makroda yine belirgin bir dosya yolu girilmek zorunda. Buna gerek kalmadan, bahsettiğim şekilde bir tanım yapabilmemiz mümkün müdür?

Umarım izah edebilmişimdir, yardımcı olabilirseniz çok sevinirim

İyi çalışmalar
 
Katılım
9 Eylül 2010
Mesajlar
867
Excel Vers. ve Dili
2016&2019&2021 TR
Altın Üyelik Bitiş Tarihi
29-09-2023
Konuyu hortlatmis olacağım ama çözümü varsa bana lazım. Değerli hocalarim cevap bekliyorum olabilir ya da mkun değil gibi.
 

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
42,247
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Linki inceleyiniz.

 
Üst