Søg
Avatar billede Mads Larsen Nybegynder
28. oktober 2010 - 15:00 Der er 1 kommentar og
1 løsning

Find en Autotext

Hej Eksperter

Jeg er stødt ind i et problem.

Jeg har 2 forskellige autotekster en til "Forside" og en til efterfølgende sider "Side2"

Det jeg gerne vil opnå med VBA kode, er at tjekke om AutoText "Side2" findes på siden.

Noget i retning af:

If side2 = true then
  BlaBla
Else
  BlaBla noget andet
End if

Umiddelbart har jeg ikke kunnet finde en måde at gøre dette på.
Jeg har været ved at tænke på at lave noget i retningen af:

Gem position
Vis sidehoved
Vis feltkoder
Søg på tekst side2
Hvis findes gem i en variable
Skjul feltkoder
Gå tilbage til gemt position

Nogen gode idér ? :-)
Avatar billede Mads Larsen Nybegynder
29. oktober 2010 - 11:42 #1
Det er på en Office XP
Avatar billede Mads Larsen Nybegynder
29. oktober 2010 - 12:45 #2
Denne funktion klarer det fint. Derfor lukker jeg spørgsmålet igen.


Private Function TjekSide2Papir()
    TjekSide2Papir = False
    WordBasic.ViewHeader
    ActiveWindow.View.ShowFieldCodes = True
    WordBasic.EditSelectAll
    If InStr(Selection.Text, "Toptekst side 2") <> 0 Then
        TjekSide2Papir = True
    End If
    ActiveWindow.View.ShowFieldCodes = False
    WordBasic.CloseViewHeaderFooter
End Function
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
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
Kan man slette skrifter : Word : Windows 10 ? Af Ikke-ekspert i Word 10 28/09/202519:16 29/09/202511:57
WordMat Af jgormm i Word 3 21/09/202510:53 22/09/202512:57
alfabetisk rækkefølge i word på ipad Af PAN i Word 1 02/06/202514:13 02/06/202522:24
Word VBA: Check engelsk gramma og ret fejl Af Dan Elgaard i Word 3 30/04/202509:34 02/05/202509:13
Fed skrift Af camsti i Word 3 07/04/202518:36 07/04/202522:58
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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 23:03 Problem med opdatering fra 23h2 Af valby i Windows
23/1014:00 der kan ikke opnås forbindelse til nas Af casablanca i Servere
23/1002:16 Rensning af database med CCleaner Af Prevo i Andet software
21/1019:42 Har Messenger ændrer sig ? Af Ikke-ekspert i Chat & Messaging
21/1013:49 Vi kunne ikke installere denne opdatering, men du kan prøve igen (0x800f0991). Af Wombat i Windows
White papers
Flere white papers »