Comment ajouter du texte au milieu des cellules sélectionnées dans Excel?

L'ajout de texte au milieu des cellules sélectionnées dans Excel est une technique pratique pour organiser et présenter les données. Ce guide fournira des instructions claires, étape par étape, sur la façon d'insérer un nouveau texte dans le contenu existant des cellules à l'aide des fonctions et fonctionnalités intégrées d'Excel.

• Ajouter du texte au milieu des cellules sélectionnées avec une formule
• Ajouter du texte au milieu des cellules sélectionnées avec Kutools for Excel
• Ajouter du texte au milieu des cellules sélectionnées avec le code VBA

Ajouter du texte au milieu des cellules sélectionnées avec une formule

Dans cette section, nous vous fournirons la formule pour ajouter du texte au milieu des cellules sélectionnées. Veuillez faire comme suit.

1. Cette méthode doit être effectuée avec une colonne d'aide. Sélectionnez la cellule vide adjacente aux données d'origine, ici je sélectionne la cellule B2.

2. Copiez et collez la formule = GAUCHE (A2,1) & "D" & MID (A2,2,100, XNUMX) dans la barre de formule, puis appuyez sur la touche Entrer clé. Voir la capture d'écran:

Florales:

• 1). Dans la formule, le chiffre 1 signifie que le texte sera ajouté après le premier caractère de la cellule.
• 2). Les nombres 2 et 100 indiquent que les caractères de la seconde au centième de la cellule d'origine seront ajoutés après le nouveau texte inséré.
• 3). Si vous souhaitez ajouter du texte après le deuxième caractère, veuillez changer le nombre 1 en 2 et 2 en 3 dans la formule.
• 4). Et le caractère «D» est le texte que vous ajouterez à la cellule. Veuillez le modifier en fonction de vos besoins.

3. Sélectionnez la cellule B2, faites glisser la poignée de remplissage vers la cellule que vous souhaitez couvrir avec cette formule. Vous pouvez voir que le texte est ajouté au milieu des cellules dans toute la liste.

Astuces: Outre la formule ci-dessus, vous pouvez également appliquer cette formule = REMPLACER (A2,2,0, "D"), (le numéro 2 indique l'emplacement où vous souhaitez insérer le texte, et la lettre D fait référence au texte que vous devez ajouter, vous pouvez les modifier selon vos besoins), puis appuyez sur la touche Entrée pour obtenir le résultat.

Ajouter du texte au milieu des cellules sélectionnées avec Kutools for Excel

Nous devons admettre que les deux méthodes ci-dessus ne nous conviennent pas. Ici, je vais vous montrer le Ajouter du texte utilité de Kutools for Excel, avec cet utilitaire, vous pouvez facilement spécifier la position médiane de la liste, puis ajouter le certain texte à cette position de la liste entière en même temps.

1. Sélectionnez la liste à laquelle vous souhaitez ajouter du texte au milieu des cellules, puis cliquez sur Kutools > Texte > Ajouter du texte. Voir la capture d'écran:

2. dans le Ajouter du texte boîte de dialogue, entrez le texte que vous souhaitez ajouter aux cellules dans le Texte , spécifiez la position à laquelle vous souhaitez ajouter le texte en cochant la case Spécifier option (ici j'entre le numéro 1), puis cliquez sur le OK bouton. (Vous pouvez instantanément prévisualiser le résultat de l'ajout dans la case de droite)

Notes: Pour ajouter du texte à plusieurs positions de la cellule sélectionnée à la fois, vous pouvez spécifier les positions avec une virgule séparant dans le Spécifier boîte. Voir la capture d'écran:

Le texte spécifié est maintenant ajouté après la première lettre de la liste sélectionnée.

Ajouter du texte au milieu des cellules sélectionnées avec le code VBA

En outre, vous pouvez ajouter du texte au milieu des cellules sélectionnées avec le code VBA.

1. Veuillez appuyer sur autre + F11 ouvrir le Applications Microsoft Visual Basic fenêtre.

2. Cliquez insérer > Module. Ensuite, copiez et collez ci-dessous le code VBA dans l'éditeur de code.

Code VBA: ajouter du texte à une liste de données après le premier caractère

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. presse F5 clé pour exécuter le code, et dans le pop-up KutoolsforExcel boîte de dialogue, sélectionnez la plage à laquelle vous souhaitez ajouter du texte, puis cliquez sur le OK .

Le texte spécifié est maintenant ajouté après le premier caractère des cellules sélectionnées.

Notes: Dans le code ci-dessus, vous insérerez une valeur spécifique après le premier caractère dans la cellule, vous pouvez changer le nombre 1 et 2 en nombre 2 et 3 si vous ajoutez le texte après le deuxième caractère dans ce script VBA.Left (Rng.Value, 1) & "D" & VBA.Mid (Rng.Value, 2, VBA.Len (Rng.Value) - 1)et la lettre D est le nouveau texte que vous souhaitez insérer.

Ce guide vous présente trois méthodes pour y parvenir : utiliser des formules Excel, tirer parti du complément Kutools for Excel et appliquer du code VBA. Chaque méthode offre une approche unique pour insérer un nouveau texte dans le contenu existant des cellules, répondant à différents niveaux de maîtrise d'Excel et aux besoins des utilisateurs. Si vous souhaitez découvrir davantage de trucs et astuces Excel, notre site Web propose des milliers de didacticiels. Veuillez cliquer ici pour y accéder.

Ajouter du texte au milieu des cellules sélectionnées avec Kutools for Excel

Article connexe:.

• Comment ajouter du texte au début ou à la fin de toutes les cellules dans Excel?