我有一个Word文档(*的.docx)和具有3列8行的表 **Name Description Dimension**
Level Text 1 Text 11
Text 2 Text 12
Text 3 Text 13
Text 4 Text 14
Text 5 Text 15
Text 6 Text 16
test Text 7
我正在编写一些代码来将多个工作表(它们构成各个零件清单)合并为一个大型零件清单。 到目前为止,我有2个功能,其扫描每个工作表的最后行和列 Function LastRow(sh As Worksheet)
On Error Resume Next
LastRow = sh.Cells.Find(What:="*", _
After:=sh.Range("A1"), _