dosya yolu hakkında

[algil]

Merhaba

Arama yapmama rğmen bulamadım.
Bir rapor hazırlıyorum. Bunun alt satırına dosyaya ait dosyayolunu (path)yazmak istiyorum. Yalnız makro kullanmak istemiyorum. bir örnekte aşağıdaki formülü kullanmışlar ama bende çalışmıyor. Acaba sebebi nedir?

="Path:"&CELL("filename";B71)

bu formül #VALUE! hatası veriyor.

Kolaylıklar

 

[İdris SERDAR]

Excel4'ün XLM fonksiyonlarından yararlanılabilir.

Insert/Name /Define'dan bir ad tanımlayarak örneğin "dosyayolu" veya "path" gibi bir ad girin.

Bu tanımladığınız ad aşağıdaki formüle refere etsin.

=GET.DOCUMENT(2)

Dosyayı saklayıp, tekrar açın ve herhangi bir hücreye; alan adı neyse.

Örneğin;

=Path

yazın.

Not: Örnek dosya için bakınız .... http://www.excel.web.tr/showthread.php?t=16317

 

[Recep İpek]

Benim gördüğüm kadarıyla bu şekilde bir formül yok.
(Var ise de ben görmemişimdir. )


Fonksiyonlar arasında da dosya yolunu bulan bir fonksiyona rastlamadım.

Size fikir vermesi açısından aşağıda makro ile yapılmış fonksiyonu inceleyebilirsiniz.

Tip olarak 1 yazarsanız aktif dosyanızın bulunduğu klasörü yazar.
2 yazarsanız aktif dosyanızın bulunduğu klasör ile dosyanın ismini yazar.

Function DOSYAYOLU(Tip As Variant)
On Error Resume Next
If Tip = 1 Then
DOSYAYOLU = Application.ActiveWorkbook.FullName
ElseIf Tip = 2 Then
DOSYAYOLU = Application.ActiveWorkbook.Path
Else
Exit Function
End If
End Function

 

[algil]

Sn. Yurttaş ve Ripek arkadaşım,

İlginize teşekkürler. Öncelikle makrosuz bir çözüm arıyordum. Sn. Yurttaş'ın gönderdiği formül açalışıyor fakat galiba ben eksik anlattım. Ben dosya ismiyle birlikte tam dosya yolu istiyordum. bu formülde ise sadece dosyanın bulunduğu klasörün yolu verilmektedir.

Sn. Ripek arkadaşım,

sizede çok teşekkür ediyorum. Her zaman altarnatifli çalışmak problem çözmede çok faydalı olmaktadır. Eklediğiniz dosyayı mutlaka bir yerlerde kullanacağımız bir kaynak olarak görmekteyim.

Benim verdiğim örnekte ise excelde varolan

CELL(info_type,reference)

fonksiyonudur. Bu fonksiyonda info_type yerine "address", "row", "color" ifadelerini yazdığımızda çalışıyor. fakat "filename" yazdığımızda hata veriyor. Ben burada galiba refere edemiyorum.

Teşekkürler

 

[Haluk]

Dosyanın önceden kaydedilmiş olduğundan emin olun.

İngilizce sürüm Office için bu formulün çalışmaması için bir neden yok;

="Path :" & CELL("filename";A1)

Türkçe sürümler için de muhtemelen, "filename" yerine "dosyaadı" kullanılması gerekir.

 

[İdris SERDAR]

CELL(info_type,reference)

Bu fonksiyonu verecektim ama her nedense ben bir çok makinada çalıştırdım olmadı. Bu nedenle yukarıdaki yolu önerdim.

Şimdi tanımladığınız ad aşağıdaki formüle
refere etsin. Bir de böyle deneyin.


=GET.DOCUMENT(2)&"\"&GET.DOCUMENT(68)

 

[İdris SERDAR]

Sayın Haluk,

Hem Türkçe ve hem de İngilizce sürümlerde defalarca denedim. "filename" dedim" , "dosyaadı" dedim. Tüm akla gelen varyasyonları denedim. Maallesef çalışmıyor.

Ben işin içinden çıkamadığım için işin peşini bıraktım.

 

[Recep İpek]

Sn.algil,

Dediğiniz gibi bu şekilde bir fonksiyon varmış..

Fakat bende Sn.yurttas gibi çalıştıramadım.

Sanırım son kullanma tarihi geçmiş

 

[algil]

Sn. Haluk,
Dosya kaydedilmiş durumda ama bir türlü anlayamadım. Aslında bu fonksiyonla ilgili biraz daha düşünmem lazım eksik bir şeylermi yapıyorum anlamadım.

Sn. Yurttaş
Teşekkürler format istediğim gibi oldu.

İlgilnen ve zamanını harcayan paylaşımcı beyinlere teşekkürler.

 

[zafer]

Merhaba

Sn.Haluk'un dediği gibi önce dosyayı kaydediyoruz.


Örneğin B1 hücresine (Türkçe için) yazıyoruz.
=HÜCRE("DOSYAADI";A1)

Sonuç:
C:\Documents and Settings\ks\Desktop\[a.xls]Sayfa1

 

[İdris SERDAR]

Sayın Zafer,

Zahmet olmazsa, bir örnek dosya eklermisiniz. Bir deneyeyim.

"İşin peşini bıraktım." dedim. Ama demek ki, daha bırakamamışım.

 

[zafer]

Merhaba

Rica ederim.Atlamışım eklemem lazımdı zaten...

 

[İdris SERDAR]

İşte şimdi oldu. İngilizce'de "FILENAME" olarak büyük harfle yazılacak. "filename" yazılırsa hata verir. I,İ problemi herhalde. Birde Türkçe olarak daha sonra deneyeceğim.

Kesinlikle I,İ problemi "fIlename" yazarsak çalışıyor.

Teşekkürler, Sayın zafer.

Not: İngilizce sürümde, ="Path :" & CELL("fIlename";A1) şeklinde ve
="Path :" & CELL("FILENAME";A1) şeklinde çalışıyor.

 

[Haluk]

Bu işin neden bu kadar problem olduğunu anlamadım ... :mrgreen:

Yukarıda, hem İngilizce hem de Türkçe versiyon için formulü yazmıştım. (Sağol Zafer, Türkçesini test ettiğin için.)

Zaten, bilindiği üzere İngilizce' de ı ve İ harfleri yoktur. İngilizcede, i harfinin büyüğü de I ' dır.

 

[İdris SERDAR]

Sayın Haluk,

Problem ben bugüne kadar bunu çözememiştim.
Sizin verdiğiniz formülde yer alan "filename" (küçük harf olarak vermiştiniz.) olduğunda yine çalışmıyor. Burada dikkat ederseniz bir "ı" problemi gözükmüyor.

İşin ilginç yönü, bu "i" yerine sözcüğün diğer harfleri küçük olsa bile "I" yaptığımızda veya "FILENAME" gibi tamamen büyük harf yaptığımızda çalışıyor.

Şimdi büyük bir olasılıkla Türkçe sürümde "dosyaadı"ndaki "ı" problem yaratmakta bunun yerine ya "dosyaadI" veya "DOSYAADI" yazılması gerekecek.

Biliyorum konuyu fazla uzattım.

Kusura bakmayın.

 

[zafer]

Hocam ben size teşekkür ederim.

Türkçe versiyonda filename yazıyorum(adamlar Türkçe ver. yardım dosyasına ingilizce karşılığını koymuşlar) olmuyor.

Siz söyledikten sonra jeton düştü...

"Türkçe sürümler için de muhtemelen, "filename" yerine "dosyaadı" kullanılması gerekir." demişsiniz

Muhtemelen dediğinizde benim için kesin anlamına gelir.(önceki tahmin meselesinden yola çıkarak


Edit: Sayın Yurttaş haklısınız "dosyaadI" veya DOSYAADI gibi olacak.(burada adamlar işi karıştırmışlar)

 

[Haluk]

Sayın yurttas,

Yukarıdaki ilk mesajımda yazan formulü, çalışma sayfasından kopyalayıp mesajıma yapıştırmıştım. Küçük harfle, " f i l e n a m e " şeklinde .... ve benim versiyonda çalışıyordu.

Galiba, sizin kullandığınız daha ileri bir sürüm olmasına rağmen problem çıkıyor ... tuhaf.

Konuyu ben uzattım, asıl siz benim kusuruma bakmayın ...

Edit:

Muhtemelen dediğinizde benim için kesin anlamına gelir.(önceki tahmin meselesinden yola çıkarak

Dostum zafer, kahveyi döktüm klavyenin üzerine ...

 

[zafer]

Hocam özürdilerim.

Klavyenin bozulmasına üzüldümde esas sorulara cevap vermen uzayacak diye üzülüyorum

Valla bende tam kahvemi yumumlayacaktım.Senin cevabını okuyunca ani bir refleksle hemen elimden bıraktım.

 

[İdris SERDAR]

Sayın Haluk,


Büyük geçmiş olsun!...

 

[Haluk]

Hah hah hah haaa.....

"Üstünün de üstü......" derim buna ben ...:hiho: