Question

我有一个包含十个不同电子表格的工作簿。每个电子表格都有一个符合以下格式的标题：“项目名称 - 电子表格名称 - 修订日期：”。

例如，示例电子表格标题应如下所示：

"Test Project - Form 1 - Revision Date: "
"Test Project - Form 2 - Revision Date: "
"Test Project - Form 3 - Revision Date: "

等等..

我想通过只让他们输入一次“项目名称”来容纳用户，然后它会使用该值自动填充其余的标题。我知道它可以很容易地用细胞完成，但我对Excel不是很有经验。这可以用标题来完成吗？

Answer 1

使用输入单元格为用户输入项目名称，然后命名该单元格，例如“Project_Name”。

接下来，对于电子表格中的每个标题，请输入以下公式：

= Project_Name & " - Form XX - Revision Date: "

（显然，更改表格编号的“XX”）

希望这是有道理的。

Answer 2

如果您指的是只能在布局视图和打印预览中看到的标题，则无法使用简单的Excel功能进行设置。你应该在宏中做到这一点。

如果将项目名称存储在单元格A1中，并将修订日期存储在单元格B1中，则可以将按钮放在同一工作表中。按钮的文本可以是“填充标题”，它将运行的宏是此代码：

Sub FillHeaders()

    For Each wSheet In ActiveWorkbook.Worksheets

        If wSheet.Name <> "Cover Page" Then

            wSheet.PageSetup.CenterHeader = _
                ActiveSheet.Range("A1") & " - " & _
                wSheet.Name & " - Revision date: " & _
                ActiveSheet.Range("B1")

        End If

    Next wSheet

End Sub

这将遍历所有工作表（名为“封面”的工作表除外）并将中心标题设置为您需要的文本。由于ActiveWorksheet是您按下按钮的位置，因此表中的A1和B1单元格将用于标题文本中。

我可以使用标题中的用户输入来自动填充其他标题吗？

2 个答案: