CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

mysitesolution Nybegynder

29. oktober 2005 - 12:35 Der er 3 kommentarer og
1 løsning

Lidt VBA i Word

Hej...

jeg kan ikke finde ud af VBA (kan godt vb syntax) og skal bruge lidt hjælp :)... Jeg gider ikke til at læse en masse om det, da det ikke er noget jeg vil komme til at bruge andet end dette script...

Jeg vil have en ny Toolbar (så langt er jeg da kommet ;)), hvor der skal være en tekstboks... hvis man så trykker enter i tekstboksen, skal et program åbnes fx

c:\mitprogram.exe "Tekst"

og derefter skal word paste det som er i clipboardet

Synes godt om

rvm Nybegynder

29. oktober 2005 - 13:12 #1

Jeg går ud fra at c:\mitprogram.exe "Tekst" indsætter noget i clipboardet

Sub KørProgram()

' Specifying 1 as the second argument opens the application in
' normal size and gives it the focus.
Dim RetVal
RetVal = Shell("C:\WINDOWS\CALC.EXE", 1)

DoEvents
Selection.Paste

End sub

Denne makro sættet på dit knap på værktøjslinien via Tilpasmenuen og så højreklik på kanppen og vælg "Tildel makro"

Synes godt om

mysitesolution Nybegynder

29. oktober 2005 - 13:28 #2

tror ikke du forstod det 100%...

rigtigt, at jeg skal åbne program, og paste... men vil lave en toolbar med en tekstboks, når man så trykker enter i den tekstboks, så skal koden køres... og programmet skal så åbnes med tekstboksens tekst som argument.

Synes godt om

rvm Nybegynder

29. oktober 2005 - 19:22 #3

Sådan en tekstboks findes ikke, men du kan jo selv lave en, når der er trykket på knappen:

Sub KørProgram()

svar = inputbox()

' Specifying 1 as the second argument opens the application in
' normal size and gives it the focus.
Dim RetVal
RetVal = Shell("C:\WINDOWS\CALC.EXE", 1)

DoEvents
Selection.Paste

End sub

Synes godt om

mysitesolution Nybegynder

29. oktober 2005 - 20:17 #4

Latterligt ;)

Jep men det virker i hvert fald :)

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

Word kurser

Tag et kursus i Word og øg effektiviteten

Se alle Word kurser

Flere spørgsmål fra Word kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Denne app kan ikke køre på din pc Af mo- i Word	18	14/08/202413:41	14/08/202418:19
Konverter Word til PDF i trykkvalitet Af Jensen - en massebetegnelse i Word	10	12/08/202410:20	23/08/202423:22
Hævet og sænket skift i Word på mac Af Supersejemig i Word	1	14/06/202414:32	14/06/202416:35
Hvide streger langs kanter i tabel Af Stine i Word	2	24/05/202410:13	24/05/202410:29
Udskrive logo på kuvert Af lurup i Word	2	06/05/202420:43	07/05/202408:39

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