Avatar billede mip Nybegynder
11. oktober 2003 - 20:05 Der er 13 kommentarer og
1 løsning

Indsæt tekst, beskydt mod redigerdigering,lås til et bestemt sted

Jeg har fået en opgave, hvor jeg ved hjælp af vba skal indsætte en tekst et fast sted i et dokument, i dette tilfælde på sidste side nedderst, denne tekst skal låses, så den lige meget hvad man gør, altid vil stå nederst.
Den skal også låses mod over skrivning og redigering.
Det behøver ikke nødvendigtvis være en tekst streng, hvis det er nemmere med en fil.
Avatar billede jkrons Professor
11. oktober 2003 - 23:37 #1
Prøv med denne.

Sub IndsætFilSidstogLaas()

    Selection.EndKey Unit:=wdStory
    Selection.InsertBreak Type:=wdSectionBreakContinuous
    Selection.InsertFile FileName:="sti- og filnavn", Range:="", _
        ConfirmConversions:=False, Link:=False, Attachment:=False
    ActiveDocument.Sections(1).ProtectedForForms = False
    ActiveDocument.Sections(2).ProtectedForForms = True
    ActiveDocument.Protect Password:="", NoReset:=False, Type:=wdAllowOnlyFormFields
   
End Sub
Avatar billede jkrons Professor
11. oktober 2003 - 23:38 #2
Ret til navnet på den fil du vil indsætte.
Avatar billede mip Nybegynder
12. oktober 2003 - 00:11 #3
Fedest det virker bare.
Du har tjent dine point, men jeg vil lige spørge,er det også muligt, lad os sige jeg har et dokument med 3 linier på en side, og så vil indsætte mit dokument men sådan at det indsatte kommer til at stå 1 linie over slut på siden.
Avatar billede mip Nybegynder
12. oktober 2003 - 08:55 #4
Jeg har tænkt lidt mere over det, der er et problem jeg ikke rigtigt kan løse, den indsatte tekst skal altid stå 3 linier over bunden på sidste side, dvs. hvis man starter med at indsætte teksten i bunden på side 1, og herefter begynder at skrive, der kommer så et pagebreak, så skulle den indsatte tekst gerne ryge om på side 2 og stå 3 linier over bunden. Kan man evnt. løse det med en tekstboks eller måake sætte teksten i fodnoten?
Avatar billede jkrons Professor
12. oktober 2003 - 10:07 #5
Jeg er ikke helt sikker på, hvad du mener med 3 linier over bunden? Og det afhænger vel også af hvor lang den indsatte tekst er.
Avatar billede mip Nybegynder
12. oktober 2003 - 11:26 #6
Teksten er på 2 linier.
Med 3 linier over bunden mener jeg, 3 linier fra bund margen.

Jeg ved ikke om man måske skulle arbejde med sidefod i stedet.
Avatar billede jkrons Professor
12. oktober 2003 - 11:41 #7
Problemt med sidefod, er at den ligger placeret mellem bundmargen og parpirets kant. Det vil betyde, at man skal ændre margen på den sidste side, for at sikre korrekt placering af sidefod, men jeg vil gerne se lidt nærere på sagen, men det blever først i aften eller evt i morgen.
Avatar billede mip Nybegynder
12. oktober 2003 - 11:54 #8
Jeg ved ikke om jeg har forklaret mig rigtigt, da jeg ikke er særlig god til vba, vil det jeg skriver måske ligne vrøvl, men lad mig lige prøve.

Jeg vil lave en skabelon, der når den åbnes, sætter indholdet af en fil ind i sidefoden.
Brugeren vil herefter skrive sit dokument, måske fyldende flere sider.

Jeg skal så sikre mig, at det jeg fylte ind i sidefoden, "kun" står i sidefoden på sidste side, og at indholdet er låst for redigering.

Er det muligt, eller er det noget vrøvl?
Avatar billede jkrons Professor
13. oktober 2003 - 13:06 #9
Det lyder ikke som vrøvl - men lidt drilsk, og jeg har væet optaget det meste af i dag. Jeg ser pådet, og vender tilbage.
Avatar billede jkrons Professor
14. oktober 2003 - 11:40 #10
Jeg har nu arbejdtet lidt med tingene, og problemet er, at hvsi du vil have en sidefod, der kun forekommer på sidste sidste, skal sidste side være i en en sektion for sig selv (ellers kan den iøvrigt heller ikke låses).

Men hvis der kun er en side i dokumentet, vil sidefoden altid være den, fra den første sektion, så det vil desværre ikke virke, fordi makroen nødvendigvis må sætte den føste sidefod til at være tom - ellers vil det ikke virke, hvis dokumentet har flere sider.
Avatar billede mip Nybegynder
14. oktober 2003 - 17:54 #11
Hvad så hvis man lavede en tekstboks nederst på siden.
Ville man så kunne gøre det sådan, at hvis brugeren skrev ud over side 1, ville tekstboksen automatisk flytte om til nederst på side 2 ovs....
Avatar billede jkrons Professor
15. oktober 2003 - 12:23 #12
Nej, det er præcis det, der er problemet. Du kan tuilsyneladene ikke styre placeringen af en textbox relativt. Det vil sige du kan bestemme præcis, hvor den skal være i forhold til en side, men den bliver ikke automatisk flyttet, hvis teksten fylder mere end en side. I så fald skal tekstboxen "forankres" til et afsnit i teksten, men da teksten endu ikke findes, er der ikke noget at forankre til.
Avatar billede mip Nybegynder
15. oktober 2003 - 18:00 #13
Det lyder på dig som om det er en uløselig opgave, så mange tak for hjælpen.
Avatar billede jkrons Professor
15. oktober 2003 - 20:14 #14
Jeg ved ikke om den er uløselig - jeg kan bare ikke finde løsningen, men tak for point og held og lykke med det.
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
Tag et kursus i Word og øg effektiviteten

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