modif macro

ERIC S

XLDnaute Barbatruc

• 25 Avril 2006

• #2

Bonjour

modifie la ligne de macro

if ws.name (différent) 'recap'

en

if ws.name (différent) 'recap' and ws.name (différent) 'liste'

remplacer (différent) par signes correspondant bien sûr

A+

 

Vote positif 0 Vote négatif

L

ltbg

Guest

• 25 Avril 2006

• #3

merci pour ta reponse mais j'ai un nouveau bug qui apparait :

.Cells(derligne, 1).Resize(UBound(tablo, 1), UBound(tablo, 2)) = tablo

 

Vote positif 0 Vote négatif

L

ltbg

Guest

• 25 Avril 2006

• #4

OK j'ai trouve !!!

en fait il faut que ma ligne n° 1 ne soit pas vide

merci beaucoup

 

Vote positif 0 Vote négatif

ERIC S

XLDnaute Barbatruc

• 25 Avril 2006

• #5

re

chez moi pas d'erreur par contre il y a un espace après liste dans le nom, à répercuter

A+ [file name=essairecapforumbouton_20060425154848.zip size=17757]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/essairecapforumbouton_20060425154848.zip[/file]

 

Pièces jointes

• essairecapforumbouton_20060425154848.zip

  17.3 KB · Affichages: 6

Vote positif 0 Vote négatif

L

ltbg

Guest

• 25 Avril 2006

• #6

Juste une derniere chose :

je voudrais éviter egalement l'extraction de la première ligne de chaque feuiile (qui contient l'en tete)

merci

 

Vote positif 0 Vote négatif

ERIC S

XLDnaute Barbatruc

• 25 Avril 2006

• #7

re

essaie de mettre

Rows(derligne & ':' & derligne).Select
Selection.Delete Shift:=xlUp

juste avant le end with

A+

 

Vote positif 0 Vote négatif

L

ltbg

Guest

• 25 Avril 2006

• #8

SUPER ca marche !!!

merci beaucoup.

J'ai enfin automatisé un fichier de 42000 adresses.

merci

 

Vote positif 0 Vote négatif