nop, ça ne vas pas aller,
en fait un text qui commence e t fini toujours pareil, je veux récuperer le données qu'a partir d'un certain mots et jusqu'a un certain mots, vu ke ce ki est avant et apres je m'en moques. donc je scan mon texte mot a mot et qt j'arrive sur le mots en question Qu'il me les envois vers mon tableau excel, probleme que l'on a résolu, jusqu'a ce k'il tombe sur un autre mots où le programme doit arreter le trandfert vers excel.
me fais comprendre ?
For intI = LBound(strTab) To UBound(strTab)
If InStr(1, strTab(intI), "motsdebut") <> 0 Then While InStr(1, strTab(intI), "motsfin") = 0 XL.Range("A" & "1" + intI) = strTab(intI) Wend End If
Next intI
------------------------------- Réponse au message : -------------------------------
Je ne comprends pas bien ce que tu veux faire, mais essaie ça :
for i = 1 to 10 if i = 4 then j=4 while j <> 7 print j j=j+1 wend end if next i
------------------------------- Réponse au message : -------------------------------
Salut
j'ai encore un problème, merci a tous et aux forums.
soit une boucle
for i = 1 to 10
if i = 4 then
while i <> 7 print i wend 'seulement là je ne renouvelle pas ma boucle et forcement si je fais next i ne serat plus 4
end if next i
le but est que dans une chaine de caractère éx ploré avec la boucle dès que je tombe sur un mots précis, if i = 4, il execute une commande jusqua ce k'il tombe sur un nouveau mots précis. et recommence ça boucle
ça m'a pas l'air si sorcier pourtant, encore un mot que je ne connais pas ? :)
|