Hücrelerde Formüllerin başına = işareti Koymak

[Cumas]

İyi Günler
Herkese İyi Bayramlar.
B sütununda 1000'den fazla Formül metni var. Bunların başında = işareti yok. Formüllerin hepsi de farklı.
Şöyle: B sütununda buna benzer metinler var ve bunların başına = koyarak formül yapmak istiyorum. Hepsi 1000 satırdan fazla. Nasıl yaparım?
'ADFRE_2265432_2023_12.xls'!D24
'CSDTT_1200561_2023_12.xls'!D24
'BBAAR_289023_2023_12.xls'!D24
İlgilenenlere şimdiden teşekkür ederim ve kolaylıklar dilerim.

 

[NADİR YILDIZ]

=BİRLEŞTİR("=";PARÇAAL(B1;2;100))

 

[Cumas]

Teşekkür ederim
Bu şekilde bende biliyorum. Bu şekilde ekledim ekledikten sonra Kopyala-Değer Yapıştır yapıyorum ve formülün bu yeni hali (Başında = işareti varken çalışmıyor. Çalışmıyor yani sonuç üretmiyor. Hücrede bir metin gibi duruyor

 

[Tevfik_Kursun]

Merhaba,
Deneyiniz ...
'ADFRE_2265432_2023_12.xls'!D24 ifadesi tek hücreyi gösteriyor. Diyelim bu ifade A1 de B1 e =DOLAYLI(A1) yazdığınızda o sayfadaki<d24 hüresinde yazılı olan gelecektir..
İyi çalışmalar

 

[Cumas]

Merhaba,
Deneyiniz ...
'ADFRE_2265432_2023_12.xls'!D24 ifadesi tek hücreyi gösteriyor. Diyelim bu ifade A1 de B1 e =DOLAYLI(A1) yazdığınızda o sayfadaki<d24 hüresinde yazılı olan gelecektir..
İyi çalışmalar

Tevfik Bey ilginiz ve emeğiniz için teşekkür ederim.
Yazdığınızı anlamadığım için deneyemedim.
Bir zahmet basit bir excel dosyası yapıp yükleyebilir misiniz.
Kolay gelsin

 

[Tevfik_Kursun]

Sarı renkli hücredekini değiştiriniz

 

[Cumas]

Sarı renkli hücredekini değiştiriniz

Tevfik Bey teşekkür ederim.

 

[Tevfik_Kursun]

Rica ederim

 

[ÖmerBey]

'ADFRE_2265432_2023_12.xls'!D24
'CSDTT_1200561_2023_12.xls'!D24
'BBAAR_289023_2023_12.xls'!D24

Merhaba,
Verilerinizin hepsi bu formatta ise aşağıdaki kodu deneyiniz.

Sub kod()
s = Cells(Rows.Count, "B").End(3).Row
On Error Resume Next
For a = 2 To s
    If Not Cells(a, "B").HasFormula And Cells(a, "B") <> "" Then
        Cells(a, "B").NumberFormat = "General"
        Cells(a, "B").Formula = "='" & Cells(a, "B").Value
    End If
Next
End Sub

 

[Cumas]

Teşekkür ederim Ömer Bey,
Halletmiştik zaten
Yinede denedim olmadı. Gerek kalmadı