dosya yolunu yazmadan güncelleme yapılabilir mi?

[lifeislie]

herkese iyi günler ,
arama yaptım ama bulamadım..
bir klasörde birbiriyle bağlantılı excel dosyalarım var tek bir yerden diğerlerine veri aktarıp güncelleme yapıyorum.
Ancak klasor halinde flash bellekle taşıyıp başka bilgisayarlarda çalışmam gerektiginde kodlarıda değiştirmem gerekiyor.

Sub guncelle()
ChDir "C:\Users\inayet\Desktop\deneme"
Workbooks.Open Filename:="C:\Users\inayet\Desktop\deneme\2.xls", UpdateLinks:=0

deneme klasöründeki 2.xls dosyasını kırmızı ile belirttiğim kodları değiştirmeye gerek kalmadan başka bilgisayarlarda veya dizinlerde çalıştırabilecek bir kod var mı?

birde "UpdateLinks:=0" kodunda "0" ın manası nedir? 1,2,3 olarak değiştirirsek e olur ?

Saygılarımla

 

[ozgretmen]

ThisWorkBook.Path() kodunu dener misiniz ?

 

[uzmanamele]

merhaba

aşağıdaki linki inceleyiniz, aynı yöntemi kullanabilirsiniz

http://www.excel.web.tr/f48/cozuldu-usb-bellegimin-tak-l-oldugu-surucu-harfi-t56080.html

 

[lifeislie]

Workbooks.Open Filename:=ThisWorkbook.Path
Activate.Workbook UpdateLinks:=0
ActiveWorkbook.Save
ActiveWindow.Close

yazdıgımda hata veriyor...