04. juni 2002 - 23:32Der er
10 kommentarer og 1 løsning
Word 2000 - fill-in formular
Jeg vil gerne i en brev-skabelon lave en fill-in mulighed, således at jeg i et separat vindue kan udfylde navn, adresse, Vedr. o.s.v. først, og når det er tilfredsstillende ved at trykke på en OK-knap få alle oplysningerne til at "hoppe ind" på rette plads, som er defineret ved bogmærker. Jeg har tidligere i Word 97 fundet ud af at lave sådan en funktion, men nu i Word 2000 kan jeg kun nå dertil, at jeg efter tur skal udfylde en mindre formular med bare eet punkt. Irriterende og jeg har ikke det samme overblik.
Mon ikke der på Eksperten findes een, som kan hjælpe mig?
oprettet en tekstbox og indsat dine pers oplysninger, og manipuleret lidt med denne, da disse info kun skal værepå første side - som du jo goså skriver i din mail.
Har indsat dags dato med opdatering. Hvis du ikke ønsker at dato automatisk skal opdateres - fx hvis du vil gemme dit brev - skal den bare ændres til create date, som du jo også skriver i din mail.
Har oprettet en række bogmærker kaldet bmNavn bmAdresse bmPostBy bmVedr bmTekst (din cursor står ved dette når du har klikket på OK) bmAfsender
derefter har jeg oprettet en UserForm med tilhørende kode i VBA
jeg har fusket lidt - det var sent i går nat, da jeg lavede den, så det skulle gå stærkt :)
har oprettet et modul kaldet myForm og har her indsat flg kode _____________________________________________________ Public Sub Udfør(myForm As UserForm) ' denne kode sparer dig for en hel del kodning, idet du bare behøver at kalde modulet UDFØR ' koden tjekker mine kontrolelementer op imod bogmærker, og hvis der er overensstemmelser ' indsættes din tekst i dokumentet
Dim myControl As Control Dim myName As String
For Each myControl In myForm.Controls myName = myControl.Name
End Sub _____________________________________________________
i og med jeg har oprettet dette modul sparer jeg mig selv for en hulen masse kode, der skal placere på OK knappen - nu kan jeg nøjes med
_________________________________________________ Private Sub cmdOK_Click() ' ved klik på OK tømmes UserForm for det du har indtastet. ' det indtastede sættes ind i de respektive bogmærker ' Dernæst kalder jeg kommandoen UDFØR som jeg har indsat i modulet MYFORM
Udfør Me
Unload Me
'sæt cursor ved bogmærke så der kan skrives en brevtekst Selection.GoTo What:=wdGoToBookmark, Name:="bmTekst"
End Sub __________________________________________________
på annuller knappen kan jeg nøjes med __________________________________________________ Private Sub cmdAnnuller_Click() ' clear alt indtastet
Unload Me
End Sub ________________________________________________
og for at vise UserFormen når du åbner et dokumnet på baggrund af skabelonen, har jeg placeret følgende kode på "This document" ______________________________________________________ Private Sub Document_New() 'aktiver UserForm så den vises når din skabelon åbnes
frmBrev.Show
End Sub __________________________________________________
OK når du har modtaget skabelonen, skal du placere den i dit skabelonbibliotek, OG
så er det meget vigitgt at du ændrer nogen indstillinger, ellers viser Word IKKE UserFormen hvor du skal indtaste dine data.....
I menulinien vælges Funktioner/Makro/Sikkerhed og i den pop-up der kommer frem skal du på fanen "Sikkerhed" sætte X i "mellemste niveau"..........
OG jo du har ret det kan gøres på en anden måde - jeg er noget bare lettere miljøskadet - der er ingen grund til at bruge makroer eller andet når det kan gøres i VBA G****
ups er for sent på den skal til møde - vender lige tilbage både hvor jeg sender dig en mail md dit brevpapri og lidt flere kommentarer.....
Det er da formidabelt, jeg tror at den flotte og omfattende beskrivelse har krævet ligeså stor indsats som selve arbejdet med VBA. Dokumentationen er jo ellers det, man altid sjusker med: Bare det funker.
du kan lave noget lignende, dog uden at der kommer UserForm frem - åbn værktøjslinien "Formularer" her kan du forholdsvis enkelt oprette tekstboxe, comboboxe (rullelister) m.m. UDEN at bruge VBA, og du kan faktisk få et ganske pænt resultat.....
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
