Avatar billede Slettet bruger
16. februar 2001 - 10:30 Der er 2 kommentarer og
1 løsning

Makro i WordPerfect 8.0

Min makro får pc\'eren til gå i sort. Jeg har en makro som fungere upåklageligt i ver. 6.0, men ikke i ver. 8.0. Makroen opretter et sidehoved på side 2 i et dokument. Den består af hhv 1. og 3. linie i et adressefelt – som findes via et bogmærke. Herefter hentes et dokumentnummer via et bogmærke, som ogsp indsættes i sidehovedet, derefter påfø-res datoen, skrifttypen ændres til en mindre skrift og der indsættes et lodret ryk. Sidehovedet af-sluttes og der slås en sidefod fra.
Avatar billede puller Nybegynder
16. februar 2001 - 10:44 #1
Prøv at lave en ny makro, og se om den virker!
Avatar billede Slettet bruger
16. februar 2001 - 11:14 #2
det har jeg selvfølgelig prøvet, men uden held.
Min makro ser således ud, I er meget velkommen til at teste den:

//*********************************************************
//*    MACRO: TOPTEKST.WCM
//*    PURPOSE: ÆNDRER TOPMARGIN TIL 1,9 CM
//*    OPRETTER TOPTEKST A  MED 1. OG 3. LINIE AF ADRESSEN SAMT
//*    DATO, DOKUMENT NR OG SLÅR SIDEFOD A FRA
//*********************************************************
Application (A1; \"WordPerfect\"; Default; \"DK\")
BookmarkFind (\"start\")
SelectLineDown ()
SelectLineDown ()
SelectLineEnd ()
EditCopy ()
PosLineDown ()
SearchString (\"\")
MatchPositionAfter ()
SearchNext (Extended!)
MarginTop (1.9008c)
HeaderA (Create!)
EditPaste ()
PosLineBeg ()
PosLineUp ()
SelectLineEnd ()
DeleteCharNext ()
DeleteCharNext ()
PosLineDown ()
PosLineEnd ()
HardReturn ()
BookmarkCreate (\"toptekstnr\")
SubstructureExit ()
FooterA (Off!)
BookmarkFind (\"nr\")
SelectLineEnd ()
EditCopy ()
PosLineDown ()
BookmarkFind (\"toptekstnr\")
EditPaste ()
Type (\", \")
DateFormat (\"..\")
BookmarkCreate (\"dato2\")
DateText ()
DateFormat (\".  \")
Advance (AdvanceDown!; 0.4995c)
PosDocTop ()
PosDocTop ()
LineSpacing (0.9)
SelectLineDown ()
SelectLineDown ()
SelectLineDown ()
SelectLineEnd ()
FontSize (7.98p)
PosLineEnd ()
PosDocTop ()
SearchString (\"\")
ReplaceString (\"\")
ReplaceForward (Extended!)
SubstructureExit ()
SearchString (\"\")
MatchPositionAfter ()
SearchNext (Extended!)
PosLineEnd ()
Avatar billede Slettet bruger
20. februar 2001 - 16:03 #3
Har selv løst problemet, WP80 behøver ikke nær så avancerede kringelkroge som wp60.
Så jeg lukker dette spørgsmål.
Avatar billede 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.

Loading billede Opret Preview
Kategori
IT-kurser om Microsoft 365, sikkerhed, personlig vækst, udvikling, digital markedsføring, grafisk design, SAP og forretningsanalyse.

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