0

我有一份用于列出员工要求的文件。我想要一个按钮来添加新行（新员工请求）并自动将某些内容插入列中。所以我希望它在一列中生成下一个 ref#（XX-01/XX-02等），并添加提出请求的日期。

这可能吗？

评论的副本（不是OP）：

我使用的当前代码是： 

Private Sub CommandButton1_Click()  
Sheets("Sheet2").Range("A11").Select  
ActiveCell.EntireRow.Insert Shift:=xlUp
Sheets("Sheet2").Range("A11:AA11").Select  
Selection.Borders.Weight = xlThin  
Range("A11:AA11").Interior.Color = RGB(255, 255, 255)  
End Sub

这会添加一个新行并根据需要对其进行格式化。但是，即使我记录了一个新的宏以在下次添加行时向下拖动所需的字段（ref# 等），它也会添加到先前添加的行之上（因为第 11 行变为第 12 行，因此将始终添加到上面）。

4

1 回答 1

0

鉴于上面的第一条评论（等），尽管您可能希望考虑非 VBA 替代品的标签。也许进入一个表格（插入>表格 - 表格），例如="XX-"&ROW()-1在请求＃列（向下拖动时应自动调整）并使用Ctrl+;输入日期。

于 2013-10-30T14:02:15.047 回答