Cara Menambahkan Tanda Kutip ( ‘ ) Untuk Angka Pada Microsoft Excel

Berikut langkah-langkah untuk menyisipkan tanda petik (‘) untuk angka pada Microsoft Excel.

1. Buka dokumen Microsoft  Excel dengan menambahkan cell-cell atau kolom yang berisikan angka-angka, yang akan kita sisipkan tanda kutipnya. Perhatikan gambar berikut ini.

2. Tekan tombol Alt & F11 secara bersamaan, maka akan muncul seperti  berikut ini

3. Salin script berikut ini.

Option Explicit

Sub addapostrophe()
Dim cell As Range
For Each cell In Range(“A1:A” & Range(“A65536”).End(xlUp).Row)
cell.Select
If cell.Value <> “” Then
cell.Value = “‘” & cell.Value
End If
Next
End Sub

Perhatikan pada bagian “A1:A” dan “A65536”. Jika yang akan disisipkan angka-angka ada di kolom D misalnya, maka harus diganti “D1:D” & “D65536”.

4. Jalankan scriptnya  dengan menekan tombol F5.

5. Selanjutnya tutup halaman tadi dengan menekan tombol Alt & Q secara bersamaan. Silahkan cek perubahannya.