A1 Hücresindeki Formülü Öğrenme

A1 Hücresindeki Formülü Öğrenme

Kod:
Function HucredekiFormul(hucre)
If Left(hucre.Formula, 1) = "=" Then
    HucredekiFormul = Right(hucre.Formula, Len(hucre.Formula) - 1)
Else
    HucredekiFormul = ""
End If
End Function

Uygulama Adımları​


[*]Microsoft Visual Basic for Applications penceresini (Alt + F11) açın.
[*]Project - VBAProject alanının, ekranın sol tarafında görüldüğünden emin olun. Görünmüyorsa, Ctrl + R kısayolu ile hızlıca açın.
[*]Araç çubuklarından Insert -> Module yazısına tıklayın.

[*]Alt kısma eklenecek gelecek olan Module(1) yazısına çift tıklayın.
[*]Üstteki kodu yapıştırın.
 

Ekli dosyalar

Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst