Macro VBA pour concaténer les colonnes de données dans Excel

S’applique à : Microsoft Office Excel 2007Excel 2010Microsoft Office Excel 2003

Résumé


Dans Microsoft Excel, vous pouvez utiliser une macro pour concaténer les données dans deux colonnes adjacentes et afficher le résultat dans la colonne à droite des colonnes qui contiennent vos données. Cet article contient un exemple de Microsoft Visual Basic pour Applications macro VBA () (procédure Sub) effectuer cette opération.

Plus d'informations


Microsoft fournit des exemples de programmation à titre d'illustration uniquement, sans garantie expresse ou implicite. Ceci inclut, mais n'est pas limité à, les garanties implicites de qualité marchande ou d'adéquation à un usage particulier. Cet article suppose que vous êtes familiarisé avec le langage de programmation présenté et les outils utilisés pour créer et déboguer des procédures. Les ingénieurs du support technique Microsoft peuvent aider à expliquer la fonctionnalité d'une procédure particulière. Toutefois, ils ne modifieront pas ces exemples pour fournir des fonctionnalités supplémentaires ou créer des procédures répondant à vos besoins spécifiques.

De Visual Basic pour Applications exemple de macro VBA)

Sub ConcatColumns()

Do While ActiveCell <> "" 'Loops until the active cell is blank.

'The "&" must have a space on both sides or it will be
'treated as a variable type of long integer.

ActiveCell.Offset(0, 1).FormulaR1C1 = _
ActiveCell.Offset(0, -1) & " " & ActiveCell.Offset(0, 0)

ActiveCell.Offset(1, 0).Select
Loop

End Sub
Remarque: l’instruction ActiveCell.Offset (0, 1). FormulaR1C1 peut être remplacé par l’instruction ActiveCell.Offset (0, 1). Formule. Ils peuvent être utilisés avec grand succès si vous utilisez un texte et des nombres uniquement (pas de formules). Le L1C1 utilisé à la fin de la première instruction fait référence à une colonne de 1, ligne 1 et est utilisée dans les exemples dans l’aide.

L’utilisation de la macro dans Microsoft Office Excel 2007

  1. Ouvrez le classeur qui contient les données.
  2. Appuyez sur ALT + F11 pour démarrer Visual Basic Editor.
  3. Dans le menu Insertion , cliquez sur Module pour insérer un module. Tapez la macro dans la fenêtre de code du module.
  4. Dans le menu fichier , cliquez sur Fermer et retourner à Microsoft Excel.
  5. Sélectionnez la feuille de calcul qui contient les données à concaténer.
  6. Cliquez sur la cellule supérieure dans la colonne de droite de données à concaténer. Par exemple, si les cellules a1 : A100 et B1:B100 contiennent des données, cliquez sur la cellule B1.
  7. Cliquez sur l’onglet développeur . Si l’onglet développeur n’est pas affichée, procédez comme suit :
    1. Cliquez sur le bouton Microsoft Office, puis sur Options Excel.
    2. Cliquez sur les plus courants.
    3. Cliquez pour sélectionner la case à cocher Afficher l’onglet Développeur dans le ruban .
    4. Cliquez sur OK pour fermer la boîte de dialogue Options Excel .
  8. Dans le groupe Code , cliquez sur Macros .
  9. Sélectionnez la macro ConcatColumns, puis cliquez sur exécuter.

L’utilisation de la macro dans Microsoft Office Excel 2003 et dans les versions antérieures d’Excel

  1. Ouvrez le classeur qui contient les données.
  2. Appuyez sur ALT + F11 pour démarrer Visual Basic Editor.
  3. Dans le menu Insertion , cliquez sur Module pour insérer un module. Tapez la macro dans la fenêtre de code du module.
  4. Dans le menu fichier , cliquez sur Fermer et retourner à Microsoft Excel.
  5. Sélectionnez la feuille de calcul qui contient les données à concaténer.
  6. Cliquez sur la cellule supérieure dans la colonne de droite de données à concaténer. Par exemple, si les cellules a1 : A100 et B1:B100 contiennent des données, cliquez sur la cellule B1.
  7. Dans le menu Outils , pointez sur Macros, puis cliquez sur Macro. Sélectionnez la macro ConcatColumns, puis cliquez sur exécuter.

Références


Pour plus d’informations sur Visual Basic pour Applications, cliquez sur le numéro ci-dessous pour afficher l’article correspondant dans la Base de connaissances Microsoft :

226118 liste des ressources qui sont disponibles pour vous aider à apprendre Visual Basic pour Applications de programmation