Menyisipkan tanda kutip (Apostrophe) untuk angka di Cell kolom Excel

Untuk setiap karakter numerik di exel, mungkin sewaktu-waktu anda akan menyisipkan "tanda kutip" atau apstrophe di cell atau kolom tertentu pada sheet excell yang berisikan angka untuk membuat angka tersebut dikenali sebagai Text.

berikut langkah-langkah untuk menyisipkan tanda kutip atau apostrophe dengan menggunakan excel macro



1. Buka dokumen excel anda dengan Cell-cell atau kolom yang berisikan angka dan akan kita sisipkan tanda kutip(apostrophe)

2. buka halaman macro dengan tombol (alt + F11)
akan terlihat halaman seperti berikut

3. Pilih sheet yang akan anda proses, kemudian paste-kan 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

4. jalankan script nya denga tombol "F5"
5. kemudian tutup halaman macro dengan alt+Q

Lihat perubahan pada sheet excel anda

Selamat Mencoba

4 comments: