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

754

    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ä.

    Luetuimmat keskustelut

    1. Valtion alijäämä = yritystukien määrä = 10 mrd. euroa

      Mutta persut eivät vaan suostu tasapainottamaan valtion budjettia, vaikka yritystuet on tiedetty haitallisiksi. Miksi p
      Maailman menoa
      95
      7277
    2. Suomi käyttää sosiaalietuuksiin suhteessa eniten rahaa koko maailmassa

      Suomi käyttää sosiaaliturvaetuuksiin enemmän rahaa suhteessa bruttokansantuotteeseen kuin mikään muu maa maailmassa. Su
      Maailman menoa
      357
      6348
    3. Grahn-Laasonen: "Kansalainen joutuu pettymään, jos demareita äänestää"

      Ministeri viittaa tuoreeseen Helsingin Sanomien juttuun, jossa demarijohtajan keinoja Suomen suunnan muuttamiseksi esite
      Maailman menoa
      58
      3693
    4. Vähän fiksumpi Nimi kisa ? :=)

      Kirjoita teidän etunimet allekkain. Jos nimissä on joku kirjain sama, poista se. Tee sama tarkistus kaikille kirjaimill
      Ikävä
      29
      3429
    5. Mikä on suurin luonne- eroavuus sinussa

      Ja kaivatussasi? Vaikuttaako se huonoon vai hyvään suuntaan siinä, että teistä voisi tulla jotain?
      Ikävä
      192
      1931
    6. Kenen haluaisit voittavan Amazing Racen: Tuomas ja Esko, Millu ja Karoliina vai Maria ja Vilma?

      Amazing Race Suomi huipentuu lauantaina finaaliin. Jäljellä on kolme paria ja tiedossa on tehtäviä, jotka järkyttävät os
      Tv-sarjat
      17
      1628
    7. Mitä haluaisit sanoa tänään hänelle?

      Rakastamallesi ihmiselle.
      Ikävä
      60
      1363
    8. Gallup: Katsotko Salkkareita tai oletko katsonut?

      Salatut elämät on suomalaisten suosikkisarja vuosikymmenestä toiseen. Salkkareiden parissa viettää aikaa sukupolvet laps
      Tv-sarjat
      18
      1356
    9. Elämäni biisi starttaa uudessa muodossa - Voi olla pettymys faneille!

      Elämäni biisi ja juontaja Katja Ståhl ovat suomalaisten suosikkeja. Lauantai-iltaisin ohjelma on vetänyt tv-katsojat arv
      Tv-sarjat
      1
      1260
    10. Amazing Race Tomas rehellisenä Esko-appiukon, 63, tilasta: "Sairastelut ja..."

      Tomas Grekov ja Esko Rotola-Pukkila ovat mukana Amazing Race Suomi -kisassa. Ja nyt vuorossa on finaali. Hankaluuksia m
      Tv-sarjat
      1
      1237
    Aihe