Cara Merubah Formula Menjadi Text atau sebaliknya

Didalam MS Excel banyak sekali rumus atau Formula untuk memudahkan dan membantu pekerjaan kita. Sehingga didalam Lembar kerja Excel kita sering kali menggunakan bermacam-macam rumus. Tetapi rumus atau Formula ini hanya akan terlihat dalam Formula Bar atau kolom Formula.

Untuk keperluan tertentu mungkin kita ingin melihat penulisan dari Formula yang telah kita buat secara keseluruhan. untungnya Excel sudah menyediakan sebuah Menu untuk Melihat Formula yang ada di setiap Cell dan menyembunyikan hasil kalkulasinya melalu Menu Show Formulas

Tapi melalui menu tersebut kita hanya bisa melihat penulisan Formula pada setiap cell saja. Bagaimana jika kita ingin merubah Formula Tersebut menjadi sebuah Text biasa

Merubah Formula Menjadi Text Biasa (String)

Untuk merubah Formula menjadi text Excel juga sudah menyediakan Formula untuk melakukan itu, yaitu dengan rumus FORMULATEXT

 Sintaksis 
=FORMULATEXT(reference)

Reference diisi dengan Referensi ke satu sel atau rentang sel.

catatan.
FORMULATEXT mulai hadir di Excel 2013, jadi bagi yang masih menggunakan Excel dibawah 2013 bisa menggunakan cara dibawah ini.

Rumus FormulaText juga bisa digunakan di Google Spreadsheet

Formulatext untuk Excel dibawah Excel 2013

Bagi yang masih menggunakan Excel dibawah Excel 2013. FormulaText memang belum ada sehingga kita perlu membuatnya sendiri dengan bantuan macro atau VBA. Untuk macronya sangat gampang silahkan copykan script dibawah ke Module di VBE

 Visual Basic Editor 
Function Formulatext(x As Range) As String
Formulatext = x.Formula
End Function

untuk cara penggunaanya sama seperti Formula Text pada Excel 2013

Merubah Text Menjadi Formula (Kebalikan FORMULATEXT)

Jika sebelumya merubah Formula menjadi Text, sekarang kebalikanya merubak text menjadi formula. Untuk melakukan ini ada dua cara.

a. Dengan Excel4Macro

Excel4Macro berbeda dengan VBA. penggunaanya hampir mirip dengan Formula biasa tetapi kita akan memanfaatkan Excel4 Macro atau XLM. macro ini bisa kita gunakan melalui Name Manager

Caranya buat name maneger baru berinama misalkan Eval dan pada Refers isi dengan =Evaluate(Sheet1!$B3). untuk penggunaanya cukup di C2 isi dengan =Eval . Untuk lebih jelasnya bisa dilihat digambar dibawah ini

B. Dengan Exel VBA (UDF)

cara kedua untuk merubah Text Menjadi Formula ada dengan memanfaatkan VBA Excel. Untuk scriptnya sama seperti dengan Excel4Macro yaitu Menggunakan Evaluate. silahkan copy script ke Modul di VBE

 Visual Basic Editor 
Function Eval(Ref As String)
    Eval = Evaluate(Ref)
End Function

Cara penggunaanya hanya tambah reference contohnya =Eval(B2)

Be the first to comment

Leave a Reply

Your email address will not be published.


*