coipe données listbox sur classeur excel

[damien]

bonjour le forum,
avec cette macro je copie ma listbox sur un classeur excel apres mes données il remplie mes cases par #N/A. et je voudrai que mes cases soit vides.

merci damien

Private Sub CommandButton1_Click()

Dim Tableau() As Variant
Dim i As Long
Dim j As Byte

Application.ScreenUpdating = False
Workbooks.Add 'création d'un nouveau classeur temporaire
Range('a1') = 'immat'
Tableau() = ListBox1.List
j = ListBox1.ColumnCount
i = ListBox1.ListCount
Range('A1:' & Cells(i, j).Address).EntireColumn = Tableau()


Application.ScreenUpdating = True
Cells.Select
Cells.EntireColumn.AutoFit
Range('A2').Select


End Sub

 

[Nevil]

Bonjour,

Envoie plutot ton fichier, ca sera plus simple a comprendre et a manipuler.

Merci

Julien

 

[Nevil]

Bonjour,

Envoie plutot ton fichier, ca sera plus simple a comprendre et a manipuler.

Merci

Julien

 

[damien]

bonjour,


voici le fichier

merci nevil
damien

 

[damien]

2ème chance

 

[damien]

 

[damien]

je retente ma chance

 

[damien]

cette fois ci c'est bon
mille excuses
damien [file name=rechercheCOPIE_20060515174342.zip size=12594]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/rechercheCOPIE_20060515174342.zip[/file]