Question

第一次来到这里，对不起，如果我做错了什么

我刚刚发现了excel宏，我认为它们会对我有很大的帮助，但我并没有真正参与编程和所有这些事情

我做了一些宏，这很简单，但这个不是，至少不适合我，我希望你能帮助我

我已经尝试了很多像NumberFormat和Format（...）这样的东西，但它并没有起到我希望它如何工作的作用

我想要的是：

我在单元格[F6]（格式化dd.mm）中获得带有特定日期的excel文档，如下所示：＆＃34; 01.08＆＃34; ，它总是01（月的第一天）

现在我想要一个宏，这将占用该日期，每次我使用宏我希望它在第二天粘贴我当前选择的单元格（ActiveCell）

因此，当我第一次在该文档中使用我的宏时，我希望它粘贴＆＃34; 02.08＆＃34;进入我选择的当前单元格

下次我使用它＆＃34; 03.08＆＃34;等。

我希望你能理解我并能帮助我

Answer 1

试试这个。请注意，关闭工作簿时i将重置为0。如果要在会话之间存储i，则必须将其写入单元格，然后引用该单元格单元格F6必须正确格式化为日期。

Dim i As Long

Sub next_day()
    i = i + 1
    Selection = Range("F6").Value + i
    Selection.NumberFormat = "dd.mm"
End Sub