Quellenangabe ohne Klammern

[StrammerMax]

Hallo Leute,

ich schreibe gerade eine Arbeit und verwende hierfür Literatur.

Ich möchte wie folgt automatisch in der Fußzeile die Quelle auswählen in folgendem Format:

Müller & Dietz, 2008, S. 46

ich bekomme aber immer:
(Müller & Dietz, 2008, S. 46)


Ich verwende Word 2010.
Und nein - der Trick die Styles zu ändern funktioniert nicht.


Weiß jemand, wie ich diese sch*** nervigen Klammern da weg bekomme?

[StrammerMax]

Niemand eine Idee? :(

[Fennek]

Hallo,

hast du es mit "Replace" versucht?

Lade bitte eine Beispieldatei mit 2 Seiten, jeweils eine Fußnote hoch.

mfg

(versprechen kann ich dir nichts)

[StrammerMax]

Mit Replace findet er alle Klammern im Text und entfernt diese - das möchte ich nicht.

[Fennek]

Hallo,

als ich an der Uni war, gab es noch kein Word, deshalb mußte ich erst einmal lernen, wie man Fußnoten einfügt.

An einem Beispiel ging das:

Code:

Sub T_1()
With ThisDocument
    For i = 1 To .Footnotes.Count
        Tx = Replace(Replace(.Footnotes(i).Range.Text, "(", ""), ")", "")
        .Footnotes(i).Range.Text = Tx
    Next i
End With
End Sub

Berichte bitte, ob das auch in einem richtigen Text geht.

mfg

[StrammerMax]

Vielen Dank.

Aber wie starte ich das?
Ich habe ein neues Makro angelegt und den Code eingefügt. Das alleine tut aber nichts.

[Fennek]

Hallo,

zum Teste öffne ich den VBE mit Atl-F11, wenn der Cursor im Code steht, kann man im Menü mit der Pfeil-Taste, oder F5 starten. Hilfreich ist der Einzelschritt-Modus F8.

Falls es andere Klammern in den Fußnoten geben sollte, muss das Replace ersetzt werden durch die Prüfung mit Left(..., 1) und Right(...,1), dann ändern mit Mit(...)

mfg

[StrammerMax]

Habe es geschafft. Es funktioniert.
Allerdings entfernt er dann den Link von den Fußzeilen - somit lässt sich kein automatisches Literaturverzeichnis mehr erstellen.

[Fennek]

Hallo,

hier isr eine ähnliche Frage, noch ohne Antwort.

https://www.ms-office-forum.net/forum/sh...p?t=354726

mfg