Aşağıdaki makroyu kullanabilirsiniz. Ancak bu makroyu kullanmadan önce b1 ve b2 olan kaynak dosya adlarını daha uzun birer ad ile değiştirin. Çünkü b1 ve b2 ifadeleri aynı zamanda hücre adı olduğundan karışıklığa sebep olabilir. Ben dosya adlarını örnek olsun diye DOSYA1 ve DOSYA2 olarak değiştirdim.
Kod:
Sub degistir()
Cells.Replace What:="DOSYA1", Replacement:="DOSYA2"
End Sub
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.