Excel宏，dd.mm日期+1

在這裏第一次，對不起，如果我做錯了Excel宏，dd.mm日期+1

我只是發現了有關Excel宏和我想他們會幫助我很多，但我不真正進入程序，所有這些東西

我做了幾個宏，這是很容易，但是這個人是不是，至少不適合我，我希望你能幫助我

我已經嘗試了很多像NumberFormat和格式（...）的東西，但它沒有工作，我怎麼想它的工作

Wh在我想要的是：

我得到一個確定的日期在單元格[F6]（格式化dd.mm）這樣的Excel文檔：「01.08」，它總是01（月份的第一天）

現在我想要一個宏，這將採取該日期，每次我使用宏我希望它粘貼第二天在我目前選擇的單元（ActiveCell）

所以當我第一次使用我的宏那個文件，我想把它粘貼「02.08」到我選擇的當前單元中

下次我用它「03.08」等。

我希望你能理解我，能幫助我

2016-07-05 D. Va

使用'DateAdd'：'使用DateAdd（「d」，1，則DateValue（範圍（「F6」）值））'「中的「d」代表天，1爲1天，則DateValue（範圍（「F6」）Value）獲取你想要添加一天的日期（當然你必須改變「F6」） – gizlmo

http://analysistabs.com/excel-vba/write-data-to-worksheet -cell /，你可以添加幾天到日期，或者你可以使用DATEADD。 –

試試這個。請注意，關閉工作簿時，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

2016-07-05 12:06:44

回答