omien havaintojen lataus
-
KimmoP
- Viestit: 105
- Liittynyt: 02 Maalis 2006, 19:36
- Paikkakunta: Vammala
omien havaintojen lataus
Millä ohjelmalla tämä ladattu txt-tiedosto on tarkoitettu luettavaksi. Olen sitä availlut muistiolla, Wordillä ja exelillä mutta aika epäselvää ja ahtaaseen tungettua tuntuu teksti olevan.
-
oharma
- Viestit: 48
- Liittynyt: 30 Maalis 2006, 12:20
olettaisin että tuon listauksen yksi päätarkoitus on mahdollistaa tietojen vienti esim. omallakoneella olevaan tietokantaan. Ainoo ilman tietokantaa järjellinen lukemisvaihtoehto on avata tiedosto taulukko-ohjelmassa ja jakaa teksti sarakkeisiin käyttäen jaottelumääreenä eri kenttien välissä olevaa risuaitaa # , jollon tietoja pystyy käsittelemään. Ja näkee kaikki havaintoon tallennetut tiedot kuten pesimävarmuudet ym.
-
Vieras
Terve!
Onnistuu esim excelillä loistavasti! Minulla englanninkielinen versio excelistä, joten ohjeet tähän... Avaa Excell. Ylävalikosta Data -> Import External data -> Import data. Valitse tiedosto, open. Next, kunnes tulee kohtaa jossa kysyy millä kentät erotellaan (Delimiters). Tässä raksi kohtaan other ja tyhjään laatikkoon merkki #. Sen jälkeen allaoleva data preview pitäs alkaa näyttää oikeelta... Sit vaan finnish. Kysyy vielä mihin data laitetaan, oletusarvona avoinna oleva datasheetti, joten ok riittää. Havaintolistauksesi aukeaa kauniisti. Tämä jälkeen voit tallettaa tiedoston excell muodossa. Muillakin taulukkolaskentaohjelmilla, kuten ilmaisella open officella onnistuu, mutta en nyt suorilta pysty ladella ohjeita...
T.Antti Pesola
Onnistuu esim excelillä loistavasti! Minulla englanninkielinen versio excelistä, joten ohjeet tähän... Avaa Excell. Ylävalikosta Data -> Import External data -> Import data. Valitse tiedosto, open. Next, kunnes tulee kohtaa jossa kysyy millä kentät erotellaan (Delimiters). Tässä raksi kohtaan other ja tyhjään laatikkoon merkki #. Sen jälkeen allaoleva data preview pitäs alkaa näyttää oikeelta... Sit vaan finnish. Kysyy vielä mihin data laitetaan, oletusarvona avoinna oleva datasheetti, joten ok riittää. Havaintolistauksesi aukeaa kauniisti. Tämä jälkeen voit tallettaa tiedoston excell muodossa. Muillakin taulukkolaskentaohjelmilla, kuten ilmaisella open officella onnistuu, mutta en nyt suorilta pysty ladella ohjeita...
T.Antti Pesola
-
jjuju
- Viestit: 34
- Liittynyt: 30 Maalis 2006, 07:20
Excel
Kaikilla on käytössä tietysti Excel-taulukkolaskenta. Tiedot voi tuoda Exceliin seuraavasti:
1) avaa (valitse tiedostotyypiksi tekstitiedostot) ja valitse Tiiran txt-tiedosto
2) silloin avautuu ohjattu toiminto:
a) "alkuperäinen tiedostotyyppi", valitaan erotettu -> seuraava
b) "erottimet", valitaan sarkaimen sijasta "muu" ja laitetaan tyhjään ruutuun "#"-merkki -> seuraava
c) -> valmis
3) Excel aukaiseen valmiin taulukon, nyt tiedot on jaettu omiin sarakkeisiin ja voit muokata kaiken haluamaasi järjestykseen.
1) avaa (valitse tiedostotyypiksi tekstitiedostot) ja valitse Tiiran txt-tiedosto
2) silloin avautuu ohjattu toiminto:
a) "alkuperäinen tiedostotyyppi", valitaan erotettu -> seuraava
b) "erottimet", valitaan sarkaimen sijasta "muu" ja laitetaan tyhjään ruutuun "#"-merkki -> seuraava
c) -> valmis
3) Excel aukaiseen valmiin taulukon, nyt tiedot on jaettu omiin sarakkeisiin ja voit muokata kaiken haluamaasi järjestykseen.
-
KimmoP
- Viestit: 105
- Liittynyt: 02 Maalis 2006, 19:36
- Paikkakunta: Vammala
Re: Excel
Kiitos, näillä ohjeilla aukeaa hienosti. Ainoa häiritsevä tekijä on lajinimien latinolyhenteet, vaikka olen tallentanut suomenkielellä. En kyllä ymmärrä miksi näitä käytetään kun olemme suomen kielialueella.jjuju kirjoitti:Kaikilla on käytössä tietysti Excel-taulukkolaskenta. Tiedot voi tuoda Exceliin seuraavasti:
1) avaa (valitse tiedostotyypiksi tekstitiedostot) ja valitse Tiiran txt-tiedosto
2) silloin avautuu ohjattu toiminto:
a) "alkuperäinen tiedostotyyppi", valitaan erotettu -> seuraava
b) "erottimet", valitaan sarkaimen sijasta "muu" ja laitetaan tyhjään ruutuun "#"-merkki -> seuraava
c) -> valmis
3) Excel aukaiseen valmiin taulukon, nyt tiedot on jaettu omiin sarakkeisiin ja voit muokata kaiken haluamaasi järjestykseen.
-
JukkaK
- Viestit: 21
- Liittynyt: 27 Helmi 2006, 08:00
- Paikkakunta: Kangasala
-
Vieras
Open Officella (löytyy ilmaiseksi osoitteesta http://fi.openoffice.org/) valitaan "Lisää"-alasvetovalikosta "Taulukko tiedostosta...". Sen jälkeen valitaan haluttu Tiirasta siirretty txt-tiedosto, ruksataan "Erottimena" kohtaan "Muu" ja sen perässä olevaan tyhjään laatikkoon kirjoitetaan "#". Sitten vaan OK:ta pari kertaa ja valmista tuli.Anonymous kirjoitti:Muillakin taulukkolaskentaohjelmilla, kuten ilmaisella open officella onnistuu, mutta en nyt suorilta pysty ladella ohjeita...
Jari Kårlund
-
JukkaK
- Viestit: 21
- Liittynyt: 27 Helmi 2006, 08:00
- Paikkakunta: Kangasala
-
Timo-Jii-L
- Viestit: 9
- Liittynyt: 04 Huhti 2006, 18:55
- Paikkakunta: Norjan raja
Re: Excel
Ei selvinnyt vielä näillä ohjeilla. Tökkii jo heti kohdassa 1. Mistähän ja mihin tuo Tiiran txt-tiedosto kirjataan. Kaikki muukin on siten vielä hebreaa. Voisikon joku skriivata viimeisen päälle tarkan polun hommaan???KimmoP kirjoitti:jjuju kirjoitti:Kaikilla on käytössä tietysti Excel-taulukkolaskenta. Tiedot voi tuoda Exceliin seuraavasti:
1) avaa (valitse tiedostotyypiksi tekstitiedostot) ja valitse Tiiran txt-tiedosto
2) silloin avautuu ohjattu toiminto:
a) "alkuperäinen tiedostotyyppi", valitaan erotettu -> seuraava
b) "erottimet", valitaan sarkaimen sijasta "muu" ja laitetaan tyhjään ruutuun "#"-merkki -> seuraava
c) -> valmis
3) Excel aukaiseen valmiin taulukon, nyt tiedot on jaettu omiin sarakkeisiin ja voit muokata kaiken haluamaasi järjestykseen.
-
PekkaS
- Viestit: 48
- Liittynyt: 29 Maalis 2006, 10:05
- Paikkakunta: Oulu
Re: Excel
Tämä on jo aika yksityiskohtainen ohje... Valitan, että käytossäni on vain englanninkielinen Excel, joten arvaukset suomenkielisen version nappien ja valikoiden nimistä ovat lähinnä suuntaa-antavia.Timo-Jii-L kirjoitti: Ei selvinnyt vielä näillä ohjeilla. Tökkii jo heti kohdassa 1. Mistähän ja mihin tuo Tiiran txt-tiedosto kirjataan. Kaikki muukin on siten vielä hebreaa. Voisikon joku skriivata viimeisen päälle tarkan polun hommaan???
0) Avaa tietokone, avaa nettiselain, kirjaudu Tiiran sivuille
1) Tee joku haku, jossa haet joko omia havaintoja tai omia ilmoituksia (rasti perushaussa tai laajassa haussa kyseisiin ruutuihin). Esimerkiksi, klikkaa Selain-ikkunan vasemmasta laidasta "Perushaku" ja valitse sen jalkeen "Omat Ilmoitukset", "Omat Havainnot" ja aikaikkunaksi alimmainen vaihtoehto "päivämäärä" ja jätä molemmat päivämääräkentät tyhjiksi ja paina "Hae".
2) Kun haku on tehty, havaintojen yläpuolella on linkki "Lataa havainnont csv:nä" - klikkaa kyseistä linkkiä. Eteesi pitaisi ilmestyä (hivenen selaimen turva-asetuksistasi riippuen) laatikko, jossa ehdotetaan joko avaamaan tai tallentamaan ladattu tiedosto. Valitse tallenna/save ja tallenna tiedosto jonnekin järkevään paikkaan järkevällä nimellä.
3) Avaa Excel
4) Valitse Tiedosto/File valikosta komento Avaa/Open
5) Eteesi avautuu valintaikkuna, jonka alalaidassa on laatikko Tiedostotyyppi/Files of type. Tuosta laatikosta valitse Kaikki tiedostot/All Files (*.*)
6) Hyppele ikkunan hakemistotyokaluilla hakemistoon johon Tiirasta tallensit tiedoston.
7) Valitse tallentamasi tiedosto ja klikkaa Avaa/Open
8) Eteesi avautuu uusi ikkuna, jossa ylimpänä on valinta tiedoston tyypistä. Valitse ylempi vaihtoehto Erotinmerkki/Delimited ja paina sen jälkeen Seuraava/Next -nappia.
9) Nyt pitää valita mitä erotinta käytetään. Tiirassa erotinmerkki on #, joka loytyy vaihto-nappäimella numeron 3 näppaimestä. Syotä tämä merkki kohtaan Muu erotin/Other ja varmista, että Muu-erotin ikkunassa on rasti, ja poista rastit mahdollisesti muista erotinmerkeistä. Paina Seuraava / Next
10) Seuraavaksi voit määritellä, millaista dataa kukin kenttä sisältää. Excel osaa tehdä tämän automaattisesti, mutta sekoilee parissa kohden. Valitse sarake:
- Sarake PVM1 ja muuta ikkunan ylälaidassa olevasta sarakkeen tietotyypiksi Päiväys/Date ja siitä vielä muoto DMY.
- Sarake PVM2 toimi kuten edellisen kanssa
- Sarake Ikä (loytyy siirtämällä alalaidassa olevaa vierityspalkkia oikealle), muuta tietotyypiksi Teksti/Text
- Muiden sarakkeiden asetuksiin ei (todennäkoisesti) ole tarvetta puuttua ja erittäin todennäkoisesti myos PVM-sarakkeet menisivät oikein oletusasetuksilla.
11) Muutettuasi em. sarakeasetukset, klikkaa Valmis/Finish
T. Pekka Suopajärvi
-
Timo-Jii-L
- Viestit: 9
- Liittynyt: 04 Huhti 2006, 18:55
- Paikkakunta: Norjan raja
Re: Excel
Kiitti Pekalle ohjeista!PekkaS kirjoitti:Timo-Jii-L kirjoitti:
Tämä on jo aika yksityiskohtainen ohje... Valitan, että käytossäni on vain englanninkielinen Excel, joten arvaukset suomenkielisen version nappien ja valikoiden nimistä ovat lähinnä suuntaa-antavia.
0) Avaa tietokone, avaa nettiselain, kirjaudu Tiiran sivuille
1) Tee joku haku, jossa haet joko omia havaintoja tai omia ilmoituksia (rasti perushaussa tai laajassa haussa kyseisiin ruutuihin). Esimerkiksi, klikkaa Selain-ikkunan vasemmasta laidasta "Perushaku" ja valitse sen jalkeen "Omat Ilmoitukset", "Omat Havainnot" ja aikaikkunaksi alimmainen vaihtoehto "päivämäärä" ja jätä molemmat päivämääräkentät tyhjiksi ja paina "Hae".
2) Kun haku on tehty, havaintojen yläpuolella on linkki "Lataa havainnont csv:nä" - klikkaa kyseistä linkkiä. Eteesi pitaisi ilmestyä (hivenen selaimen turva-asetuksistasi riippuen) laatikko, jossa ehdotetaan joko avaamaan tai tallentamaan ladattu tiedosto. Valitse tallenna/save ja tallenna tiedosto jonnekin järkevään paikkaan järkevällä nimellä.
3) Avaa Excel
4) Valitse Tiedosto/File valikosta komento Avaa/Open
5) Eteesi avautuu valintaikkuna, jonka alalaidassa on laatikko Tiedostotyyppi/Files of type. Tuosta laatikosta valitse Kaikki tiedostot/All Files (*.*)
6) Hyppele ikkunan hakemistotyokaluilla hakemistoon johon Tiirasta tallensit tiedoston.
7) Valitse tallentamasi tiedosto ja klikkaa Avaa/Open
8) Eteesi avautuu uusi ikkuna, jossa ylimpänä on valinta tiedoston tyypistä. Valitse ylempi vaihtoehto Erotinmerkki/Delimited ja paina sen jälkeen Seuraava/Next -nappia.
9) Nyt pitää valita mitä erotinta käytetään. Tiirassa erotinmerkki on #, joka loytyy vaihto-nappäimella numeron 3 näppaimestä. Syotä tämä merkki kohtaan Muu erotin/Other ja varmista, että Muu-erotin ikkunassa on rasti, ja poista rastit mahdollisesti muista erotinmerkeistä. Paina Seuraava / Next
10) Seuraavaksi voit määritellä, millaista dataa kukin kenttä sisältää. Excel osaa tehdä tämän automaattisesti, mutta sekoilee parissa kohden. Valitse sarake:
- Sarake PVM1 ja muuta ikkunan ylälaidassa olevasta sarakkeen tietotyypiksi Päiväys/Date ja siitä vielä muoto DMY.
- Sarake PVM2 toimi kuten edellisen kanssa
- Sarake Ikä (loytyy siirtämällä alalaidassa olevaa vierityspalkkia oikealle), muuta tietotyypiksi Teksti/Text
- Muiden sarakkeiden asetuksiin ei (todennäkoisesti) ole tarvetta puuttua ja erittäin todennäkoisesti myos PVM-sarakkeet menisivät oikein oletusasetuksilla.
11) Muutettuasi em. sarakeasetukset, klikkaa Valmis/Finish
T. Pekka Suopajärvi
Vika oli siinä, että yritin muilla kuin omilla havainnoillani. Kyllä se siitä...
Timo Jii
-
sampo
- Viestit: 121
- Liittynyt: 08 Maalis 2006, 09:25
Omien havaintojen download-formaatti tehtiin alunperin samanlaiseksi kuin tuleva upload-lomakekin. Havaintojen massasyöttö ei ole kuitenkaan vielä valmis ja on olemassa mahdollisuus että formaatti kokee vielä pieniä muutoksia. Mahdolliset muutokset tulevat kuitenkin olevat luonteeltaan pieniä.JukkaK kirjoitti: onko hyvä käyttää näin muodostunutta XL-pohjaa omien havaintojen kirjaamiseen omalla tietokoneella tulevaa massasiirtoa ajatellen?
t.Sampo Kunttu
-
sampo
- Viestit: 121
- Liittynyt: 08 Maalis 2006, 09:25
Alla Lauri Nikkisen tekä koodinpätkä tyhjien solujen täyttämiseksi:
t.Sampo Kunttu
Sub TIIRAN_HAVIKSET_TYHJIENSOLUJENTAYTTO()
'Lauri Nikkinen 20.7.2006
'Makro olettaa, että täytettävät solut alkavat laji-muuttujasta, joka on saraakkeessa B
Do
'Hakee B1-sarakkeesta ensimmäisen solun, joka on ennen tyhjää solua
Range("B1").End(xlDown).Select
'Valitsee täytettävän solualueen
Set LeftCell = Cells(ActiveCell.Row, 2)
Set RightCell = Cells(ActiveCell.Row, 256)
If IsEmpty(LeftCell) Then Set LeftCell = LeftCell.End(xlToRight)
If IsEmpty(RightCell) Then Set RightCell = RightCell.End(xlToLeft)
If LeftCell.Column = 256 And RightCell.Column = 2 Then ActiveCell.Select Else Range(LeftCell, RightCell).Select
Range(Selection, Selection.End(xlDown)).Select
'Solualueen täyttö
'Tämän kohdan koodaajat alla
'Tom Ogilvy, 1999/12/14 programming
'Revised David McRitchie, 2000-11-25 programming
Application.ScreenUpdating = False
Application.Calculation = xlManual
Dim cell As Range
For Each cell In Intersect(Selection, _
ActiveSheet.UsedRange)
If Trim(cell) = "" And cell.Row > 1 Then
cell.NumberFormat = cell.Offset(-1, 0).NumberFormat
cell.Value = cell.Offset(-1, 0).Value
End If
Next cell
Application.Calculation = xlAutomatic 'xlCalculationAutomatic
Application.ScreenUpdating = False
'Looppi kunnes tulee tyhjä solu A-sarakkeessa
Loop Until IsEmpty(ActiveCell.Offset(1, 0))
End Sub
t.Sampo Kunttu
Sub TIIRAN_HAVIKSET_TYHJIENSOLUJENTAYTTO()
'Lauri Nikkinen 20.7.2006
'Makro olettaa, että täytettävät solut alkavat laji-muuttujasta, joka on saraakkeessa B
Do
'Hakee B1-sarakkeesta ensimmäisen solun, joka on ennen tyhjää solua
Range("B1").End(xlDown).Select
'Valitsee täytettävän solualueen
Set LeftCell = Cells(ActiveCell.Row, 2)
Set RightCell = Cells(ActiveCell.Row, 256)
If IsEmpty(LeftCell) Then Set LeftCell = LeftCell.End(xlToRight)
If IsEmpty(RightCell) Then Set RightCell = RightCell.End(xlToLeft)
If LeftCell.Column = 256 And RightCell.Column = 2 Then ActiveCell.Select Else Range(LeftCell, RightCell).Select
Range(Selection, Selection.End(xlDown)).Select
'Solualueen täyttö
'Tämän kohdan koodaajat alla
'Tom Ogilvy, 1999/12/14 programming
'Revised David McRitchie, 2000-11-25 programming
Application.ScreenUpdating = False
Application.Calculation = xlManual
Dim cell As Range
For Each cell In Intersect(Selection, _
ActiveSheet.UsedRange)
If Trim(cell) = "" And cell.Row > 1 Then
cell.NumberFormat = cell.Offset(-1, 0).NumberFormat
cell.Value = cell.Offset(-1, 0).Value
End If
Next cell
Application.Calculation = xlAutomatic 'xlCalculationAutomatic
Application.ScreenUpdating = False
'Looppi kunnes tulee tyhjä solu A-sarakkeessa
Loop Until IsEmpty(ActiveCell.Offset(1, 0))
End Sub
-
jjuju
- Viestit: 34
- Liittynyt: 30 Maalis 2006, 07:20
Virhe
Hyvä makro, muttei toimi oikein. Nopeasti vilkaistuna näyttää toimivan, mutta ainakin minulle tulee virheitä kopioinnissa. Lajit-kenttä kopiointi menee oikein, mutta siellä täällä muualla kopioi ylemmän tietueen solun tekstin väärin (mm. atlaskoodi- ja lisätietokenttä)
Harmillista, sillä tämä olisi ollut juuri sellainen makro, jota tarvitsen. Toinen vaihtoehto olisi tietysti se, että omat tiedot saisi ulos hieman "täydellisemmässä" muodossa. Tämä nykyinen malli on yhteenvetojen tekijöille melko työläistä (tiedän mistä puhun!), kun pitäisi ensin tehdä VBA-ohjelmat. Toivottavasti muutkin kokeilevat.
Odottelen vinkkejä, uusia makroja tai jotain kehitystä......
ps. en ymmärrä VBA-ohjelmoinnista mitään, mutta.....jos solu B on erisuuri kuin tyhjä, makron kai pitäisi jatkaa suoraan alas päin, eikä käydä läpi sitä tietuetta ollenkaan.
Tässä alkuperäinen tiedosto, kokeilkaa makroa:
http://jjuju.net/TIIRA_alkuperainen.xls
Harmillista, sillä tämä olisi ollut juuri sellainen makro, jota tarvitsen. Toinen vaihtoehto olisi tietysti se, että omat tiedot saisi ulos hieman "täydellisemmässä" muodossa. Tämä nykyinen malli on yhteenvetojen tekijöille melko työläistä (tiedän mistä puhun!), kun pitäisi ensin tehdä VBA-ohjelmat. Toivottavasti muutkin kokeilevat.
Odottelen vinkkejä, uusia makroja tai jotain kehitystä......
ps. en ymmärrä VBA-ohjelmoinnista mitään, mutta.....jos solu B on erisuuri kuin tyhjä, makron kai pitäisi jatkaa suoraan alas päin, eikä käydä läpi sitä tietuetta ollenkaan.
Tässä alkuperäinen tiedosto, kokeilkaa makroa:
http://jjuju.net/TIIRA_alkuperainen.xls
-
Vieras
Re: Virhe
Kertoisitko tarkemmin, missä virhe tulee, sillä ainakin atlaskenttä ja lisätiedot menivät minulla oikein, kun kokeilin tiedostoasi.jjuju kirjoitti:Hyvä makro, muttei toimi oikein.
Tässä alkuperäinen tiedosto, kokeilkaa makroa:
http://jjuju.net/TIIRA_alkuperainen.xls
Pekka