open fichierRésolu

Question

Bonjour!
je charge une ComboBox (la pas de Probleme) et suivant la selection
je voudrais ouvrir un fichier par une variable 
dans une ListBox
mai la je coince 
Merci 

Voici mon code:
Private Sub ComboChoix_Click()


Dim i, FF, Ind As Integer
Dim Fich , Ligne As String


Ind = ComboChoix.ListIndex
Varible = ComboChoix.List(Ind)


ListTitre.Clear
FF = FreeFile


Open "E:\Mes Documents\Variable.txt" For Input As #FF
    Do While Not EOF(FF)


      ' R&#233;cup&#232;re la ligne pointer dans le fichier
Line Input #FF, Ligne
' L'envoie dans la ListBox
ListTitre.AddItem Ligne
   
    Loop
Close #FF
End Sub

Utilisateur anonyme · Accepted Answer

Bonjour



Utilise des & pour s&#233;parer la variable du chemin



[...]

Open "E:\Mes Documents" & Variable & ".txt" For Input As #FF

[...]



ChRB
<hr size="2" width="100%">
Merci de cliquer sur "R&#233;ponse accept&#233;e" si une r&#233;ponse vous convient.

papounez · Answer

Re
C"est avec la Variable que je n"arrive
 pas a ouvrir le fichier
Merci

papounez · Answer

Ok
Merci super
je voudrais ajouter un F a ma Varible
j' essai plusieur solution mais je n"arrive pas
en voici une
[...]
Open "E:\Mes Documents" & F & Variable &
 ".txt" For Input As #FF

[...]
Merci

papounez · Answer

re
Excuse j'ai trove "F"
Merci

Open fichier

4 réponses

Discussions similaires