Loncat ke daftar isi utama

Bagaimana cara menambahkan teks di tengah sel yang dipilih di Excel?

Misalkan Anda memiliki daftar data yang disusun dengan huruf awal G dan angka lainnya, dan sekarang Anda ingin menambahkan huruf D setelah huruf pertama G ke seluruh daftar. Lihat gambar di bawah yang ditampilkan.

Bagaimana Anda bisa melakukannya? Untuk menambahkan surat ke sel satu per satu sepertinya membuang waktu selama Anda bekerja. Pada artikel ini, kami akan menunjukkan kepada Anda bagaimana menambahkan teks di tengah sel yang dipilih di Excel dengan metode yang efisien.

Tambahkan teks di tengah sel yang dipilih dengan rumus
Tambahkan teks di tengah sel yang dipilih dengan kode VBA
Tambahkan teks di tengah sel yang dipilih dengan Kutools for Excel


Tambahkan teks di tengah sel yang dipilih dengan rumus

Di bagian ini, kami akan memberi Anda rumus untuk menambahkan teks di tengah sel yang dipilih. Silakan lakukan sebagai berikut.

1. Metode ini harus dilakukan dengan kolom bantuan. Pilih sel kosong yang berdekatan dengan data asli, disini saya pilih sel B2.

2. Salin dan tempel rumus = KIRI (A2,1) & "D" & MID (A2,2,100) ke dalam Formula Bar, lalu tekan Enter kunci. Lihat tangkapan layar:

Catatan:

  • 1). Dalam rumus, angka 1 berarti teks akan ditambahkan setelah karakter pertama sel.
  • 2). Angka 2 dan 100 menunjukkan bahwa karakter dari detik hingga keseratus sel asli akan ditambahkan setelah teks baru yang disisipkan.
  • 3). Jika Anda ingin menambahkan teks setelah karakter kedua, silahkan ubah angka 1 menjadi 2, dan 2 menjadi 3 pada rumus.
  • 4). Dan karakter "D" adalah teks yang akan Anda tambahkan ke sel. Silakan ubah sesuai kebutuhan Anda.

3. Pilih sel B2, seret Fill Handle ke bawah ke sel yang ingin Anda tutupi dengan rumus ini. Anda dapat melihat teks ditambahkan di tengah sel di seluruh daftar.

Tips: Selain rumus di atas, Anda juga bisa menerapkan rumus ini = REPLACE (A2,2,0, "D"), (angka 2 menunjukkan lokasi di mana Anda ingin memasukkan teks, dan huruf D mengacu pada teks yang perlu Anda tambahkan, Anda dapat mengubahnya sesuai kebutuhan Anda), lalu tekan tombol Enter untuk mendapatkan hasilnya.


Tambahkan teks ke awal atau akhir semua sel yang dipilih di Excel:

Kutools untuk Excel Tambahkan Teks utilitas dapat dengan cepat menambahkan teks tertentu ke awal atau akhir sel dalam pilihan di Excel.
Unduh fitur lengkap jejak gratis 30 hari dari Kutools untuk Excel sekarang!


Tambahkan teks di tengah sel yang dipilih dengan kode VBA

Selain itu, Anda dapat menambahkan teks di tengah sel yang dipilih dengan kode VBA.

1. Silakan tekan lain + F11 untuk membuka Aplikasi Microsoft Visual Basic jendela.

2. klik Menyisipkan > Modul. Kemudian salin dan tempel kode VBA di bawah ini ke editor Kode.

Kode VBA: Tambahkan teks ke daftar data setelah karakter pertama

Sub AddString()
	Dim Rng As Range
	Dim WorkRng As Range
	On Error Resume Next
	xTitleId = "KutoolsforExcel"
	Set WorkRng = Application.Selection
	Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type: = 8)
	For Each Rng In WorkRng
		Rng.Value = VBA.Left(Rng.Value, 1) & "D" & VBA.Mid(Rng.Value, 2, VBA.Len(Rng.Value) - 1)
	Next
End Sub

3. tekan F5 kunci untuk menjalankan kode, dan di popping KutoolsforExcel kotak dialog, pilih rentang yang ingin Anda tambahkan teks, dan terakhir klik OK .

Sekarang teks yang ditentukan ditambahkan setelah karakter pertama dari sel yang dipilih.

Note: Pada kode di atas, Anda akan memasukkan nilai tertentu setelah karakter pertama di dalam sel, Anda dapat mengubah angka 1 dan 2 menjadi angka 2 dan 3 jika menambahkan teks setelah karakter kedua dalam skrip ini VBA.Left (Rng.Value, 1) & "D" & VBA.Mid (Rng.Value, 2, VBA.Len (Rng.Value) - 1), dan huruf D adalah teks baru yang ingin Anda sisipkan.


Tambahkan teks di tengah sel yang dipilih dengan Kutools for Excel

Kami harus mengakui bahwa kedua metode di atas tidak nyaman bagi kami. Di sini saya akan menunjukkan kepada Anda Tambahkan Teks kegunaan Kutools untuk Excel, dengan utilitas ini, Anda dapat dengan mudah menentukan posisi tengah daftar, dan kemudian menambahkan teks tertentu ke posisi tersebut dari seluruh daftar secara bersamaan.

Sebelum melamar Kutools untuk Excel, Mohon unduh dan instal terlebih dahulu.

1. Pilih daftar yang ingin Anda tambahkan teks di tengah sel, lalu klik Kutools > Teks > Tambahkan Teks. Lihat tangkapan layar:

2. Dalam Tambahkan Teks kotak dialog, masukkan teks yang ingin Anda tambahkan ke sel di Teks kotak, tentukan posisi di mana Anda ingin menambahkan teks dengan mencentang Menentukan opsi (di sini saya masukkan nomor 1), lalu klik OK tombol. (Anda dapat langsung melihat hasil penambahan di kotak kanan)

Note: Untuk menambahkan teks di beberapa posisi sel yang dipilih sekaligus, Anda dapat menentukan posisi dengan pemisah koma di Menentukan kotak. Lihat tangkapan layar:

Sekarang teks yang ditentukan ditambahkan setelah huruf pertama dalam daftar yang dipilih.

  Jika Anda ingin memiliki uji coba gratis (30 hari) dari utilitas ini, silahkan klik untuk mendownloadnya, lalu lanjutkan untuk menerapkan operasi sesuai langkah di atas.


Tambahkan teks di tengah sel yang dipilih dengan Kutools for Excel


Artikel terkait:.

Alat Produktivitas Kantor Terbaik

馃 Kutools AI Ajudan: Merevolusi analisis data berdasarkan: Eksekusi Cerdas   |  Hasilkan Kode  |  Buat Rumus Khusus  |  Analisis Data dan Hasilkan Grafik  |  Aktifkan Fungsi Kutools...
Fitur Populer: Temukan, Sorot, atau Identifikasi Duplikat   |  Hapus Baris Kosong   |  Gabungkan Kolom atau Sel tanpa Kehilangan Data   |   Putaran tanpa Formula ...
Pencarian Super: VLookup Beberapa Kriteria    VLookup Nilai Berganda  |   VLookup di Beberapa Lembar   |   Pencarian Fuzzy ....
Daftar Drop-down Lanjutan: Buat Daftar Drop Down dengan Cepat   |  Daftar Drop Down yang Bergantung   |  Multi-pilih Drop Down List ....
Manajer Kolom: Tambahkan Jumlah Kolom Tertentu  |  Pindahkan Kolom  |  Alihkan Status Visibilitas Kolom Tersembunyi  |  Bandingkan Rentang & Kolom ...
Fitur Unggulan: Fokus Kisi   |  Tampilan Desain   |   Bar Formula Besar    Manajer Buku Kerja & Lembar   |  Perpustakaan Sumberdaya (Teks otomatis)   |  Pemetik tanggal   |  Gabungkan Lembar Kerja   |  Enkripsi/Dekripsi Sel    Kirim Email berdasarkan Daftar   |  Filter Super   |   Filter Khusus (filter tebal/miring/coret...) ...
15 Perangkat Teratas12 Teks Tools (Tambahkan Teks, Hapus Karakter, ...)   |   50 + Grafik jenis (Gantt Chart, ...)   |   40+ Praktis Rumus (Hitung usia berdasarkan ulang tahun, ...)   |   19 Insersi Tools (Masukkan Kode QR, Sisipkan Gambar dari Jalur, ...)   |   12 Konversi Tools (Angka ke Kata, Konversi Mata Uang, ...)   |   7 Gabungkan & Pisahkan Tools (Lanjutan Gabungkan Baris, Pisahkan Sel, ...)   |   ... dan banyak lagi

Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Lanjutan untuk Meningkatkan Produktivitas dan Menghemat Waktu.  Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...

Deskripsi Produk


Tab Office Membawa antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Jauh Lebih Mudah

  • Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
  • Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
  • Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!
Comments (7)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Boa tarde, tudo bem ?

Eu testei as duas f贸rmulas e n茫o funcionaram. Inclusive testei tamb茅m no mesmo cen谩rio descrito no texto e tamb茅m n茫o funcionou. Poderia verificar se falta algo na f贸rmula do excel ?
This comment was minimized by the moderator on the site
Tive o mesmo problema, mas segui pela resposta que enviaram aqui, a formula para o excel em portugu锚s seria =ESQUERDA(A2;1) & "D" & EXT.TEXTO(A2;2;100)

A parte da f贸rmula que d谩 o erro seria o "MID" que precisa ser substitu铆do por "EXT.TEXTO"
This comment was minimized by the moderator on the site
Hi Matheus C.,
If you are using the Excel version in a different language than English, please convert the formula from English to the language you are currently using.
You can translate the formula in this page: https://de.excel-translator.de/translator/
This comment was minimized by the moderator on the site
Hi Vick,
The formula provided in the post can only be applied in English system environment Excel. If you have Excel in a different language than English, please convert the formula from English to the language you are currently using.
It seems that you are using the Excel in Portuguese language system. You need to change the commas in the formula to semicolons.
You can translate the formula in this page: https://de.excel-translator.de/translator/
This comment was minimized by the moderator on the site
TRIMAKASIH KAK, SANGAT MEMBANTUUUU
This comment was minimized by the moderator on the site
This seems complicated. For the originally stated problem why not just do a search for G and replace all with GD?
This comment was minimized by the moderator on the site
Because you might want to insert a specific character at a certain index of the string. What if they weren't all G's? This was just to provide an example of how it works.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
Rate this post:
0   Characters
Suggested Locations