VB Avaa tiedosto hakemistosta

PirunTärkeä

Millä koodilla saa avattua hakemistopuuikkunan, josta voi valita avattavan tiedoston? Tarviisin "päätaulukkoon" koodin, jonka avulla taulukon kaveriksi voisi avata toisen vapaavalintaisen taulukon, mitä käytetään yhdistellessä tietoja.

3

112

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
      • PirunTärkeä

        Kiitos paljon Kunde. Toimii nyt loistavasti ja voi avata useammankin kerralla. Tuli vain uusi ongelma; kun avaa .csv tiedoston esim. suoraan Excelistä tai vaikka tiedostonhallinnasta klikkaamalla ilman Exceliä, tiedot tulee oikein sarakkeisiin. Mutta kun avaan sen makron avulla, tiedosto aukeaakin kuten tekstitiedostoa tuodessa. Tämä ei olisi ongelma ( sain makrolla tuotua ne oikein sarakkeisiin ), mutta en voi tuoda kaikkea tekstinä. Jossain sarakkeessa voi olla pvm ja se taas voi vaihdella missä sarakkeessa. Jälkikäteen tekstimuotoa en saa muutettua oikeaksi ellen muotoilun jälkeen tuplaklikkaa solua. Saako siis koodilla kerrottua, että toisi tiedoston "normaalisti"?


      • PirunTärkeä
        PirunTärkeä kirjoitti:

        Kiitos paljon Kunde. Toimii nyt loistavasti ja voi avata useammankin kerralla. Tuli vain uusi ongelma; kun avaa .csv tiedoston esim. suoraan Excelistä tai vaikka tiedostonhallinnasta klikkaamalla ilman Exceliä, tiedot tulee oikein sarakkeisiin. Mutta kun avaan sen makron avulla, tiedosto aukeaakin kuten tekstitiedostoa tuodessa. Tämä ei olisi ongelma ( sain makrolla tuotua ne oikein sarakkeisiin ), mutta en voi tuoda kaikkea tekstinä. Jossain sarakkeessa voi olla pvm ja se taas voi vaihdella missä sarakkeessa. Jälkikäteen tekstimuotoa en saa muutettua oikeaksi ellen muotoilun jälkeen tuplaklikkaa solua. Saako siis koodilla kerrottua, että toisi tiedoston "normaalisti"?

        Hei,

        Nyt sainkin kun löysin tällaisen pätkän:

        Workbooks.OpenText Filename:=AvattavanTiedostonNimi, _
        DataType:=xlDelimited, Semicolon:=True, Local:=True

        Kun CSV tiedostoa makrolla tuotaessa oli pvm muotoa yyyy.mm.dd, niin nyt se tulee kuten pitää d.m.y

        Paljon kiitoksia.


    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Anna minulle anteeksi

      Anna minulle anteeksi. Minä pyydän.
      Ikävä
      152
      1878
    2. Kun viimeksi kohtasitte/näitte

      Mitä olitte tekemässä? Millainen ympäristö oli? Löydetään toisemme...
      Ikävä
      130
      1741
    3. Olet kyllä vaarallisen himokas

      Luova, kaunis, määrätietoinen, pervo, mielenkiintoinen, kovanaama, naisellinen ja erikoinen.
      Ikävä
      102
      1497
    4. Anna vielä vähän vihreää valoa

      Teen sitten siirtoni, nainen. Tiedän, että olet jo varovaisesti yrittänyt lähestyä, mutta siitä on jo aikaa. Jos tunnet
      Ikävä
      17
      1203
    5. Mikä on hän on ammatiltaan?

      Vai tiedätkö mitä kaivattusi tekee työkseen?
      Ikävä
      68
      1187
    6. Mitä ajattelit silloin kun

      Löysit hänet?
      Ikävä
      64
      1151
    7. Syksyinen aamuketju suden

      Hyvää huomenta ja kaunista syyspäivää. 🌞🍁🍂☕
      Ikävä
      219
      965
    8. Oletko tutustunut muihin

      Samalla tavalla kuin häneen?
      Ikävä
      66
      787
    9. Uskotko että kohdataan vielä?

      Kysymys otsikossa, aloitukseen ei muuta lisättävää.
      Ikävä
      45
      730
    10. Miksi homous puhuttaa konservatiiveja vuodesta toiseen?

      Kysymykseen on vastattukin Kansanlähetyksen osalta: "Miksi sukupuoleen ja seksuaalisuuteen liittyvät asiat ovat konserv
      Luterilaisuus
      191
      704
    Aihe