Gibt es eine Möglichkeit, Zellen in einer Word-Tabelle Kopf- und Fußzeilen hinzuzufügen?

Question

Ich habe Daten in einer Tabelle, die ich ausdrucken und ausschneiden möchte. Ich möchte jedoch nach dem Ausschneiden den Überblick behalten, wo sie sich in der Tabelle befanden. Gibt es eine Möglichkeit, einer Zelle eine Kopf-/Fußzeile hinzuzufügen, sodass ich in jede Zelle „1a“/„1b“ usw. einfügen kann? Ich habe Hunderte von Zellen mit Daten. Wenn es also eine Möglichkeit gibt, sie als Formel zu schreiben (wie Seitenzahlen in Kopf-/Fußzeilen für ganze Seiten), würde ich das auch sehr gerne tun!

Danke schön!

Answer 1

NEINdafür gibt es in Word keine Möglichkeit.

In Word existiert nicht einmal das Konzept einer Zelladresse.

Selbst mit einem Makro wäre es ziemlich schwierig, da VBA mit Tabellen in Word nicht gut funktioniert.

Answer 2

Obwohl Tabellenzellen in Word keine Fußzeilen haben, fügt der folgende Code fest verdrahtete (d. h. nicht aktualisierbare) Zellkoordinaten in die untere rechte Ecke jeder Zelle in der ersten Tabelle einer Auswahl ein. ACHTUNG: Ich habe den Code nur mit einfachen, nicht verschachtelten Tabellen ausgeführt. AußerdemNICHTSchließen Sie die gesamte Fehlerbehandlung ein. Stellen Sie daher sicher, dass Sie Ihre Arbeit usw. sichern.

Sub InsertCellCoordinates()

    If Selection.Tables.count = 0 Then Exit Sub

    Dim tbl As Table
    Set tbl = Selection.Tables(1)

    Dim RowCntr As Integer
    Dim CellCntr As Integer
    Dim rran As Range

    For RowCntr = 1 To tbl.Rows.count
        For CellCntr = 1 To tbl.Rows(RowCntr).Cells.count
            Set rran = tbl.Rows(RowCntr).Cells(CellCntr).Range.Characters.Last
            rran.Collapse wdCollapseStart

            rran.InsertParagraph

            rran.InsertAfter Chr(RowCntr + &H40) & "." & CellCntr

            rran.Paragraphs.Last.Format.Alignment = wdAlignParagraphRight
        Next
    Next

End Sub