Discussion :

[Ted37]

Bonjour,

Je souhaite copier 3 lignes d'un fichier txt dans un autre fichier s'appelant resultat.txt. (la cerise serait de copier ces lignes à partir du "nième" caractère)
En cherchant, j'ai trouvé ça

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
@echo off
set Numéro=%1
set "ligne="
set/a Numéro-=1
for /f "delims=" %%a in ('more/e +%%Numéro%% ^< fichier.txt') do (
if not defined ligne set "ligne=%%a"
)
echo %ligne%

mais ça ne fonctionne que pour une ligne. Faut-il faire ça

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
@echo off
set Numéro=%2
set "ligne="
set Numéro2=%30
Set Numéro3=%31
set/a Numéro-=2
set/a Numéro-=30
set/a Numéro-=31
for /f "delims=" %%a in ('more/e +%%Numéro%% ^< "resultat" &"_"& NomFic & "" & "".txt""') do (
if not defined ligne set "ligne=%%a"
)
echo %ligne%

d'avance merci

[tcherrio]

Salut!
Fais ceci:

@echo off
for /f "tokens=1,* delims=:" %%i in ('findstr /n /r . fichier.txt') do if %%i geq 1 if %%i leq 3 echo %%j >> resultat.txt
pause

Note:
Ici tu auras les lignes 1 à 3 de fichier.txt, si tu veux les lignes 20 à 23 tu devras marquer ( gep 20 et leq 23)

Bye

[Ted37]

Merci pour la piste!
Mais ce qui m'intéresse, c'est de récupérer les lignes 2 / 30 et 31!

[tcherrio]

Re,

@echo off
for /f "tokens=1,* delims=:" %%i in ('findstr /n /r . fichier.txt') do if %%i geq 2 if %%i leq 2 echo %%j >> resultat.txt
for /f "tokens=1,* delims=:" %%i in ('findstr /n /r . fichier.txt') do if %%i geq 30 if %%i leq 31 echo %%j >> resultat.txt
pause

Cela devrait coller

[Drizzt [Drone38]]

Tu peux faire quelque chose comme cela aussi :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

findstr /n /r . fichier.txt | findstr /b "2: 30: 31:" >> resultat.txt

Il te restera juste à retirer les 2: 30: et 31:. Ce que tu peux faire en adaptant le for de tcherrio.

[Ted37]

Merci à vous!

J'ai un peu galéré, car j'intègre ça dans un code vba, avec des variables ;-). Ca fonctionne, sauf que je dois avoir un pb dans mon code vba (et ma boucle) car je me retrouve avec mon dernier fichier de chaque occurence comprenant 6 fois mes informations.

Je reposterai éventuellement lundi, si je n'ai pas trouvé.

Bon week end à vous et encore merci