Word ongelma

juhanim

Onko Wordissa (2007) mahdollista lisätä sama merkki (esim. pilkku) automaattisesti joka rivin loppuun.

Tarkoitus siirtää Word muodossa oleva teksti-taulukko (osoitteisto) Exeliin niin, että kukin wordinrivi tulee Exel-taulukkoon omaan soluunsa. Pilkku toimisi jakajana Exeliin siirrettäessä, siis jotta saan rivit erotettua omiksi soluikseen.

nimi1
osoite1
puh1

nimi2
osoite2
puh2

jne

Saa ehdottaa muutakin ratkaisua. Siis nyt naputtelen erikseen pilkun joka rivin loppuun ja siirrän yhdet osoitetiedot samalle riville Wordissa ennen siirtoa Exeliin, mutta kun osoitteistossa on satoja sivuja, joku helpompi keino kiinnostaisi.

10

373

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • .txt ja sarkain

      Niin no, olisit alun alkaen voinut rakentaa sen osoitteiston Yhdistämisen kautta - eli ikään kuin olisit tehnyt osoitetarrat vaikkapa ja luonut sen rekisterin siellä yhdistämistoiminnoissa. Tämän olisi sitten suoraan voinut käyttää Excelissä hyödyksi.

      Huono neuvo tietysti, kun kerran olet jo tehnyt.

      Mutta eikö se nyt onnistu ihan sillä, että sulla olis se osoitteet sisältävä tiedosto .txt-muodossa ja ihan vaan allekkain ne tiedot. Excelissä on ainakin ennen ollut Tiedot - Tuo ulkoiset tiedot ja siellä kun valitset tietolähteeksi .txt-tiedoston niin avautuu valintaikkuna, jossa kysytään ne erottimet (kai se sitten olisi sarkain siinä .txt-tiedostossa, olisko sarkain helpompi merkata kuin pilkku joka rivin jälkeen), ja tämän jälkeen tulee vielä muutama muu valintaikkuna...

      No, todennäköisesti en edes ymmärtänyt mikä sun kysymyksen jippo oli - sori.

      • muuan mies

        Tallenna Wordin tiedosto txt-muodossa ja ruksaa Lisää rivivaihdot. Tämän voit lukea sisään Exceliin. Ja Excelissä Teksti sarakkeisiin ja pilkku erottimena.


      • toimiiko?
        muuan mies kirjoitti:

        Tallenna Wordin tiedosto txt-muodossa ja ruksaa Lisää rivivaihdot. Tämän voit lukea sisään Exceliin. Ja Excelissä Teksti sarakkeisiin ja pilkku erottimena.

        Testasitko sinä tämän toimivuuden?

        Kun tässä ajattelin itse, että kysyjällä on siinä alkuperäisessä word-tiedostossa yksi osoitetietuea alekkain, eli nimi omalla rivillä, katuosoite omalla rivillä, postitoimipaikkatiedot omalla rivillä, ja tämän hän haluaisi saada yhdelle riville ja jokaisen kentän erotettua pilkulla tai sarkaimella - niin toimineeko tuo yhdelle riville vienti antamallasi ohjeella? Ja jos sitä pilkkua ei siellä txt-tiedostossa ole, niin sitä ei ole eikä Excel siis löydä mitään kenttien välistä erotinta.

        En ainakaan itse saanut toimimaan, kun neuvosi testasin. Tosin voi olla, että ymmärrä yhtään mitä on edes tarkoitus saada aikaan siinä word-tiedostossa.
        Vai onko 2007-versio wordista jo niin kehittynyt, että se tekee tyystin toisin kuin esim. 2003.
        Ja kun ei ole alun alkaen lähdetty tekemään .mdb-tiedostoa rekisteristä, niin ei taida sitten auttaa muuta kuin tosiaan muuttaa se word-tiedosto .txt-tiedostoksi jotta Exceliin sen rekisterin ylipäätänsä voi tuoda.


    • joopa joo...

      Siksi toisekseen, jokainen osoitetietueen kenttä pitää erottaa pilkulla. Kun koko osoitetietue yhdellä rivillä, jokaisen kentän väliin pilkku tai sarkaimella erotetaan kentät toisistaan.

      Kai tuohon joku makrotehtailija osaa antaa neuvon, miten monta sivua saat rivitettyä ja pilkutettua uudelleen.

      Excel-palstalla niitä koodaajia riittää.

    • yksinkertainen makro

      Helpottaa ehkä vähän, vaikkei mikään expertin koodi olekaan.

      Eli: Nauhoita yhdestä rivinkorjauksesta makro, mutta mieti tarkkaan mitä teet ennen kuin nauhoitat.
      Esim. Jos sulla on vain ne varsinaiset osoitetiedot eikä mitään tuollaisia riviotsakkeita kuin Nimi1 osoite1 jne. joka rivillä, niin olet siinä yhden osoitetietueen ensimmäisen rivin alussa, tässä alat nauhoittaa makroa, menet sen ensimmäisen rivin loppuun End-näppäimellä (tai jollain rivin loppuun vievällä pikanäppäinyhdistelmällä), Deletellä poistat rivinvaihdon, Sarkaimella siirrät seuraavan osoitetiedon seuraavaan sarkaimeen, End-näppäimellä menet taas rivin loppuun, ja taas siirrät tiedon sarkainkohtaan (tai lisäät sen pilkun) ja toistat niin kauan kunnes sulla on rivi valmis, rivin lopusta poistat vielä rvinvaihot niin, että kun lopetat makron nauhoittamisen olet seuraavan osoitetietuerivin alussa.

      Toki, tätä sinun sitten pitäisi toistaa jokaisella sadalla sivullasi.

      Ei yksinkertaista, ei.

      • suorita

        Eli pitää suorittaa makroa jokaisella sadalla sivullasi, ei toki nauhoittaa - minkä toki jokainen fiksu tajuaa mutta kun aina on niitä irvileukoja.

        :))


      • winks winks

        Erottimesta: Pilkku on parempi kuin sarkain. Sarkaimella pitäisi osata arvioida sarakkeen leveys, nimethän voivat olla pitempiä kuin vakiosarkainkohtien väli.

        Muuten makro toimii testaten hyvin, toimii jopa kohdissa joissa jokin osoitekenttä olisi tyhjä (esim. kadunnimi puuttuu). Mutta kuka sitä jaksaa napsutella jotain makronappia satoja sivuja - hoh hoijaa..


    • kopioi/liitä tiedot Exceliin esim. nyt soluun A1 ( jolloin tiedot on allekkain A-sarakkeessa)
      suorita allaoleva makro Excelissä ja homma klaarattua muutamassa sekunnissa...

      moduuliin...
      oletuksena viestin malli


      Option Explicit

      Sub Järjestä()
      Dim vika As Long
      Dim i As Long
      vika = Range("A65536").End(xlUp).Row 1
      Range("A1").Select
      For i = 4 To vika Step 4
      ActiveCell.Offset(0, 1) = ActiveCell.Offset(1, 0)
      ActiveCell.Offset(0, 2) = ActiveCell.Offset(2, 0)
      ActiveCell.Offset(1, 0) = ""
      ActiveCell.Offset(2, 0) = ""
      ActiveCell.Offset(4, 0).Select
      Next
      Range("A1:A" & vika).SpecialCells(xlCellTypeBlanks).EntireRow.Delete
      End Sub

      Keep EXCELing
      @Kunde

    • Siis miten?

      Tällä kertaa en käsitä vastauksia ollenkaan.

      Tee näin helposti

      Excelissä ensin laita taulukon solujen tietotyypiksi teksti
      Sitten Wordissä ihan tavallinen kopiointi ja Excelissä ihan tavallinen liittäminen.

      Saat Wordin tiedot Exceliiin niin että jokainen Wordin rivi on Excelissä oma solunsa, ja nolla- alkuiset tiedot näkyvät oikein.

      Tämän jälkeen vielä etunimi ja sukunimi erikseen esim. toimintolla teksti sarakkkeisiin, jolloin saat jaettua etunimen ja sukunimen eri sarakkeisiin, kun laitat erottimeksi väli

    • Siis miten

      Sorry unohdin:
      Wordistä Exceliin liittämisvaiheesa valitse liittämisasetuksista "säilytä kohteen muotoilu"
      Tälläi ne alkunollat näkyy kun laitoit Excelissä ensin tekstityyypin

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

    Luetuimmat keskustelut

    1. Jos venäjällä olisi kansan valitsema presidentti, olisiko Ukrainan sotaa?

      Ei varmasti olisi. Sehän on tiedossa, että raskaalla vaalivilpillä putin jatkaa pressana.
      Maailman menoa
      325
      4298
    2. Riikka jytkytti naftan hinnan jo yli 2,3 euroon

      Sannan aikaan esimerkiksi dieseliä selvästi kalliimpaa bensaakin sai 1,3 eurolla. https://www.is.fi/autot/art-200001188
      Maailman menoa
      159
      3986
    3. Päivän Sanna: Suomi maailman onnellisin maa

      Sanna muutti Suomen maailman onnellisimmaksi maaksi. Hänen pyyteetön työnsä maailmalla tuottaa edelleen tulosta.
      Maailman menoa
      89
      3428
    4. Vasemmiston feministinaiset puolustavat islamia

      mikä on täysin järjenvastaista, mutta eihän femakoilla paljon järkeä olekkaan, leijuvat siellä omassa kuplassaan. Myös
      Maailman menoa
      239
      2907
    5. Ei se halua mitään!!

      Arkailija koko tyyppi!
      Ikävä
      61
      2448
    6. Olet kyllä erittäin huono yhdistelemään pisteitä.

      Etkä vain sinä vaan kaikki teilläpäin.
      Ikävä
      34
      1787
    7. Onko jo liian "vanha" vai mitä mieltä olet? 57-v. saa raakaa tekstiä tv:ssä

      The Summit Suomi tv-ohjelmassa 57-vuotiaan Maritan jaksamista kyseenalaistettiin iän takia. Onko tässä iässä jo liian "v
      50 plus
      37
      1486
    8. Etkö sitten itse

      ole koskaan ylittänyt rajaa?
      Ikävä
      43
      1433
    9. Mitä järkeä iskeä

      Varattua ja yrittää saada sitä eroamaan
      Ikävä
      45
      1315
    10. Suomi edelleen maailman onnellisin maa

      Olemme hyvällä tiellä. Laitetaan nyt talous kuntoon.
      Maailman menoa
      161
      1268
    Aihe