Comment supprimer 4 ligne sur 5 ds une liste
dark101
-
gbinforme Messages postés 15481 Date d'inscription Statut Contributeur Dernière intervention -
gbinforme Messages postés 15481 Date d'inscription Statut Contributeur Dernière intervention -
comment supprimer 6 ligne sur 7 ds une liste énorme (elle est ds un fichier txt )
Iron Storm - pc (c'est cette ligne que je veut garder)
Editeur : Wanadoo Edition *
Developpeur : 4x Studios *
PEGI : Inconnu *(c'est à chaque étoile que la ligne
Sorti le : 23 Oct 2002 * doit étre supprimer)
*
*
Isle of Man T.T. - playstation2
Editeur : Jester Interactive*
Developpeur : Jester Interactive*
PEGI : Inconnu*
Sorti le : 2004*
et ca pour +de 4000jeux
j'ai python comme logiciel de prog ms si vous voulez le faire sur un autre précisément juste lequel
ps:je n'y connait rien en prog alors si vous pouviez taper le prog en entier merci
Iron Storm - pc (c'est cette ligne que je veut garder)
Editeur : Wanadoo Edition *
Developpeur : 4x Studios *
PEGI : Inconnu *(c'est à chaque étoile que la ligne
Sorti le : 23 Oct 2002 * doit étre supprimer)
*
*
Isle of Man T.T. - playstation2
Editeur : Jester Interactive*
Developpeur : Jester Interactive*
PEGI : Inconnu*
Sorti le : 2004*
et ca pour +de 4000jeux
j'ai python comme logiciel de prog ms si vous voulez le faire sur un autre précisément juste lequel
ps:je n'y connait rien en prog alors si vous pouviez taper le prog en entier merci
A voir également:
- Comment supprimer 4 ligne sur 5 ds une liste
- Supprimer rond bleu whatsapp - Guide
- Liste déroulante excel - Guide
- Comment supprimer une page sur word - Guide
- Partager photos en ligne - Guide
- Comment recuperer un message supprimé sur whatsapp - Guide
5 réponses
bonsoir
si tu as excel, tu ouvres un nouveau classeur et tu mets cette macro
dans la feuille en cours en changeant le nom du fichier
et tu la lances pour récupérer les lignes sur la feuille.
Sub lect()
Dim Lig, tex,fich
Lig = 0
Open "c:\test.txt" For Input As #1
Do While Not EOF(1)
Line Input #1, tex
If Not Right(tex, 1) = "*" Then
Range("a1").Offset(Lig, 0).Value = tex
Lig = Lig + 1
End If
Loop
Close #1
End Sub
si tu as excel, tu ouvres un nouveau classeur et tu mets cette macro
dans la feuille en cours en changeant le nom du fichier
et tu la lances pour récupérer les lignes sur la feuille.
Sub lect()
Dim Lig, tex,fich
Lig = 0
Open "c:\test.txt" For Input As #1
Do While Not EOF(1)
Line Input #1, tex
If Not Right(tex, 1) = "*" Then
Range("a1").Offset(Lig, 0).Value = tex
Lig = Lig + 1
End If
Loop
Close #1
End Sub
Essaie ceci :
import re
input_file = 'input.txt'
output_file = 'output.txt'
fin = open(input_file)
fout = open(output_file, 'w')
line = fin.readline()
while line:
if not re.match('^(Editeur|Developpeur|PEGI|Sorti|\*|$)', line):
fout.write(line)
line = fin.readline()
fout.close()
pour le truc avec excel je comprend pas tu pourrait me faire un guide pas a pas
je suis desoles de t'en demander encore plus alors que tu ma quasiment tout donner
merciencore
je suis desoles de t'en demander encore plus alors que tu ma quasiment tout donner
merciencore
bonsoir
j'ai créé un classeur excel prêt à l'emploi et tu peux le récupérer ici :
http://cjoint.com/?duvbJjRjtV
il devrait s'ouvrir dans excel automatiquement et il faut activer les macros dans excel si ce n'est pas fait en standard.
pour cela c'est le menu outils/macro/sécurité puis
cocher le niveau moyen
j'ai créé un classeur excel prêt à l'emploi et tu peux le récupérer ici :
http://cjoint.com/?duvbJjRjtV
il devrait s'ouvrir dans excel automatiquement et il faut activer les macros dans excel si ce n'est pas fait en standard.
pour cela c'est le menu outils/macro/sécurité puis
cocher le niveau moyen
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
bonjour
Mets un petit exemple de ton fichier sur https://www.cjoint.com/
car il faut certainement une procédure spécifique.
Mets un petit exemple de ton fichier sur https://www.cjoint.com/
car il faut certainement une procédure spécifique.
