我想要打印并剪切表格中的数据。但是,剪切后我想跟踪它们在表格中的位置。有没有办法在单元格内添加页眉/页脚,以便我可以在每个单元格中输入“1a”/“1b”/等?我有数百个单元格的数据,所以如果有办法将其写成公式(例如在页眉/页脚中输入整页的页码),我也很乐意这样做!
谢谢你!
答案1
不在 Word 中没有办法实现这一点。
Word 中甚至不存在单元格地址的概念。
即使使用宏,这也将非常具有挑战性,因为 VBA 不能很好地处理 Word 中的表格。
答案2
虽然 Word 中的表格单元格确实没有页脚,但以下代码会在所选的第一个表格中的每个单元格的右下角插入硬连线(即不可更新)单元格坐标。注意:我只针对简单的非嵌套表格运行了该代码。此外,该代码确实不是包括任何错误处理,因此请确保备份您的工作等。
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