trik mengatasi excel untuk penulisan 16 digit

Ketika mengetik di Microsoft Excel saya pernah kesulitan memasukkan Nomor Induk Pegawai yang panjang karakternya lebih dari 15 digit. Setiap teks atau nilai yang lebih dari 15 digit dalam satu cell maka kelebihannya akan dibulatkan menjadi angka nol,
Untuk mengakalinya saya lakukan langkah-langkah dibawah ini :
1. Klik kanan lalu pilih format cell tersebut sebagai Text,
2. Lalu klik cell yang dimaksud
3.Pencet Alt - F8
3. Creat dan jalankan skrip Macro dibawah ini :

Sub AddOne()
Dim vTemp1 As Variant
Dim vTemp2 As Variant
vTemp1 = CDec(ActiveCell.Value)
vTemp2 = vTemp1 + 1
ActiveCell.NumberFormat = "@"
ActiveCell.Value = CStr(vTemp2)
End Sub

Pencet run (seperti icon play)
kalau langkahnya benar, maka kita bisa memasukkan angka 16 digit dengan benar tanpa pembulatan

Semoga berhasi

Sumber http://www.forumbebas.com/thread-163681.html