EXCEL- Effacer fichiers à partir d'1 liste de
Résolu/Fermé
Peter2302
Messages postés
16
Date d'inscription
lundi 9 février 2009
Statut
Membre
Dernière intervention
10 février 2009
-
9 févr. 2009 à 15:51
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 - 10 févr. 2009 à 10:50
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 - 10 févr. 2009 à 10:50
A voir également:
- EXCEL- Effacer fichiers à partir d'1 liste de
- Liste déroulante excel - Guide
- Aller à la ligne excel - Guide
- Formule excel - Guide
- Excel liste déroulante en cascade - Guide
- Recherche a partir dune photo - Guide
10 réponses
lermite222
Messages postés
8702
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
1 190
9 févr. 2009 à 16:03
9 févr. 2009 à 16:03
Bonjour,
dans l'éditeur VBA tu tape Kill , tu sélectionne et tu tape F1.
A+
dans l'éditeur VBA tu tape Kill , tu sélectionne et tu tape F1.
A+
Peter2302
Messages postés
16
Date d'inscription
lundi 9 février 2009
Statut
Membre
Dernière intervention
10 février 2009
1
9 févr. 2009 à 16:07
9 févr. 2009 à 16:07
Excuses moi je n'ai pas tout saisi, dans l'éditeur je dois sélectionner quoi?
lermite222
Messages postés
8702
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
1 190
9 févr. 2009 à 16:09
9 févr. 2009 à 16:09
Tu tape le mot Kill ensuite tu double clic sur ce mot (il va se surligné en bleu) et tu tape F1. L'aide va tout t'expliquer.
Si pas bien clair, hésite pas tu dis...
A+
Si pas bien clair, hésite pas tu dis...
A+
Peter2302
Messages postés
16
Date d'inscription
lundi 9 février 2009
Statut
Membre
Dernière intervention
10 février 2009
1
9 févr. 2009 à 16:37
9 févr. 2009 à 16:37
Re ermite,
J'ai bien regardé le fichier et penses avoir compris mais je sais pas vraiment comment procéder... il me semble aussi que je sois obligé de supprimer un fichier situé dans le répertoire sélectionné. Je voudrais pouvoir effacer directement a partir de ma liste de chemins... rrrrr je galère..
J'ai bien regardé le fichier et penses avoir compris mais je sais pas vraiment comment procéder... il me semble aussi que je sois obligé de supprimer un fichier situé dans le répertoire sélectionné. Je voudrais pouvoir effacer directement a partir de ma liste de chemins... rrrrr je galère..
Peter2302
Messages postés
16
Date d'inscription
lundi 9 février 2009
Statut
Membre
Dernière intervention
10 février 2009
1
9 févr. 2009 à 16:26
9 févr. 2009 à 16:26
merci génial j'm'y mets de ce pas!
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
lermite222
Messages postés
8702
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
1 190
9 févr. 2009 à 16:48
9 févr. 2009 à 16:48
Kill Range("OùEstLeNomDuFichier")
Fait gaffe parce que c'est supprimé definitivement.
Attention, le chemin complet+ le répertoir doivent être dans la cellule.
tu dis...
A+
Fait gaffe parce que c'est supprimé definitivement.
Attention, le chemin complet+ le répertoir doivent être dans la cellule.
tu dis...
A+
Peter2302
Messages postés
16
Date d'inscription
lundi 9 février 2009
Statut
Membre
Dernière intervention
10 février 2009
1
9 févr. 2009 à 16:52
9 févr. 2009 à 16:52
merci beaucoup!
Je voudrais s'il est possible de désigner directement la colonne concerné dans ma feuille, car si je dois les rentrer un par un j'en ai pour un bon moment! :)
Je voudrais s'il est possible de désigner directement la colonne concerné dans ma feuille, car si je dois les rentrer un par un j'en ai pour un bon moment! :)
Peter2302
Messages postés
16
Date d'inscription
lundi 9 février 2009
Statut
Membre
Dernière intervention
10 février 2009
1
9 févr. 2009 à 16:59
9 févr. 2009 à 16:59
J'ai vraiment du mal désolé... pourrais me joindre un exemple stp?
merci encore!
merci encore!
lermite222
Messages postés
8702
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
1 190
9 févr. 2009 à 16:57
9 févr. 2009 à 16:57
Supposons que tu a le noms de chemi+Fichier+extention dans les cellules A1 à A10
1 pour la colonne A, B pour 2 etc..
For i =1 pour la ligne 1 à &à.
Dis plutôt dans quel cellules se trouvent les données.
Sub Supp()
dim i as byte
For i=1 to 10
kill cells(i,1).value
next i
end subTes cellules doivent êtres renseignées en texte.
1 pour la colonne A, B pour 2 etc..
For i =1 pour la ligne 1 à &à.
Dis plutôt dans quel cellules se trouvent les données.
lermite222
Messages postés
8702
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
1 190
9 févr. 2009 à 17:04
9 févr. 2009 à 17:04
voir message 8 et tu dis...(croisement)
Peter2302
Messages postés
16
Date d'inscription
lundi 9 février 2009
Statut
Membre
Dernière intervention
10 février 2009
1
9 févr. 2009 à 17:38
9 févr. 2009 à 17:38
J'ai une erreur d'éxecution 53 le fichier est introuvable au niveau de la ligne Kill Cells(i, 1).Value
Peter2302
Messages postés
16
Date d'inscription
lundi 9 février 2009
Statut
Membre
Dernière intervention
10 février 2009
1
9 févr. 2009 à 17:40
9 févr. 2009 à 17:40
J'ai remplacé le 10 par 224 (qui est mon nombre de lignes) Ai-je oublié quelque chose? Je suis vraiment novice désolé^^ je me forme :) (tant bien que mal!)
lermite222
Messages postés
8702
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
1 190
10 févr. 2009 à 02:40
10 févr. 2009 à 02:40
Le fichier que tu as renseigné sur la ligne n'existe pas ou le nom n'est pas bon ou le chemin n'est pas bon.
Attention.. Il arrive souvent qu'ont "glisse" un espace ou y faut pas.
Edit:
Et si tu a déja fait fonctionner la macros, certain fichiers n'existe plus, pour aller jusqu'au bout ajoute la ligne...
Attention.. Il arrive souvent qu'ont "glisse" un espace ou y faut pas.
Edit:
Et si tu a déja fait fonctionner la macros, certain fichiers n'existe plus, pour aller jusqu'au bout ajoute la ligne...
Sub Supp()
dim i as integer 'Changer aussi ICI
On Error Resume Next 'Ajouter ICI
For i=1 to 10
kill cells(i,1).value
next i
end sub
Peter2302
Messages postés
16
Date d'inscription
lundi 9 février 2009
Statut
Membre
Dernière intervention
10 février 2009
1
10 févr. 2009 à 10:47
10 févr. 2009 à 10:47
salut lermite222
J'ai essayé ta macro qui ne m'affiche aucun message d'erreur mais n'efface pas mes fichiers... mais j'ai trouvé la solution en vadrouillant sur la toile, c'est quasiment la même chose:
Sub Effacer_Fichier()
Dim i as Integer
On Error Resume Next
For i=1 to 10 'A adapter au nombre de lignes
Kill Cells(i,1).Value
Next i
End Sub
Merci beaucoup!!
J'ai essayé ta macro qui ne m'affiche aucun message d'erreur mais n'efface pas mes fichiers... mais j'ai trouvé la solution en vadrouillant sur la toile, c'est quasiment la même chose:
Sub Effacer_Fichier()
Dim i as Integer
On Error Resume Next
For i=1 to 10 'A adapter au nombre de lignes
Kill Cells(i,1).Value
Next i
End Sub
Merci beaucoup!!
lermite222
Messages postés
8702
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
1 190
>
Peter2302
Messages postés
16
Date d'inscription
lundi 9 février 2009
Statut
Membre
Dernière intervention
10 février 2009
10 févr. 2009 à 10:50
10 févr. 2009 à 10:50
Pas compris !!! où est la différence ?
