Keskustelu: Ohjelmointikysymykset: VBA: Haku Excel-tiedostoista

Hei,

Onpa hieno sivusto, olen nyt yli 4 tuntia lukenut ja oppinut mielestäni jo aika paljon :)

Itselläni on perintönä saatu VB-koodi, joka Excelissä nappia painamalla hakee samassa kansiossa sijaitsevista muista Exceleistä erilaisia tietoja. Nyt yritin luoda sinne uuden kansion, josta myös tietoa haettaisiin, mutta haku ei toimi, jos tiedostoni alkaa ä tai ö-kirjaimella. Y-alkuiset hakee, vaikka tiedostossa myöhemmin olisi ääkkösiä. Olen yrittänyt tutkia tuota VB-tä, mutta mielestäni siellä ei missään rajoiteta, että millä kirjaimella tiedostot pitäisi alkaa.

Yritin lukea noita aiempia keskusteluita, varsinkin ääkkös-ongelmista, mutta en löytänyt tähän sopivaa vastausta tai sitten en vain ymmärtänyt lukemaani.

Kiitos etukäteen vaivannäöstä!

Ei oikein voi auttaa, jos et näytä koodistasi sitä osaa, jolla tiedostoja haetaan.

Moikka,
No niinpä tietysti, mutta kun tässä on 856 riviä, enkä yhtään tiedä, mikä kohta tuossa koodissa niitä alkaa avaamaan, kun missään tuolla ei mainita edes sen kansion nimeä, minkä alla ne ovat.. :(
Ehkäpä se olisi tämä, kun tuossa ainakin mainitaa tuo solu, johon pitää olla kirjoitettu oikein se hakukansion osoite:

Set foldero = fso.GetFolder(ActiveSheet.Range("B6").Value)
Set objFiles = fso.GetFolder(ActiveSheet.Range("B6").Value).Files
tiedostojaHakemistossa = objFiles.Count


ActiveSheet.Range("B6").Select
If ActiveCell = "" Then
    MsgBox "There are no Things to collect koonti from. Please check sell H3"
    Exit Sub
Else
    Do While ActiveCell.Value <> ""
        polkujenMaara = polkujenMaara + 1
        ActiveCell.Offset(1, 0).Select
    Loop
End If

Mutta jos tämä ei aukea tällä, niin me keksitään sitten kaikille ä-alkuisille tiedostoille nimeksi yä-alkuinen, eli ei tässä mitään hätää ole :)

Kiitos taas!