Bagaimana cara mengubah pembatas saat menyalin dari Excel?

9

Saya ingin menyalin sel dari Excel dan menempelkannya ke Notepad menggunakan koma ,sebagai pembatas, bukan karakter tab.

Apakah ada cara untuk mengubah pembatas tanpa melakukan find-and-replace di Notepad atau menyimpan spreadsheet sebagai CSV?

Stefan Pietersen
sumber
Lihat jawaban saya di pertanyaan lain: superuser.com/questions/206060/…
wilson
@wilson Stefan bertanya tentang melakukannya tanpa menggunakan Notepad, dan menggunakan sesuatu selain tab sebagai pembatas
Rowland Shaw
1
@RowlandShaw: Stefan berkata "tanpa mengganti di Notepad", bukan "tanpa Notepad".
Karan

Jawaban:

5

Saya tidak berpikir ada cara untuk mengubah karakter pembatas default (yaitu Tab) yang digunakan saat menyalin teks ke clipboard dari Excel. Apa yang dapat Anda lakukan adalah membuat makro untuk mencapai hasil yang Anda inginkan.

  1. Buat makro bernama sesuatu seperti CopySelectedCells dan tentukan menetapkan pintasan keyboard sehingga Anda dapat memohonnya dengan cepat (saya menetapkan itu Ctrl+ Shift+ Cmisalnya):

    1

  2. Dari dialog Makro utama yang ditunjukkan di atas, klik tombol Edit untuk membuka VBA Editor.

  3. Pergi ke Tools menu / Referencesdan klik tombol Browse .

  4. Tambahkan Windows \ System32 \ FM20.dll :

    2

  5. Pilih opsi Microsoft Objects 2.0 Object Library yang sekarang ditambahkan ke daftar Referensi yang Tersedia :

    3

  6. Edit kode makro agar terlihat seperti berikut:

    Sub CopySelectedCells()
        Dim str As String
        For Each rangeRow In Selection.Rows
            For Each rangeCol In rangeRow.Cells
                str = str & rangeCol.Value & ","
            Next
            str = Left(str, Len(str) - 1) & vbCrLf
        Next
    
        With New DataObject
            .SetText str
            .PutInClipboard
        End With
    End Sub
    
  7. Tutup VBA Editor, pilih rentang sel dan aktifkan makro, lalu tempel di Notepad untuk melihat hasil yang dipisahkan koma.

Karan
sumber
0

Buat sel yang diperlukan sebagai string dalam sel yang tidak digunakan dengan koma di antara mereka dan salin saja sel baru ini dan tempel di notepad. Misalnya: = A1 & "," & B1

Gergo
sumber
Jika ada ratusan kolom maka concatenatemungkin bukan pilihan yang baik karena Anda harus memilih sel dengan tangan dan tidak dapat menyeret-pilih sel yang akan digabungkan.
Prasanna
-2

Anda bisa mengganti semua tab dengan koma di Notepad ++. Pilih semua teks, tekan Ctrl+ Hdan gunakan \tuntuk tab. Pastikan untuk mengaktifkan mode pencarian "Extended".

Ganti tab dengan koma

Michael S.
sumber
2
Bagaimana ini lebih baik dibandingkan dengan mengganti Tab di Notepad?
Karan
1
Ini peningkatan yang signifikan karena tidak menggunakan notepad :)
Bill K