Vba ou excel

lepeuple Messages postés 15 Statut Membre -  
lepeuple Messages postés 15 Statut Membre -
Bonjour,

J'ai une cellule (A1) qui contient plusieurs informations ("Abricot", "Fraise", "Cerises", "pastèque") et j'aimerai transférer cette seule ligne en plusieurs colonnes c'est-à-dire que B1 contienne Abricot, C1 contienne Fraise, D1 Cerise, et enfin E1 contienne pastèque.

Dois-je coder quelque chose,

Je reste à votre entière disposition,

Merci pour votre aide

2 réponses

  1. cs_Le Pivert Messages postés 8437 Statut Contributeur 730
     
    Bonjour,

    En vba, faire Alt F11 pour accéder à l'éditeur.
    Ensuite sélectionner la feuille concernée en haut à gauche et mettre ce code:

    Option Explicit
    Dim chaine As String
    Dim Tableau() As String
    Dim i As Integer
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Address = "$A$1" Then
    chaine = Target.Value
     Tableau = Split(chaine, ",") 'séparation
         'boucle sur le tableau pour visualiser le résultat
        For i = 0 To UBound(Tableau)
            'Le résultat s'affiche dans les cellules appropriées
           Range("B1").Value = Tableau(0)
            Range("C1").Value = Tableau(1)
             Range("D1").Value = Tableau(2)
              Range("E1").Value = Tableau(3)
         Next i
    End If
    End Sub
    

    0
    1. lepeuple Messages postés 15 Statut Membre
       
      Merci Le Pivert ! C'est très sympa de ton aide ! Je teste ça demain ... Mais en attendant Mille fois mercis ! J'apprécie ton aide ! Passe une bonne soirée et j'espere pouvoir t'aider un jour
      0
  2. Le Pingou Messages postés 12275 Date d'inscription   Statut Contributeur Dernière intervention   1 478
     
    Bonjour,
    Ou simplement par Copier, Coller puis l'outil Convertir

    0
    1. lepeuple Messages postés 15 Statut Membre
       
      Merci Le Pingou ! Sympa de ton aide ! Je regarde ça demain :) Bonne soirée
      0