Base de donnée : Optimiser lecture dans ExcelRésolu

Question

Contexte :
J'utilise un fichier Excel comme 'base de donn&#233;es' pour y stocker des informations sur des films : titre, dur&#233;e, jaquette... Il y a pratiquement 1000 films r&#233;pertori&#233;s.
En VB, je lis toutes ces donn&#233;es et les affiche dans une ListBox. Or, la lecture prend environ 20 secondes, ce qui est beaucoup trop long.

Besoin :
Je souhaite pouvoir lire et afficher mes donn&#233;es dans la ListBox en 1 ou 2 secondes.

Questions :
Existe t'il un moyen de lire tr&#232;s rapidement des donn&#233;es dans un fichier Excel ?

Merci, d'avance.

cs_salazar · Accepted Answer

Je crois qu'il va falloir que je passe de la gestion de base Excel &#224; la gestion de base de donn&#233;es...

Merci,

cs_pluplu · Answer

Il faudrais peut &#234;tre penser &#224; utiliser quelque chose de plus appropri&#233; pour le traitement des donn&#233;es comme Access ou MySQL il existe pas mal d'exemples sur ce site.

Pascal Lauren&#231;on

cqui789 · Answer

Je me demande si un txt serait pas plus efficace que excel si excel ne fait pas de traitement

jpleroisse · Answer

Enregistre ton classeur dans un fichier.txt

Private Sub CommandButton1_Click()
   ActiveWorkbook.SaveAs FileName:= _
        "C:\Mes documents\Classeur1.txt" _
        , FileFormat:=xlText, CreateBackup:=False
End Sub

Ensuite rempli la listBox

Private Sub CommandButton2_Click()
Dim r As Long, Data
Open "Classeur1.txt" For Input As #1
r = 0
Do Until EOF(1)
Line Input #1, Data
ListBox1.AddItem Data
r = r + 1
Loop
Close #1
End Sub

jpleroisse