Recuperation de colonne

[GHISLAIN]

bonjour a tous et bonnes fetes ,

je cherche a recuperer plusieurs colonnes suivant une choix dans un combobox

je souhaite mettre a la suite les valeur trouvees a la suite dans une seule colonne sans vide

ci joint un fichier qui je l espere explicite a ce que je recherche

merci a tous de votre aide et proposition

amicalement

ghislain

 

[Robert]

Re : Recuperation de colonne

Bonjour Ghislain, bonjour le forum,

En pièce jointe ton fichier commenté et modifié.

 

[Staple1600]

Re : Recuperation de colonne

Bonjour


Un piste (comme cela à brule-pourpoint par manque de temps)
En passant par une feuille intermédiare

Piste à creusée (je repasse après le boulot)

Sub Macro2()
' Macro2 Macro
' Macro enregistrée le 19/12/2011 par l'agrafe

Sheets("base").Range("C4:N42").Copy
Sheets("Feuil3").Range("A1").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=True
Sheets("Feuil3").Range("A1:A12").AutoFilter Field:=1, Criteria1:="cuisine"
Sheets("Feuil3").Range("A3:X13").Copy
Sheets("Feuil3").Range("A15").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=True
Sheets("Feuil3").AutoFilterMode = False
Sheets("Feuil3").Rows("1:14").Delete
Sheets("Feuil3").Activate
End Sub

EDITION: Je n'avais pas vu passé Robert 😱
Salutations Robert

 

[GHISLAIN]

Re : Recuperation de colonne

bonjour robert ,staple1600,

je viens de voir l excellente proposition de robert et je dois dire qu'elle repond a ce que je recherche
je te remercie infinement
merci egalement a staple1600 de sa proposition

bonne fetes a tous

amicalement

ghislain