Notifikationer

Markér alle som læst Log ud

mogens1 Nybegynder

01. december 2008 - 12:14 Der er 9 kommentarer og
1 løsning

Gemme formular i word

Jeg har en formular i word. Denne er lavet til en skabelon.
Når brugeren udfylder formularen vil jeg gerne have en makroknap i bunden. Denne makro skal gøre følgende: Gemme dokumentet på c-drevet. Navnet på filen skal være et af de tekstfelter, som er i dokumentet.(tekst6).
Hvordan laver jeg denne makro.

Er der nogle som kan hjælpe?

Synes godt om

supertekst Ekspert

01. december 2008 - 14:37 #1

Eksempel:

Private Sub CommandButton1_Click()
doknavn = FormFields("Tekst6").Result

ActiveDocument.SaveAs "C:\" + doknavn + ".doc"
End Sub

Synes godt om

mogens1 Nybegynder

01. december 2008 - 15:14 #2

Jeg har prøvet at indsætte scriptet i VB, men det ser ikke ud til at virke...

Jeg får fejlen:
Compile error:
Sub or Function not defined

Hvad gør jeg galt?

Synes godt om

supertekst Ekspert

01. december 2008 - 15:28 #3

Hvad hedder din knap?

Synes godt om

mogens1 Nybegynder

01. december 2008 - 15:59 #4

Min knap hedder CommandButton1_Click

Synes godt om

supertekst Ekspert

01. december 2008 - 16:12 #5

Måske skal doknavn defineres....

Prøv om det skulle hjælpe..

Private Sub CommandButton1_Click()
dim doknavn as String
doknavn = FormFields("Tekst6").Result

ActiveDocument.SaveAs "C:\" + doknavn + ".doc"
End Sub

Synes godt om

mogens1 Nybegynder

02. december 2008 - 08:33 #6

Stadig ikke.

Fejlen kommer stadig og den overstreger også stadig Sub commmandbutton1_Clilck() med gul og "FormFields" med blå, jeg formoder det er de steder fejlen gemmer sig?

Synes godt om

supertekst Ekspert

02. december 2008 - 08:44 #7

Prøv at sende din skabelon til: pb@supertekst-it.dk

Synes godt om

supertekst Ekspert

02. december 2008 - 09:08 #8

Den formular du nævner - er det en Userform eller felter baseret på værktøjslinien Formularer?

Kode-eks. er baseret på sidstnævnte.

Hvis førstnævnte (Userform) - så prøv at korrigere til: doknavn = me.tekst6

Synes godt om

mogens1 Nybegynder

05. december 2008 - 15:13 #9

Jeg fandt ud af det. Det var ikke langt fra, det du lavede.
Løsningen ser sådan ud.

Sub Gem()
dim doknavn as String
doknavn = ActiveDocument.FormFields("Tekst6").result

ActiveDocument.SaveAs "S:\" + doknavn + ".doc"
End Sub

Tak for hjælpen, dit svar førte mig til løsningen, så det er naturligvis accepteret

Synes godt om

supertekst Ekspert

05. december 2008 - 17:55 #10

Selv tak...

Synes godt om

Ny bruger Nybegynder

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.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra Visual Basic kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Send mail fra "Outlook New" via VBA i excel Af lonmat i Visual Basic	5	29/08/202512:28	04/09/202515:48
Klik Event i MS Project Af per2edb i Visual Basic	0	05/08/202510:10	-
VBA koder lagt i MS project kolonner Af per2edb i Visual Basic	0	16/05/202512:31	-
Foto fra Word eller Excel Af MSchlamovitz i Visual Basic	1	22/04/202514:55	25/04/202511:21
Proxy server.. Af SommerFyr i Visual Basic	12	10/07/202417:34	12/07/202414:34

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS