Mengekstraksi data dari kolom ke yang lain

2

Saya memiliki ribuan data pada kolom yang mirip dengan

1651651465,"15654"
41654544,"4814"

semuanya dalam satu kolom (seperti A1, A2, A3, ....)

Saya ingin menyimpan nomor sebelum ,ke A1 (A2, A3, A4 ...) dan nomor di dalam ""ke B1 (B2,3, ...). bagaimana saya bisa melakukannya?

maka akan seperti:

       A            B
1   1651651465    15654
2   41654544       4814
3   etc
4   etc

Jika Anda tahu cara melakukannya di kantor terbuka, saya bisa menggunakan kantor terbuka lalu menyimpannya sebagai MS excel.

microsoft-excel

— sven
sumber

dapatkah Anda menentukan versi Office mana yang Anda gunakan?

— Shekhar

3

Pilih kolomnya.
Buka tab Data dan pilih Teks ke Kolom .
Pilih dibatasi pada halaman pertama, klik Next.
Pilih koma di halaman berikutnya, klik Finish.

— Shekhar
sumber

1

Coba makro kecil ini:

Sub reformit()
    Dim s As String, N As Long, L As Long
    s = Chr(34)
    N = Cells(Rows.Count, "A").End(xlUp).Row
    For L = 1 To N
        v = Replace(Cells(L, "A"), s, "")
        ary = Split(v, ",")
        Cells(L, "A") = ary(0)
        Cells(L, "B") = ary(1)
    Next L
End Sub

— Siswa Gary
sumber