Excel MAC 2019 Membantu Membandingkan Karakter Dalam Sel

Saya memiliki lembar Excel dengan dua kolom (A & B) setiap sel berisi teks, saya ingin dapat membuat kolom ketiga (C) dengan karakter yang berbeda di antara keduanya.

Ada 50.000 baris yang harus dilalui.

Sebuah contoh:

Contoh tabel di Excel

Contoh lain:

Column A2: ABCDEFG
Column B2: AB"CDEFGED
Column C2: "ED (The difference between the 2)

Apakah ini mungkin? Bekerja di Excel Mac 2019


person PaulW.    schedule 27.05.2020    source sumber
comment
Saya menghapusnya karena sebenarnya tidak berfungsi =(. Ada karakter yang hilang di C3 persis seperti yang saya sebutkan di postingan saya. Atau apakah data aktual Anda tidak mencerminkan data sampel Anda? Juga ada beberapa kekurangan pada data sampel Anda .Benarkah Anda tidak tertarik dengan kutipan tunggal di A3?   -  person JvdV    schedule 27.05.2020
comment
Ini mewakili data dan tampaknya berfungsi sempurna dengan apa yang telah saya periksa sejauh ini. Kedua kolom tersebut berisi nama dan terdapat perbedaan antara dua kumpulan data yang sebagian besar disebabkan oleh entri data yang buruk. 90% perbedaannya ada antara LTD dan Limited, meskipun ada , yang tersebar di mana-mana. Ini baik-baik saja, jika satu nama di satu kolom benar-benar berbeda dengan nama berikutnya, saya mendapat masalah. Ini menyelesaikannya dengan sempurna, jadi sekali lagi terima kasih. Setelah ini 50.000, 200.000 baris lagi tersisa : (   -  person PaulW.    schedule 27.05.2020
comment
Saya akan membatalkan penghapusan jawabannya, agar Anda dapat menemukan kesalahan di sel C3... Sementara itu, saya akan melihat apakah saya dapat menemukan hal lain.   -  person JvdV    schedule 27.05.2020
comment
Apakah VBA merupakan pilihan bagi Anda, menggunakan UDF untuk mengatasi masalah ini? Jauh lebih mudah.   -  person JvdV    schedule 28.05.2020


Jawaban (1)


Akan tertarik untuk melihat apakah ada yang bisa menemukan formula untuk melakukan ini. Saya malah mengambil rute berbeda menggunakan UDF:

Function Difference(str1 As String, str2 As String) As String

Dim x As Long
Dim tmp As String

'Grab chars from str2
tmp = str1
For x = 1 To Len(str2)
    tmp = Replace(tmp, Mid(str2, x, 1), "", Count:=1)
Next
Difference = tmp

'Grab chars from str1
tmp = str2
For x = 1 To Len(str1)
    tmp = Replace(tmp, Mid(str1, x, 1), "", Count:=1)
Next
Difference = Difference & tmp

End Function

Telepon dari C2 hingga: =Difference(A2,B2)

masukkan deskripsi gambar di sini

person JvdV    schedule 27.05.2020
comment
@ScottCraner, saya sadar, seperti yang Anda baca di komentar di atas, saya telah menghapus ini, namun OP mengatakan itu berfungsi. Tidak dihapus untuk menunjukkan kepadanya bahwa itu sebenarnya salah - person JvdV; 27.05.2020
comment
@PaulW, tolong periksa datanya! Ini TIDAK benar, saya hanya membatalkan penghapusan agar Anda dapat menemukan kesalahan di C3. - person JvdV; 27.05.2020
comment
Maaf harus makan sesuatu dengan cepat karena melihat kekacauan data ini sepanjang hari. Saya dapat melihat kesalahannya, jika surat itu ada di sel pertama, duplikat di sel kedua tidak dihitung. Apakah ada jalan keluarnya? Sekali lagi terima kasih atas bantuan Anda - person PaulW.; 27.05.2020
comment
Mungkin, tapi saya tidak bisa memikirkan ATM apa pun. Saya akan menghapus ini sekarang - person JvdV; 27.05.2020
comment
@PaulW., Saya memilih rute yang berbeda, Anda dapat menambahkan UDF ini dan itu akan memenuhi kebutuhan Anda. - person JvdV; 28.05.2020
comment
@ScottCraner, saya yakin saya telah mencapai batas kemampuan saya untuk mencoba menyelesaikannya melalui rumus sederhana. Akan menarik untuk melihat apakah itu mungkin. Sebaliknya saya memilih cara ayam menggunakan UDF. - person JvdV; 28.05.2020
comment
Saya mencoba sebentar dan menyerah. Saya tidak percaya formula bisa melakukannya. - person Scott Craner; 28.05.2020