Si vous rencontrez des difficultés pour diviser le texte en deux ou plusieurs colonnes séparées en fonction du caractère spécifique, vous devriez lire cet article.

Dans cet article, nous allons apprendre à diviser le nom en 3 cellules, en utilisant VBA dans Microsoft Excel.

Prenons un exemple pour comprendre où et comment nous pouvons diviser le nom. Nous avons une liste de noms au format «FirstName Initial LastName» dans la colonne A. Nous voulons diviser la colonne entière en trois colonnes, l’une contenant tous les prénoms, la seconde contenant l’initiale et la troisième contenant tous les noms .

image 1

Nous écrirons le code VBA pour diviser le nom. Suivez les étapes ci-dessous: – Pour diviser le nom en 3 cellules, nous utiliserons VBA. Voir la procédure et le code ci-dessous, et vous le comprendrez facilement: – Ouvrez la page VBA et appuyez sur Alt + F11 Insérez un module Ensuite, allez dans le menu Insérer et cliquez sur la procédure, où vous obtiendrez la procédure pour démarrer la macro. code mentionné: –

Public Sub SplitName()

X = Cells(Rows.Count, 1).End(xlUp).Row

For A = 1 To X

B = InStr(Cells(A, 1), " ")

C = InStrRev(Cells(A, 1), " ")

Cells(A, 2) = Left(Cells(A, 1), B)

Cells(A, 3) = Mid(Cells(A, 1), B, C - B)

Cells(A, 4) = Right(Cells(A, 1), Len(Cells(A, 1)) - C)

Next A

End Sub

img1

Explication du code: – Nous avons d’abord donné le nom de la macro, puis nous avons utilisé x pour définir la plage de données, puis nous avons utilisé A, B et C pour définir comment les valeurs doivent être sélectionnées dans les cellules.

Appuyez sur la touche F5 pour exécuter la macro dans Excel Lorsque vous exécuterez la macro, les noms seront divisés en trois colonnes

image 3

Conclusion: De cette façon, nous pouvons diviser les noms en 3 colonnes, en utilisant VBA dans Microsoft Excel.

image 48

Si vous avez aimé nos blogs, partagez-les avec vos amis sur Facebook. Et vous pouvez également nous suivre sur Twitter. Nous serions ravis de vous entendre, faites-nous savoir comment nous pouvons améliorer, compléter ou innover notre travail et le rendre meilleur pour vous. Écrivez-nous à[email protected]