Voetnoot-opmaak-probleem

Status
Niet open voor verdere reacties.
frankgbosman

frankgbosman

Verenigingslid
Lid geworden
20 jul 2002
Berichten
300
Beste mensen, ik heb een document met daarin eindnoten aan het einde van elke sectie (zie bijlage). Alleen worden er om onverklaarbare redenen een groot aantal harde returns geplaatst tussen de streep die het begin van de voetnoten aangeeft en de feitelijke eerste voetnoot. Ik krijg dit noch bij voetnoten noch bij voettekst aangepast. Iemand een idee?
 

Bijlagen

  • Untitled-1.jpg
    Untitled-1.jpg
    24,8 KB · Weergaven: 622
Hoi,

Uit je bijlage is niet goed op te maken, wat je nu precies hebt gedaan.
Het lijkt alsof er een voetnoot staat in de koptekst van de volgende pagina.
In elk geval is het vreemd, dat (als het inderdaad een voetnoot is ....) deze aan het begin van de eerst pagina van een volgende sectie staat .....

Mogelijk dat het werken aan/met voet- en eindnoten en kop- en voetteksten enigszins door elkaar gehusseld is ....

Ik neem aan dat het om een vrij groot document gaat .... ?

Je zou het document naar mij toe kunnen sturen tvveelen@gmail.com om te zien, wat eraan te doen.

- Dubbelklik in de gewone tekst op het verwijzingsnummer naar de voetnoot.
- Je krijgt nu een 'onderwaterscherm' waar de 'Enters' w.s. zwart en niet grijs worden weergegeven
- Haal deze 'Enter' (alineamarkeringen in Word-taal) wég en klik op de knop 'Sluiten' in de werkbalk van het 'onderwaterscherm'
 
Laatst bewerkt:
Volgens mij zou het relatief simpel moeten kunnen door te dubbelklikken in de bewuste voetnoot en de returns weg te halen, maar je schrijft dat dat niet lukt. Waarom kun je met backspace of Del die returns dan niet verwijderen / wat gebeurt er als je dubbelklikt in de voetnoot?
 
Ik kan niets doen: de grijze (dus inactieve returns) kunnen niet bereikt, dus niet verwijderd worden. Ik snap er niets van.
 
Ik word erg nieuwsgierig naar de oorzaak. Kun je die ene pagina niet even zippen en hier als bijlage plaatsen?
 
De inhoud van het document is van dien aard dat ik die liever niet online voor iedereen zet. Ik wil hem wel mailen. De oplossing - als we die vinden - zet ik wel online natuurlijk,
 
Hoi,

Inmiddels heb ik het gecorrigeerde bestand weer teruggestuurd naar Frank.

Voor andere geïnteresseerden:

In de 'help' van Word (in mijn geval 2003) intypen: eindnootscheidingsteken

Hier wordt aangegeven hoe dit teken (maar dus ook de - in dit geval om wat voor reden dan ook - toegevoegde 'Enters' ofwel in Word-taal: alineamarkeringen) te wijzigen of te verwijderen is.

Met eindnootmarkeringsteken wordt dan (ook zo lekker duidelijk) bedoeld, de scheidingslijn tussen normale tekst en het gedeelte met voet- of eindnoten.
 
Beste Teun,

Dat je zoveel moeite hebt willen doen om een wildvreemde te helpen.
Ik kan alleen maar zeggen: héél erg bedankt!
 
Ommeren zei:
Hoi,

Inmiddels heb ik het gecorrigeerde bestand weer teruggestuurd naar Frank.

Voor andere geïnteresseerden:

In de 'help' van Word (in mijn geval 2003) intypen: eindnootscheidingsteken

Hier wordt aangegeven hoe dit teken (maar dus ook de - in dit geval om wat voor reden dan ook - toegevoegde 'Enters' ofwel in Word-taal: alineamarkeringen) te wijzigen of te verwijderen is.

Met eindnootmarkeringsteken wordt dan (ook zo lekker duidelijk) bedoeld, de scheidingslijn tussen normale tekst en het gedeelte met voet- of eindnoten.
Klik om te vergroten...
Ik heb het probleem nu ook, en die uitleg van 2003 is uiteraard niet toepasbaar op 2007, dat zou te simpel zijn...

Weet iemand hoe het op te lossen met Word 2007?
 
Soms biedt VBA uitkomst:

Probeer eerst:

Code: 
Sub herstel()
  ActiveDocument.Endnotes.ResetSeparator
End Sub

en voor je eigen opmaak (met oneindige variaties):

Code: 
Sub idiosyncratisch()
  With ActiveDocument.Endnotes.Separator
    .Delete
    .Text = String(2, vbCr)
  End With
End Sub
 
Bedankt, de harde return is weg nu, maar er is toch nog meer plaats dan gemiddeld onder die streep (ik vergelijk met een ander document).

Ik heb al nagezien bij de stijlsjablonen, maar "Eindnoottekst" heeft 0 ptn "afstand voor" ingesteld...
 
Varieer eens wat met deze macro's:

Code: 
Sub lijnopmaak()
  With ActiveDocument.Endnotes.Separator.ParagraphFormat
    .LineSpacingRule = wdLineSpaceAtLeast
    .LineSpacing = 6
    .SpaceAfter = 0
    .SpaceAfterAuto = False
  End With
End sub

En voor de opmaak van de noten:

Code: 
Sub nootopmaak()
  ActiveWindow.ActivePane.View.Type = wdPrintView
  ActiveWindow.View.SeekView = wdSeekEndnotes
    
  Selection.EndKey wdStory, wdExtend
  With Selection.ParagraphFormat
    .LeftIndent = CentimetersToPoints(0)
    .RightIndent = CentimetersToPoints(0)
    .SpaceBefore = 0
    .SpaceBeforeAuto = False
    .SpaceAfter = 0
    .SpaceAfterAuto = False
    .LineSpacingRule = wdLineSpaceSingle
    .Alignment = wdAlignParagraphLeft
    .WidowControl = True
    .KeepWithNext = False
    .KeepTogether = False
    .PageBreakBefore = False
    .NoLineNumber = False
    .Hyphenation = True
    .FirstLineIndent = CentimetersToPoints(0)
    .OutlineLevel = wdOutlineLevelBodyText
    .CharacterUnitLeftIndent = 0
    .CharacterUnitRightIndent = 0
    .CharacterUnitFirstLineIndent = 0
    .LineUnitBefore = 0
    .LineUnitAfter = 0
  End With
  ActiveWindow.View.SeekView = wdSeekMainDocument
End Sub
 
snb zei:
Varieer eens wat met deze macro's:

Code: 
Sub lijnopmaak()
  With ActiveDocument.Endnotes.Separator.ParagraphFormat
    .LineSpacingRule = wdLineSpaceAtLeast
    .LineSpacing = 6
    .SpaceAfter = 0
    .SpaceAfterAuto = False
  End With
End sub
Klik om te vergroten...
Ik heb geen flauw benul hoe ge die dingen verzint, maar het werkt wel! Bedankt!
 
Creatief gebruik van de helpfunktie in de VBEditor doet soms wonderen.
 
scheidingsteken voetnoot veranderen

snb zei:
Creatief gebruik van de helpfunktie in de VBEditor doet soms wonderen.
Klik om te vergroten...


Om niet al te technisch te worden en de VBEditor niet te hoeven gebruiken heb ik de volgende oplossing gevonden voor Office 2007
(MS mag de helpfunctie wel eens wat uitbreiden met de juiste zoekwoorden!):

Een voet- of eindnoot veld opmaken

Als een scheidingteken voor een voetnoot onderaan de pagina niet goed staat kun je dat veranderen op de volgende manier.

  1. Ga naar de conceptweergave door op Concept naast Beeld op de statusbalk te klikken.

  2. Klik op het tabblad Verwijzingen, in de groep Voetnoten, op Noten weergeven.

  3. Als het document zowel voetnoten als eindnoten bevat, verschijnt er een bericht. Klik op Voetnootgebied weergeven of Eindnootgebied weergeven en klik vervolgens op OK.

  4. Klik in de nootdeelvensterlijst op Scheidingsteken

  5. Haal de gewenste harde returns weg (of pas andere gewenste opmaak toe).

Succes
Erwin.
 
Laatst bewerkt:
Geweldig!!!

Werkt perfect!

Ik heb de leuke taak gekregen van m'n vriendin om haar thesis op te kuisen.

Dit was één van de leuke onnozelheden along the road...

Hoe komen die er vraag ik me toch wel af, ze blijven namelijk hardnekkig terug keren na een tijd...

Nogmaals bedankt voor dit simpel, doch zeer handig handig stukje code!

Groetjes!


snb zei:
Soms biedt VBA uitkomst:

Probeer eerst:

Code: 
Sub herstel()
  ActiveDocument.Endnotes.ResetSeparator
End Sub
Klik om te vergroten...
 
voetnootprobleem

Ook ik heb hetzelfde probleem... wij werken met Word 2003 maar ik krijg het helaas niet voor elkaar met de oplossing die wordt aangedragen. De 'help' van Word geeft nl. aan dat er automatisch een venster wordt geopend en dat is niet het geval.. kan iemand mij helpen?
 
toch nog opgelost

Ik dacht dat met normale weergave 'niet onderwater werd bedoelt'. Nu weet ik dankzij een hulpvaardige collega dat ik op Beeld en dan op Normaal moet klikken..... en dan zie je het venster wél.
 
Status
Niet open voor verdere reacties.
                    Steun ons                    

Nieuwste berichten

Terug
Bovenaan Onderaan