Saya tau saya pernah membaca bagaimana cara merubah/mendapatkan nilai pada cell yang berisi formula. Mungkin di dalam web ini atau dalam pencarian google, tapi saya tidak dapat menemukannya lagi.
Jadi saya akan bertanya disini saja. Saya tau ini mungkin hanya sebuah kemalasan, tapi... saya akan tetap bertanya,
bagaimana cara membuat sheet hanya memiliki nilai / value saja. Jika dalam bentuk VBA akan lebih baik.
Sekian terimakasih :D
Maaf sebelumnya mas @alan13 jadi maksudnya seperti apa jelasnya ? kan sebenarnya formula dan vba itu sama saja hanya saja singkatnya vba menggunakan kalkukasi manual sedangkan formula menggunakan kalkulasi otomatis (automatic refresh).
contoh lihat perbedaan penulisan berikut:
=SUM(A1:A5) [FORMULA]
Application.WorksheetFunction.Sum(Range("A1:A5")) [VBA]
Kedua penulisan formula di atas memiliki fungsi yang sama, yakni menjumlahkan data yang ada di range A1 hingga range A5, hanya saja penempatannya yang berbeda.
=SUM(A1:A5) ditulis di lembar kerja, sementara Application.WorksheetFunction.Sum(Range("A1:A5")) ditulis di jendela Visual Basic, atau yang kita kenal dengan Macro VBA. (sehingga kolom formula akan bernilai value karena formula tertulis bukan pada kolom value melainkan di jendela VBA)
mungkin kalo ada contoh file nya bisa lebih mudah di bantu oleh rekan-rekan yang ada disini :)
saya juga baru belajar excel masih dalam bimbingan, jadi masnya bisa tanyakan saja ke salah satu rekan yang lebih paham, ada mas @Caton dan mas @Fujiansyah92
@Haidaramzy dan @Alan13 ...
Mungkin maksud mas @Alan13 adalah (misalkan pada objek Sheet1),
...
Sheet1.Cells.Copy
Sheet1.Cells.PasteSpecial xlPasteValues
Application.CutCopyMode = False
Sheet1.Range("A1").Select
...Demikian ya... ;)
Hmm, jadi seperti ini:
Misal dalam cell G2 terdapat formula SUM(A2:F2) dengan nilai penjumlahan 21, lalu ketika kita mencoba mengkopi nilai dari cell G2 maka yag terkopi adalah formula SUM(...) dan bukan 21.
Kalau masih belum jelas, bisa dilihat di Contoh.xlsx
Ya, seperti yang mas @Caton sebut, kalau dalam vba memakai code xValues akan tetapi yang ingin saya buat adalah me-replace setiap formula dalam satu sheet menjadi nilai.
Ya... itu. Copy dan PasteSpecial saja jawabannya... ;) Sudah dicoba belum? Script tersebut akan menyalin seluruh isi sel pada Sheet1 dan kemudian menempelkannya dalam bentuk Value biasa saja. Coba saja dengan Immediate Window... Buka file yang mas @Alan13 lampirkan di atas, kemudian buka VBE (ALT + F11), tampilkan Immediate Window (CONTROL + G), lalu paste script berikut:
ActiveSheet.Cells.Copy:ActiveSheet.Cells.PasteSpecial xlPasteValues: Application.CutCopyMode = False: ActiveSheet.Range("A1").Selectdalam satu baris seperti gambar berikut:
lalu tekan tombol ENTER... Silahkan lihat hasilnya.
Btw, saya sudah sering menggunakan script tersebut untuk membuat backup sheet tanpa formula. Dasarnya itu, namun bisa dikembangkan misalnya hanya pada baris atau kolom saja, atau pada range tertentu saja.
Berhasil mas @Caton . Terimakasih.