Przejdź do głównej zawartości

Jak dodać tekst w środku wybranych komórek w programie Excel?

Przypuśćmy, że masz listę danych złożoną z początkowej litery G i innych liczb, a teraz chcesz dodać kolejną literę D po pierwszej literze G do całej listy. Zobacz poniższy zrzut ekranu.

Jak możesz to osiągnąć? Dodawanie litery do komórek po kolei wydaje się marnowaniem czasu podczas pracy. W tym artykule pokażemy, jak dodać tekst w środku wybranych komórek w Excelu za pomocą wydajnych metod.

Dodaj tekst w środku wybranych komórek za pomocą formuły
Dodaj tekst w środku wybranych komórek za pomocą kodu VBA
Dodaj tekst w środku wybranych komórek za pomocą Kutools for Excel


Dodaj tekst w środku wybranych komórek za pomocą formuły

W tej sekcji przedstawimy formułę dodawania tekstu w środku wybranych komórek. Wykonaj następujące czynności.

1. Tę metodę należy wykonać za pomocą kolumny pomocy. Wybierz pustą komórkę, która sąsiaduje z oryginalnymi danymi, tutaj wybieram komórkę B2.

2. Skopiuj i wklej wzór = LEWO (A2,1) & „D” i ŚRODEK (A2,2,100) do paska formuły, a następnie naciśnij Wchodzę klucz. Zobacz zrzut ekranu:

Uwagi:

  • 1). W formule liczba 1 oznacza, że ​​tekst zostanie dodany po pierwszym znaku komórki.
  • 2). Cyfry 2 i 100 wskazują, że znaki od drugiej do setnej oryginalnej komórki zostaną dodane po nowym wstawionym tekście.
  • 3). Jeśli chcesz dodać tekst po drugim znaku, zmień liczbę 1 na 2 i 2 na 3 we wzorze.
  • 4). Znak „D” to tekst, który dodasz do komórki. Zmień to w zależności od potrzeb.

3. Wybierz komórkę B2, przeciągnij Uchwyt Wypełnienia w dół do komórki, którą chcesz objąć tą formułą. Możesz zobaczyć, że tekst jest dodawany w środku komórek na całej liście.

Tips: Oprócz powyższej formuły możesz również zastosować tę formułę = ZAMIEŃ (A2,2,0; XNUMX; XNUMX; „D”), (cyfra 2 wskazuje miejsce, w którym chcesz wstawić tekst, a litera D oznacza tekst, który chcesz dodać, możesz go zmienić według swoich potrzeb), a następnie naciśnij klawisz Enter, aby uzyskać wynik.


Dodaj tekst na początku lub na końcu wszystkich wybranych komórek w programie Excel:

Kutools dla Excela Dodaj tekst narzędzie może szybko dodać określony tekst na początku lub na końcu komórek w zaznaczeniu w programie Excel.
Pobierz teraz pełną funkcję 30-dniową darmową ścieżkę Kutools dla programu Excel!


Dodaj tekst w środku wybranych komórek za pomocą kodu VBA

Poza tym możesz dodać tekst w środku wybranych komórek za pomocą kodu VBA.

1. Proszę nacisnąć inny + F11 otworzyć Aplikacje Microsoft Visual Basic okno.

2. kliknij wstawka > Moduł. Następnie skopiuj i wklej poniższy kod VBA do edytora kodu.

Kod VBA: dodaj tekst do listy danych po pierwszym znaku

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. naciśnij F5 klucz do uruchomienia kodu oraz w wyskakującym okienku Kutools dla programu Excel W oknie dialogowym wybierz zakres, do którego chcesz dodać tekst, i na koniec kliknij OK przycisk.

Teraz określony tekst jest dodawany po pierwszym znaku wybranych komórek.

Note: W powyższym kodzie wstawisz określoną wartość po pierwszym znaku w komórce, możesz zmienić liczbę 1 i 2 na liczbę 2 i 3, jeśli dodasz tekst po drugim znaku w tym skrypcie VBA.Left (Rng.Value, 1) & "D" i VBA.Mid (Rng.Value, 2, VBA.Len (Rng.Value) - 1), a litera D to nowy tekst, który chcesz wstawić.


Dodaj tekst w środku wybranych komórek za pomocą Kutools for Excel

Trzeba przyznać, że powyższe dwie metody są dla nas niewygodne. Tutaj pokażę ci Dodaj tekst użyteczność Kutools dla programu Excel, za pomocą tego narzędzia możesz łatwo określić środkową pozycję listy, a następnie dodać określony tekst do tej pozycji całej listy w tym samym czasie.

Przed złożeniem wniosku Kutools dla programu ExcelProszę pobierz i zainstaluj najpierw.

1. Wybierz listę, do której chcesz dodać tekst w środku komórek, a następnie kliknij Kutools > Tekst > Dodaj tekst. Zobacz zrzut ekranu:

2. w Dodaj tekst W oknie dialogowym wprowadź tekst, który chcesz dodać do komórek w Tekst wybierz pozycję, w której chcesz dodać tekst, zaznaczając Sprecyzować opcję (tu wpisuję numer 1), a następnie klikam OK przycisk. (Możesz natychmiast wyświetlić podgląd wyniku dodania w prawym polu)

Note: Aby dodać tekst w wielu miejscach zaznaczonej komórki jednocześnie, możesz określić pozycje rozdzielając je przecinkami w Sprecyzować pudełko. Zobacz zrzut ekranu:

Teraz określony tekst jest dodawany po pierwszej literze na wybranej liście.

  Jeśli chcesz mieć bezpłatną wersję próbną (30 dni) tego narzędzia, kliknij, aby go pobrać, a następnie przejdź do wykonania operacji zgodnie z powyższymi krokami.


Dodaj tekst w środku wybranych komórek za pomocą Kutools for Excel


Podobne artykuły:.

Najlepsze narzędzia biurowe

🤖 Pomocnik AI Kutools: Zrewolucjonizuj analizę danych w oparciu o: Inteligentne wykonanie   |  Wygeneruj kod  |  Twórz niestandardowe formuły  |  Analizuj dane i generuj wykresy  |  Wywołaj funkcje Kutools...
Popularne funkcje: Znajdź, wyróżnij lub zidentyfikuj duplikaty   |  Usuń puste wiersze   |  Łącz kolumny lub komórki bez utraty danych   |   Okrągły bez wzoru ...
Super wyszukiwanie: Wiele kryteriów VLookup    Wiele wartości VLookup  |   Przeglądanie pionowe na wielu arkuszach   |   Wyszukiwanie rozmyte ....
Zaawansowana lista rozwijana: Szybko twórz listę rozwijaną   |  Zależna lista rozwijana   |  Lista rozwijana wielokrotnego wyboru ....
Menedżer kolumn: Dodaj określoną liczbę kolumn  |  Przesuń kolumny  |  Przełącz stan widoczności ukrytych kolumn  |  Porównaj zakresy i kolumny ...
Polecane funkcje: Fokus siatki   |  Widok projektu   |   Duży pasek formuły    Menedżer skoroszytów i arkuszy   |  Biblioteka zasobów (Automatyczny tekst)   |  Selektor dat   |  Połącz arkusze   |  Szyfruj/odszyfruj komórki    Wysyłaj e-maile według listy   |  Super filtr   |   Specjalny filtr (filtruj pogrubienie/kursywa/przekreślenie...) ...
15 najlepszych zestawów narzędzi12 Tekst Tools (Dodaj tekst, Usuń znaki, ...)   |   50 + Wykres rodzaje (Wykres Gantta, ...)   |   40+ Praktyczne Wzory (Oblicz wiek na podstawie urodzin, ...)   |   19 Wprowadzenie Tools (Wstaw kod QR, Wstaw obraz ze ścieżki, ...)   |   12 Konwersja Tools (Liczby na słowa, Przeliczanie walut, ...)   |   7 Połącz i podziel Tools (Zaawansowane wiersze łączenia, Podział komórki, ...)   |   ... i więcej

Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas.  Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...

Opis


Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę

  • Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
  • Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
  • Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!
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