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.
VB Avaa tiedosto hakemistosta
3
127
Vastaukset
http://www.kundepuu.com/viewtopic.php?f=155&t=493
Keep EXCELing
@Kunde- 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
- 1848485
En löydä sinua
En löydä sinua täältä, etkä sinä varmaankaan minua. Ennen kirjoitin selkeillä tunnisteilla, nyt jätän ne pois. Varmaan k264588- 504158
- 543632
- 513156
- 502910
Ne oli ne hymyt
Mitä vaihdettiin. Siksi mulla on taas niin järjetön ikävä. Jos haluat musta eroon päästä niin älä huomioi mua. Muuten kä262616- 382394
Anteeksi kun käyttäydyn
niin ristiriitaisesti. Mä en usko että haluaisit minusta mitään, hyvässä tapauksessa olet unohtanut minut. Ja silti toiv382083- 292056