Pagina 1 van 1

[Opgelost] Automatisch csv bestanden selecteren.

BerichtGeplaatst: ma okt 08, 2012 8:32 am
door Martin73
Goede morgen,
Als matige tot redelijke VBA programmeur in Ecxel probeer ik nu een macro voor calc te schrijven. De bedoeling is dat ik met de druk op een knop

1) automatisch de optie bestand openen start
2) alleen de csv files te zien krijg
3) deze inlees.

Nu is Basic anders dan VBA, dus ben ik ook op het net aan het zoeken geweest en met een stukje gejatte code, die ik wat heb aangepast kom ik redelijk ver.
Ik krijg het alleen nog niet voor elkaar om alleen de csv-files in mijn zoek lijstje te krijgen. Ik krijg nog steeds alles. Hoe pak ik dit aan?

Dit is mn code:

Option explicit

Sub OpenWaarnemingnl
Dim FileNaam as String
FileNaam = BestandOpenenDialoog ("Kies een bestand")

' Nu gaat ie naar Function BestandOpenenDialoog
print "Gekozen bestand: "+FileNaam

end Sub


Function BestandOpenenDialoog(Titel as String) as String
Dim Bestandkiezer as Variant
Dim Bestanden as Variant
Bestandkiezer = createUnoService("com.sun.star.ui.dialogs.FilePicker")
Bestandkiezer.Title = Titel
Bestandkiezer.execute()
Bestanden = bestandkiezer.getFiles()
BestandOpenenDialoog=bestanden(0)
End function

Re: Automatisch csv bestanden selecteren.

BerichtGeplaatst: ma okt 08, 2012 10:01 am
door eremmel
Martin, Even de FilePicker in google gedaan en toen kwam ik een voorbeeld tegen met een Filter.
Op de pagina FilePicker Service kun je zien dat er ook een XFilterManager interface is. Deze kun je gebruiken lijkt me.

Succes,
Erik

Re: Automatisch csv bestanden selecteren.

BerichtGeplaatst: ma okt 08, 2012 11:25 am
door Martin73
Hoi Erik,
Ik zal deze vanavond even goed bestuderen.
Alvast hartelijk dank!
Groet Martin

Re: Automatisch csv bestanden selecteren.

BerichtGeplaatst: ma okt 08, 2012 11:44 am
door Martin73
Jup het werk!
Martin

Re: [Opgelost] Automatisch csv bestanden selecteren.

BerichtGeplaatst: di okt 09, 2012 3:07 pm
door RPG
Hallo

Het zou mooi zijn als je de complete oplossing op dit forum plaatst. Zo mogelijk voorzien van Nederlands commentaar. Dit Nederlands forum is onder anderen opgericht voor diegenen die moeite hebben met het Engels wat meestal de gebruikte taal is in dien macros gebruikt worden.

Romke