Comment créer un contenu de cellule sur deux dans Excel
Excel offre la possibilité de résumer des cellules. Avec la fonction FORMAT - CELLULES - ALIGNEMENT - COMBINE CELLULES, vous pouvez combiner deux cellules en une seule unité. Mais que faites-vous lorsqu'il y a du contenu dans les deux cellules que vous ne voulez pas perdre ? Utilisez VBA pour résoudre le problème.
L'exemple de la figure suivante montre une courte liste de noms :
Vous souhaitez combiner les deux contenus des colonnes A et B dans la première colonne A, puis combiner les deux cellules des colonnes A et B en une seule cellule. La macro suivante fait ce travail :
Fusionner les sous-cellules ()
Dim line As Integer
Ligne = 1
Tant que non (IsEmpty (Cellules (ligne, 1)))
Cellules (ligne, 1) = Cellules (ligne, 1) & "" & Cellules (ligne, 2)
Cellules (ligne, 2) .ClearContents
Plage (Cellules (ligne, 1), Cellules (ligne, 2)).
Ligne = ligne + 1
Wende
Colonnes (1) .AutoFit
Fin du sous-marin
La macro parcourt les lignes de la ligne 1 jusqu'à ce que la colonne A soit vide. Pour chaque contenu non vide, les contenus de A et B sont attachés l'un à l'autre (séparés par un espace). Ensuite, les deux cellules A et B sont connectées pour former une seule cellule. La figure suivante montre le résultat :
