Comment fusionner le contenu de deux cellules dans le contenu d'une seule cellule

Comment fusionner le contenu de deux cellules en un seul contenu de cellule

Par exemple : Le contenu de la cellule A1 est : Enseignant

Le contenu de la cellule B1 est : Bonjour

Vous souhaitez fusionner le contenu des cellules A1 et B1 en : Bonjour professeur, alors la formule de C1 est : =A1&B1

C'est tout !

Si vous avez saisi deux cellules et souhaitez fusionner le contenu, alors vous pouvez suivre ma méthode ci-dessous :

Tout le monde sait que dans EXCEL, lorsque plusieurs cellules sont fusionnées en une seule cellule, la fonction de fusion d'EXCEL ne peut conserver que le contenu d'une cellule dans le coin supérieur gauche et le contenu des autres cellules sera ignoré. Parfois, nous devons conserver tout le contenu fusionné dans une seule cellule. Vous trouverez ci-dessous une macro VBA que j'ai créée pour réaliser cette fonction.

Appuyez d'abord sur la combinaison de touches ALT+F11 pour ouvrir la fenêtre VBA, appuyez sur le menu supérieur "Insérer - Module" pour insérer un module et copiez-y le code suivant :

Sous-fusion 1()

Application.DisplayAlerts = False

Set tt = Selection 'Attribuer la zone sélectionnée

a = tt.Rows.Count 'Nombre de lignes de sélection

x = tt.Row 'Le numéro de la première ligne

y = tt.Column 'Numéro de colonne

s = tt.Columns.Count - 1 'Diminue le nombre de colonnes de 1

Pour j = x À x + a - 1

Pour i = 1 À s

Cellules(j, y) = Cellules(j, y) & Cellules(j, y + i)

Suivant

Range(Cells(j, y), Cells(j, y + s)).Merge 'Fusionner

Suivant

Application.DisplayAlerts = True

Fin du sous-marin

Sub fusion2()

t = ＂＂

Set tt = Sélection

x = tt.Row 'Le numéro de la première ligne

y = tt.Column 'Numéro de colonne

Pour chacun une sélection

t = t & a.Valeur

a.Valeur = ＂＂

Suivant

Cellules(x, y) = t

Sélection.Fusion

Selection.WrapText = True 'Retour automatique aux lignes

Fin du sous-marin

Après la copie, fermez cette fenêtre, revenez à EXCEL, appuyez sur AIT+F8 et cliquez sur Exécuter !

J'espère que cela pourra vous être utile !

Comment utiliser VBA dans EXCEL pour fusionner les données de plusieurs cellules en une seule et la supprimer

Sub aa()

'Trier

arr = Plage(＂D3:M9＂).Valeur

Pour i = 1 To UBound(arr, 1)

Pour j = 1 vers UBound(arr, 2) - 1

Pour k = j + 1 To UBound(arr, 2)

Si arr(i, k)

tmp = arr(i, j)

arr(i, j) = arr(i, k)

arr(i, k) = tmp

Fin si

Suivant

Suivant

Suivant

Pour i = 1 To UBound(arr, 1)

x = Cellules (i + 2, 2)

f = Faux

s = arr(je, 1)

Pour j = 1 vers UBound(arr, 2)

Si arr(i, j) = x Alors f = True 'S'il faut remplir en rouge

Si j > 1 Alors 'Supprimer les doublons

Si arr(i, j) arr(i, j - 1) Alors

s = s & ＂,＂ & arr(i, j)

Fin si

Fin si

Suivant

Définir rg = Range(＂N＂ & (i + 2))

rg.Value = s

Si f Alors rg.Interior.ColorIndex = 3

Suivant

Fin du sous-marin

EXCEL vba réalise la sommation automatique des cellules fusionnées

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

Sub fusionner automatiquement les cellules et ()

Application.ScreenUpdating = False

j = Range("F"& Rows.Count).End(3).Row

Range(＂G3:G＂& j).UnMerge

Range(＂G3:G＂& j).ClearContents

n = Plage(＂F3＂)

m = 3

Fori = 4 Toj

IfRange(＂B＂& i) = ＂＂Alors

n = n + Plage(＂F＂& i)

Autre

Plage(＂G＂& i - 1) = IIf(n = 0, ＂＂, n)

Ifm

n = Plage(＂F＂& i)

m = je

FinSi

Suivant

Plage(＂G＂& i - 1) = IIf(n = 0, ＂＂, n)

Ifm

Application.ScreenUpdating = Vrai

FinSub

Comment fusionner le contenu de plusieurs cellules dans Excel en une seule cellule

Ouvrez le document Excel qui doit être fusionné et recherchez la cellule objet.

Utilisez des connecteurs de caractères :

Utilisez le connecteur de caractère "&" pour vous connecter. Cette méthode est utilisée lors de la fusion des données de quelques cellules. Par exemple : B1=A1&A2;B1=A1&A2&A3, une pression. Voir l'image pour les opérations spécifiques.

Utilisez les fonctions de texte :

Utilisez la fonction texte CONCATENATE() pour opérer, par exemple : CONCATENATE(A1,A2,A3,......A255), cependant : La fonction CONCATENATE peut concaténer jusqu'à 255 chaînes de texte en une seule chaîne de texte. Les éléments de jointure peuvent être du texte, des nombres, des références de cellule ou une combinaison de ceux-ci. Par exemple, si votre feuille de calcul contient le prénom d'une personne dans la cellule A1 et son nom de famille dans la cellule B1, vous pouvez combiner les deux valeurs dans une autre cellule en utilisant la formule suivante.

L'opération spécifique est comme indiqué sur l'image.

Instructions d'utilisation des fonctions :

CONCATENER(texte1, [texte2], ...)

La syntaxe de la fonction CONCATENATE a les paramètres suivants (Paramètres : valeurs qui fournissent des informations sur une opération, un événement, une méthode, une propriété, une fonction ou une procédure.) :

Texte1 requis. Premier élément de texte à être concaténé.

Texte2, ... facultatif. Éléments de texte supplémentaires, jusqu'à 255 éléments. Les termes doivent être séparés par des virgules.

Remarque Vous pouvez également utiliser l'opérateur de calcul esperluette (&) au lieu de la fonction CONCATENATE pour joindre des éléments de texte. Par exemple, =A1 & B1 renvoie la même valeur que =CONCATENATE(A1, B1).

Utiliser la fonction d'information :

PHONETIC() fonctionne pour obtenir une chaîne représentant des informations pinyin, principalement utilisée pour le japonais, il ne peut pas utiliser de chiffres. L'opération spécifique est illustrée dans la figure.

Description de la fonction d'information :

PHONÉTIQUE(référence)

La syntaxe de la fonction PHONETIC a les paramètres suivants (Paramètres : valeurs qui fournissent des informations sur une opération, un événement, une méthode, une propriété, une fonction ou une procédure.) : Référence requise. Une chaîne de texte ou une référence à une seule cellule ou plage de cellules contenant une chaîne de texte furigana.

Description : si la référence est une plage de cellules, renvoie la chaîne de texte furigana dans la cellule du coin supérieur gauche de la plage. Si la référence est une plage de cellules non adjacentes, la valeur d'erreur #N/A sera renvoyée.

Plusieurs types de données à fusionner :

Cette méthode combine principalement le contenu des données alphabétiques et les données numériques.

1. Si des données numériques et des données de caractères doivent être fusionnées, vous devez d'abord formater les données numériques à fusionner et les convertir en type de caractère (type texte).

2. La fonction PHONETIQUE (référence) peut être utilisée en utilisant la zone de données, ce qui est plus pratique.

3. La fonction CONCATENATE(text1, [text2], ...) doit être ajoutée cellule par cellule.

4. Le connecteur de caractère "&" doit être utilisé dans chaque cellule fusionnée.

Utilisation de la méthode VBA pour réaliser :

Ce qui précède est le contenu détaillé de. pour plus d'informations, suivez d'autres articles connexes sur le site Web de PHP en chinois!