Soru formülle tarihleri otomatik yerleştirme

[incsoft]

=EĞERHATA(EĞER(BUGÜN()>=$B$1+SÜTUN()-2;DOLAYLI("'[2020-01--T.xlsm]"&A3&"'!$N$3");"");"")

='\\DS1\orsortak\DT\BELGELER\Yazılım\üretimMik\2020Yılı\TPARORU\[2020-01--T.xlsm]1'!$N$3

Yukarıdaki ile aşağıdaki formül aynı görevi görmekte arkadaşlar ancak yukarıdakinin değeri göstermesi için her halukarda karşı dosyanın açık olması gerekmektedir. Aşağıdakinde böyle bir zorunluluk bulunmuyor ancak aşağıdaki formülü yaklaşık 1000-2000 farklı hücrede uygulayacağım için tek tek yukarıdaki gibi hücre değiştirmelerinde otomatik olarak değişmesini sağlayamıyorum. Aşağıdaki şekilde benim istediğim 2020-01--T.xlsm yazan kısımda 2020 kısmına otomatik olarak yılı , -01 kısmına otomatik olarak ayı , 1' kısmına ise mesela =GÜN(P1) formülünü getirtebilme imkanımız varmıdır? O zaman N$3 , N$4 , M$3 , AN$3 vb.. değişkenleri 1 defaya mahsus kendim ayarlarım.

='\\DS1\orsortak\DT\BELGELER\Yazılım\üretimMik\2020Yılı\TPARORU\ kısmı standart

[2020-01--T.xlsm] kısmındaki 2020 kısmı dediğim gibi formülle yıl , -01 formülle ay --T.xlsm standart...

 

[Ömer]

Merhaba,

Örnek;
A1 hücresine eski değeri yazın:
[2020-01--T.xlsm]1

A2 hücresine yeni değeri yazın:
[2024-02--T.xlsm]5

gibi.

Daha sonra aşağıdaki kodları çalıştırırsanız. [C: D] arasındaki değerler istediğiniz gibi değişir.

Sub Degistir()
    [C:D].Replace [A1], [A2]
End Sub

.