Açık olan dosyanın bulunduğu yeri öğrenmek

[tamer42]

Merhabalar;

Açık durumdaki (aktif) dosyanın bulunduğu yeri tam olarak bir kodla hücre içerisine nasıl yazdırabilirim.

Ã?rn:

"C:\Documents and Settings\My Documents\Proje"

şeklinde verecek,

Herkese İyi çalışmalar dilerim.

 

[Hüseyin]

A1 hücresine yazdırmak için;

Sub dizin()
[A1] = ActiveWorkbook.Path
End Sub