Dear Syam.

Mudah-mudahan dengan file lampiran bisa membantu.

File lampiran terdapat module untuk fungsi GetFormula.

'=======================================
Public Function GetFormula(Cell As Range) As String
   GetFormula = Cell.Formula
End Function
'=======================================

dengan formula berikut, bisa mendapatkan formula tanpa tanda "sama dengan"
(=)

=REPLACE((GetFormula(A1)),1,1,"")

Semoga Membantu.
Mungkin ada solusi lain dari teman-teman Be Exceler

Salam

Fano The Miner.

2012/3/14 Sam Mun <[email protected]>

> **
>
>
> Teman2
>
> mohon bantuannya bagaimana meng-copas formula yang ada dalam satu cell ke
> cell lainnya dengan hasil formula juga (bukan results)
>
> contoh :
>
>  cell a1 berisi formula =2+3. Formula ini akan dicopas special ke cell b1
> dengan hasil BUKAN angka 5 tapi tampilan =2+3 atau 2+3 (tanpa tanda =)
>
> Terima kasih atas bantuannya
>
> syam
>
>  
>

Attachment: GetFormula.xlsm
Description: Binary data

Kirim email ke