mfaure
Messages postés48Date d'inscriptionmardi 28 mars 2006StatutMembreDernière intervention22 septembre 2011
-
21 avril 2006 à 10:26
mfaure
Messages postés48Date d'inscriptionmardi 28 mars 2006StatutMembreDernière intervention22 septembre 2011
-
24 avril 2006 à 10:37
bonjour à tous
voilà, j'ai besoin, au début de ma macro d'effacer un tableau excel, pour qu'il soit rempli à nouveau. le bout de code que j'utilise est le suivant :
k=1
While XlApp.Workbooks(1).Worksheets(1).Cells(k, 1) <> ""
For l = 1 To 10
XlApp.Workbooks(1).Worksheets(1).Cells(k, l) = ""
Next l
k = k + 1
Wend
mais cela ne marche pas, rien n'est modifié dans mon tableau. Où est donc mon erreur ?
cs_loulou69
Messages postés672Date d'inscriptionmercredi 22 janvier 2003StatutMembreDernière intervention 2 juin 20161 24 avril 2006 à 09:09
Bonjour
k=1
WorkSheets("nomFeuille").Activate
While ActiveSheet.Cells(k, 1).Value <> ""
For l = 1 To 10
ActiveSheet.Cells(k, l).Value = ""
Next l
k = k + 1
Wend
jrivet
Messages postés7392Date d'inscriptionmercredi 23 avril 2003StatutMembreDernière intervention 6 avril 201260 21 avril 2006 à 10:44
Salut,
Si tu connais la plage de ton tableau essaie ceci:
XlApp.Workbooks(1).Worksheets(1).Range("B4:E9").ClearContents 'Ceci efface une zone allant de B4 a E9
@+, Julien Pensez: Moteur de Recherche, Réponse Acceptée
mfaure
Messages postés48Date d'inscriptionmardi 28 mars 2006StatutMembreDernière intervention22 septembre 2011 21 avril 2006 à 10:48
Salut
merci de ta réponse, mais je ne connais pas la plage de mon tableau, ou pluto j'en connais les 3/4 : c'est A3:Jqqchose, le qqchose pouvant varier entre 13 et 2000.......
mfaure
Messages postés48Date d'inscriptionmardi 28 mars 2006StatutMembreDernière intervention22 septembre 2011 21 avril 2006 à 12:05
re
ça m'a l'air pas mal comme solution, sauf que je ne sait pas comment sauvegarder ma ligne 2, car ce n'est pas vraiment du texte qu'il y a dedans, mais une fonction excel...