Discussion :

[SBAY3I]

bonsoir,
erreur d'execution'62'
l'entree dépasse la fin de fichier

[Qwazerty]

Salut

Sans ton code il nous est impossible de te répondre.

++
Qwaz

[SBAY3I]

voila le code

Code :

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

1
2
3
Open nf For Input As 1
r = Input(LOF(1), 1)
Close

merci pour votre reponse

[patricktoulon]

bonjour
ca c'est une partie du code il nous faut tout le code !!

sica peut corriger te lacunes voici un exempe COMPLET!!! de lecture de fichier avec open
je te suggere de et attire ton attention sur les diezes

Code :

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

1
2
3
4
5
6
7
8
9
Sub lecture3()    ' recupe le texte complet avec input simple
    Dim x As Integer: x = FreeFile
    Dim lines As String
    fichier = "C:\Users\polux\Desktop\ttt.txt"
    Open fichier For Input As #x
    lines = Input$(LOF(x), #x)
    Close #x
    Debug.Print lines
End Sub

[78chris]

Bonjour

Je précise que SBAY3I

• est totalement débutant en Excel
• a posté sur plusieurs forums des fichiers texte qu'il souhaite convertir en Excel

Problème :
ce sont des captures d'impression avec en-têtes, titres, tableau, puis infos synthétiques du tableau puis pied de page.
les divers fichiers postés ont chacun une structure différente et les pages d'un même fichier ont aussi une structure différente.
Certaines infos des titres ou des synthèses doivent s'incorporer au tableau cible Excel

J'ai passé quelques heures à chercher une solution avant de répondre que faute de logique homogène, il était impossible d'automatiser.

Je n'ai eu aucune réponse de SBAY3I mais je vois surgir des messages ici et là qui n'expliquent pas le contexte donc je le précise...

[Qwazerty]

Salut

Merci pour les infos 78chri.

++
Qwaz

[78chris]

Re

Le souci c'est la différence de structure et d'un fichier à l'autre et d'une page du même fichier à l'autre. Et je pense qu'il peut y avoir encore d'autres structures que celles postées sur ces 2 forums

Même en VBA il faut une logique... et si les infos ne sont pas dans le fichier on ne peut les inventer (vitesse par exemple)