Les Excel enchaîner La fonction peut insérer rapidement un préfixe ou un suffixe pour une seule cellule.

1. Entrez la fonction de =CONCATENATE("Food - ",A1) dans une cellule vide, dit Cell C1, puis faites glisser la poignée de remplissage automatique de cette cellule sur la plage que vous souhaitez remplir. Et toutes les cellules ont été ajoutées le texte de préfixe spécifique. Voir capture d'écran:. Voir la capture d'écran:

Vous pouvez utiliser la fonction de concaténation pour insérer un préfixe, un suffixe ou les deux suffixe et préfixe comme suit:

Vous n'êtes peut-être pas familier avec les fonctions et le code VBA dans Excel. Et ça Add Text utilité de Kutools for Excel vous aidera à insérer rapidement un préfixe ou un suffixe dans les plages sélectionnées.

1. Sélectionnez les cellules que vous souhaitez ajouter un préfixe ou un suffixe, puis cliquez sur  Kutools > Text > Add Text.

2. Dans le Add Text boîte de dialogue, entrez votre préfixe ou suffixe dans le Texte case, cochez la case Before first character Option (pour ajouter un préfixe) ou After last character Option (pour ajouter un suffixe) selon vos besoins et cliquez sur le bouton Ok .
Et maintenant, le préfixe ou le suffixe spécifié s'ajoute à chaque cellule sélectionnée à la fois. Voir la capture d'écran:

Vous pouvez également résoudre ce problème avec le code VBA suivant:

1. Sélectionnez la plage dans laquelle vous souhaitez insérer le préfixe ou le suffixe.

2Cliquez sur Developer > Visual Basic, Et un nouveau Microsoft Visual Basic for applications la fenêtre s'affiche, cliquez sur Insert > Module, puis entrez le code suivant:

Sub AddTextOnLeft()
'Updateby20131128
Dim Rng As Range
Dim WorkRng As Range
Dim addStr As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
addStr = Application.InputBox("Add text", xTitleId, "", Type:=2)
For Each Rng In WorkRng
    Rng.Value = addStr & Rng.Value
Next
End Sub

Sub AddTextOnRight()
'Updateby20131128
Dim Rng As Range
Dim WorkRng As Range
Dim addStr As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
addStr = Application.InputBox("Add text", xTitleId, "", Type:=2)
For Each Rng In WorkRng
    Rng.Value = Rng.Value & addStr
Next
End Sub

3. Puis clique Run ou appuyez sur le F5 clé pour exécuter le VBA.

4. Et maintenant, veuillez spécifier la plage pour laquelle vous allez ajouter un préfixe ou un suffixe dans le premier KutoolsforExcel boîte de dialogue et cliquez sur le OK bouton, puis tapez le suffixe ou le préfixe que vous ajouterez dans le second KutoolsforExcel boîte de dialogue et cliquez sur le OK bouton. Voir les captures d'écran ci-dessous:
     
Maintenant, le suffixe ou le préfixe spécifié a été ajouté dans chaque cellule sélectionnée comme illustré ci-dessous:

Ajouter du texte au début ou à la fin de toutes les cellules

Ajouter des chaînes de texte à plusieurs cellules

ajouter des zéros non significatifs aux nombres ou au texte