Bonsoir à tous,

J'ai actuellement à ma disposition un fichier excel sous cette forme : 

        A                           B
1) Client 1                  Client 2 ......
2) Commande 1           Commande 2....
J'aimerais ainsi extraire chaque colonne dans un fichier à part du style. Ce qui nous ferait en gros un fichier pour chaque client que j'aimerais également nommé "Client1.xls"

Pour l'instant, voici ce que j'ai écrit dans ma macro :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Sub ExtractionColonnes()
 
Dim Cell As Range
 
Dim R As Range
 
Worksheets("Feuil2").Columns(1).Value = Worksheets("Feuil1").Columns(2).Value
 
End Sub
L'extraction s'effectue mais dans une autre feuille. Hors je souhaiterais que cela se fasse dans un fichier différent. Si quelqu'un pouvait m'aider!

Merci beaucoup!

Update :

Après quelques recherches j'ai remplacé la ligne 7 par ceci :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
Workbooks('"Classeur2.xls").Worksheets("Feuil1").Columns(1).Value = ActiveWorkbooks.Worksheets("Feuil1").Columns(2).Value
Cela me donne une erreur :

Erreur d'éxécution 424 : objet requis!