Ga naar hoofdinhoud

Hoe voeg ik tekst toe in het midden van geselecteerde cellen in Excel?

Stel dat je een lijst met gegevens hebt samengesteld met een beginletter G en andere cijfers, en nu wil je nog een letter D toevoegen na de eerste letter G aan de hele lijst. Zie onderstaande screenshot getoond.

Hoe kunt u dit bereiken? Het een voor een toevoegen van de letter aan cellen lijkt tijd te verspillen tijdens je werk. In dit artikel laten we u zien hoe u met efficiënte methoden tekst in het midden van geselecteerde cellen in Excel kunt toevoegen.

Voeg tekst toe in het midden van geselecteerde cellen met formule
Voeg tekst toe in het midden van geselecteerde cellen met VBA-code
Voeg tekst toe in het midden van geselecteerde cellen met Kutools voor Excel


Voeg tekst toe in het midden van geselecteerde cellen met formule

In deze sectie zullen we u de formule geven om tekst toe te voegen in het midden van geselecteerde cellen. Ga als volgt te werk.

1. Deze methode moet worden gedaan met een hulpkolom. Selecteer de lege cel die grenst aan de originele gegevens, hier selecteer ik cel B2.

2. Kopieer en plak de formule = LINKS (A2,1) & "D" & MIDDEN (A2,2,100) in de formulebalk en druk vervolgens op Enter sleutel. Zie screenshot:

Opmerkingen:

  • 1). In de formule betekent nummer 1 dat de tekst wordt toegevoegd na het eerste teken van de cel.
  • 2). Het getal 2 en 100 geven aan dat de tekens van de tweede tot en met honderdste van de oorspronkelijke cel worden toegevoegd na de nieuw ingevoegde tekst.
  • 3). Als u tekst na het tweede teken wilt toevoegen, wijzigt u het nummer 1 in 2 en 2 in 3 in de formule.
  • 4). En het teken "D" is de tekst die u aan de cel wilt toevoegen. Wijzig het op basis van uw behoeften.

3. Selecteer de cel B2, sleep de vulhendel omlaag naar de cel die u met deze formule wilt bedekken. U kunt zien dat de tekst in het midden van de cellen in de hele lijst wordt toegevoegd.

Tips: Naast bovenstaande formule kunt u deze formule ook toepassen = VERVANGEN (A2,2,0; "D"), (het cijfer 2 geeft de locatie aan waar u de tekst wilt invoegen en de letter D verwijst naar de tekst die u moet toevoegen, u kunt deze naar wens wijzigen) en druk vervolgens op de Enter-toets om het resultaat te krijgen.


Voeg tekst toe aan het begin of einde van alle geselecteerde cellen in Excel:

Kutools voor Excel's toe te voegen tekst hulpprogramma kan snel gespecificeerde tekst toevoegen aan het begin of einde van cellen in een selectie in Excel.
Download nu het volledige gratis 30-daagse gratis parcours van Kutools voor Excel!


Voeg tekst toe in het midden van geselecteerde cellen met VBA-code

Bovendien kunt u tekst toevoegen in het midden van geselecteerde cellen met VBA-code.

1. Druk op anders + F11 om de te openen Microsoft Visual Basic-toepassingen venster.

2. klikken Invoegen > Module. Kopieer en plak vervolgens onderstaande VBA-code in de code-editor.

VBA-code: voeg tekst toe aan een lijst met gegevens na het eerste teken

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. druk op F5 sleutel om de code uit te voeren, en in het opduiken KutoolsvoorExcel dialoogvenster, selecteer het bereik waaraan u tekst wilt toevoegen en klik ten slotte op het OK knop.

Nu wordt de opgegeven tekst toegevoegd na het eerste teken van de geselecteerde cellen.

Note: In de bovenstaande code voegt u een specifieke waarde in na het eerste teken in de cel, u kunt het nummer 1 en 2 wijzigen in het nummer 2 en 3 als u de tekst na het tweede teken in dit script toevoegt VBA.Left (Rng.Value, 1) & "D" & VBA.Mid (Rng.Value, 2, VBA.Len (Rng.Value) - 1), en de letter D is de nieuwe tekst die u wilt invoegen.


Voeg tekst toe in het midden van geselecteerde cellen met Kutools voor Excel

We moeten toegeven dat de bovenstaande twee methoden voor ons onhandig zijn. Hier zal ik je de toe te voegen tekst nut van Kutools for ExcelMet dit hulpprogramma kunt u eenvoudig de middelste positie van de lijst specificeren en vervolgens de bepaalde tekst tegelijkertijd aan die positie van de hele lijst toevoegen.

Voor het aanvragen Kutools for Excel, Dan kunt u download en installeer het eerst.

1. Selecteer de lijst waaraan u tekst in het midden van cellen wilt toevoegen en klik op Kutools > Tekst > toe te voegen tekst. Zie screenshot:

2. In de toe te voegen tekst dialoogvenster, voert u de tekst in die u aan cellen wilt toevoegen in het Tekst geeft u de positie op waar u de tekst wilt toevoegen door de Specificeren optie (hier voer ik nummer 1 in), klik dan op de OK knop. (U kunt direct een voorbeeld van het toevoegresultaat in het rechtervak ​​bekijken)

Note: Om tekst op meerdere posities van een geselecteerde cel tegelijk toe te voegen, kunt u de posities specificeren door komma's te scheiden in de Specificeren doos. Zie screenshot:

Nu wordt de opgegeven tekst toegevoegd na de eerste letter in de geselecteerde lijst.

  Als u een gratis proefperiode (30 dagen) van dit hulpprogramma wilt, klik om het te downloaden, en ga vervolgens de bewerking toepassen volgens de bovenstaande stappen.


Voeg tekst toe in het midden van geselecteerde cellen met Kutools voor Excel


Gerelateerd artikel:.

Beste Office-productiviteitstools

Populaire functies: Zoek, markeer of identificeer duplicaten   |  Verwijder lege rijen   |  Combineer kolommen of cellen zonder gegevens te verliezen   |   Ronde zonder formule ...
Super opzoeken: Meerdere criteria VLookup    VLookup met meerdere waarden  |   VOpzoeken over meerdere bladen   |   Fuzzy opzoeken ....
Geavanceerde vervolgkeuzelijst: Maak snel een vervolgkeuzelijst   |  Afhankelijke vervolgkeuzelijst   |  Multi-select vervolgkeuzelijst ....
Kolom Beheerder: Voeg een specifiek aantal kolommen toe  |  Kolommen verplaatsen  |  Schakel de zichtbaarheidsstatus van verborgen kolommen in  |  Vergelijk bereiken en kolommen ...
Uitgelichte functies: Raster focus   |  Ontwerpweergave   |   Grote formulebalk    Werkmap- en bladbeheer   |  resource Library (Auto-tekst)   |  Datumkiezer   |  Combineer werkbladen   |  Cellen coderen/decoderen    Stuur e-mails per lijst   |  Super filter   |   Speciaal filter (filter vet/cursief/doorhalen...) ...
Top 15 gereedschapsets12 Tekst Tools (toe te voegen tekst, Tekens verwijderen, ...)   |   50+ tabel Types (Gantt Chart, ...)   |   40+ Praktisch Formules (Bereken leeftijd op basis van verjaardag, ...)   |   19 Invoeging Tools (QR-code invoegen, Afbeelding invoegen vanaf pad, ...)   |   12 Camper ombouw Tools (Getallen naar woorden, Currency Conversion, ...)   |   7 Samenvoegen en splitsen Tools (Geavanceerd Combineer rijen, Gespleten cellen, ...)   |   ... en meer

Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen.  Klik hier om de functie te krijgen die u het meest nodig heeft...

kte tabblad 201905


Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker

  • Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
  • Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!
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