Word-lomakkeen käyttö VB:lla tehdyllä ohjelmalla

Jussi

Minkälaista koodia täytyy VB6-ohjelmaan kirjoittaa jotta se avaa olemassaolevan word-lomakkeen ja kirjoittaa lomakkeessa oleviin tekstikenttiin. Ja lopuksi pitäisi vielä saada lomake tulostettua. Jos mahdollista niin word-lomakkeen ei tarvisi edes tulla käyttäjän näkyville.

6

750

Äänestä

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • Amatöörikoodailija

      Mulla on samanlainen ongelma kun pitäis saada ohjelmalla käytettyä wordia, mutta taidot ei ihan riitä. Eikö täältä todellakaan löydy yhtään ammattilaista joka vois auttaa miehiä mäessä?

      • jokuvaan

        Olen joskus tehnyt VB:lla ohjelman, joka kirjoitti tuloksia Exceliin. Sama toimisi kait Wordin suhteen. En vaan ole Wordin kanssa pelannut, ainakaan lomakkeita.
        Pitäisi perehtyä siihen, mitä ovat Wordin lomakkeet käytännössä.

        Millaiseen tapaukseen tuota nyt tarvitsisi?

      • Kunde
        jokuvaan kirjoitti:

        Olen joskus tehnyt VB:lla ohjelman, joka kirjoitti tuloksia Exceliin. Sama toimisi kait Wordin suhteen. En vaan ole Wordin kanssa pelannut, ainakaan lomakkeita.
        Pitäisi perehtyä siihen, mitä ovat Wordin lomakkeet käytännössä.

        Millaiseen tapaukseen tuota nyt tarvitsisi?

        Kayta kirjainmerkkeja eli Bookmark koodissa ja piece of case

      • Amatöörikoodailija
        Kunde kirjoitti:

        Kayta kirjainmerkkeja eli Bookmark koodissa ja piece of case

        Mulle ei ainakaan sano kirjanmerkit yhtään mitään. Oisko sulla joku lyhyt esimerkki miten niitä käytetään, niin vois ruveta opettelemaan.

      • Kunde
        Amatöörikoodailija kirjoitti:

        Mulle ei ainakaan sano kirjanmerkit yhtään mitään. Oisko sulla joku lyhyt esimerkki miten niitä käytetään, niin vois ruveta opettelemaan.

        Wordissa vie kursori haluttuun paikkaan ja menusta Lisaa/Kirjainmerkki anna nimi ja lisaa.
        lisaa allaoleva koodi ja testaa.

        esimerkissa kirjainmerkit "Etunimi" ja "Sukunimi"
        toimii siten,etta voit kirjoittaa aina uudestaa paalle

        Sub Kirjainmerkki()
        Dim Teksti As Range

        Set Teksti = ActiveDocument.Bookmarks("Etunimi").Range
        Teksti.Text = "Ville"
        ActiveDocument.Bookmarks.Add Name:="Etunimi", Range:=Teksti

        Set Teksti = ActiveDocument.Bookmarks("Sukunimi").Range
        Teksti.Text = "Virtanen"
        ActiveDocument.Bookmarks.Add Name:="Sukunimi", Range:=Teksti
        End Sub

        excelissa tarvitset viittauksen word objektiin ja nimet tietenkin tulee muuttujista jne...
        Vaikeeta kun on vain Thaiversio kaytossa...

    • johncage

      Tässä runko, joka aukaisee wordin, dokumentin ja täyttää dokumenttiin lisätyn fieldin (txt1). Muista lisätä referensseihin Microsoft office- viittaus.

      Dim oWord As New Word.Application

      oWord.Visible = False
      oWord.Documents.Open "c:\doc.doc"

      oWord.ActiveDocument.FormFields("txt1").Result = "tekstiä"

      ' printtaus
      'oWord.ActiveDocument.PrintOut ...

      oWord.Quit
      Set oWord = Nothing

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

    Takaisin ylös

    Luetuimmat keskustelut

    1. Vain vasemmistolaiset rakennemuutokset pelastavat Suomen

      Kansaa on ankeutettu viimeiset 30+ vuotta porvarillisella minäminä-talouspolitiikalla, jossa tavalliselta kansalta on ot
      Maailman menoa
      53
      3522

    2. Persut huutaa taas: "kato! muslimi!"

      Persut on lyhyessä ajassa ajaneet läpi kaksi työntekijöiden oikeuksien heikennystä, joita se on aiemmin vastustanut. Pe
      Maailman menoa
      20
      2912

    3. Menen nyt koisimaan

      Ja en ehkä palaa tänne. Asia on nyt loppuunkäsitelty ja totuus tuli ilmi
      Ikävä
      28
      2584

    4. onko kaivattusi

      vaarallinen? :D
      Ikävä
      70
      2359

    5. Haluaisin rakastaa sinua

      Ja olla sinulle se oikea... Rakastan sinua 💗💗💗
      Ikävä
      18
      2201

    6. Olisiko sinulla

      Jonossa vaihtoehtoja, ehkä
      Ikävä
      50
      2128

    7. Pieni galluppi

      Mitäs lahjaa odotat joulupukilta.
      Ikävä
      56
      1901

    8. Oletko uhriutuja?

      vaikka itse olet rääkännyt toista ja aiheuttanut ties mitä toiselle.
      Tunteet
      58
      1696

    9. KL: Mari Hynynen avoimena - Jouni-rakkaan ja Joel-pojan välit ovat nämä!

      Mari Hynynen (ent. Perankoski) on naimisissa Jouni Hynysen kanssa. Marilla on edellisestä liitosta yksi lapsi, Joel Vola
      Suomalaiset julkkikset
      11
      1573

    10. Kenet molemmat

      Sä haluat mies?
      Ikävä
      17
      1485
    Aihe
    TietosuojaselosteKäyttöehdotEvästeasetuksetSäännöt