2013-10-28 28 views
0

我需要在Excel表格中放置一個按鈕來更改單元格內容。在excel中修改單元格的按鈕

例如,我想填充單元格A2的日期結構爲dd/mm/yyyy,一旦我選擇單元格並按下按鈕,單元格內容(日期)將向前移動1天。

「2013年1月1日

點擊

2013年2月1日」

時,很有可能的事情來實現?你能幫我嗎 ?

Thanx提前

回答

3

您需要使用DateAdd()。將此代碼放入按鈕單擊事件中。還要將Sheet1更改爲相關的圖紙名稱。

With ThisWorkbook.Sheets("Sheet1") 
    .Range("A2").Value = DateAdd("d", 1, .Range("A2").Value) 
End With 

語法

DateAdd(interval, number, date) 

間隔參數具有下列設置:

yyyy : Year 
q : Quarter 
m : Month 
y : Day of year 
d : Day 
w : Weekday 
ww : Week 
h : Hour 
n : Minute 
s : Second 

隨訪FROM COMMENTS

我想要動態地保留選定的單元格,換言之,我不想限制在單元格A2中,我需要選擇表格中的任何單元格或完整的行或列,然後對其應用操作。

試試這個

Dim aCell As Range 

If TypeName(Selection) = "Range" Then 
    For Each aCell In Selection 
     With ThisWorkbook.Sheets("Sheet1") 
      aCell.Value = DateAdd("d", 1, aCell.Value) 
     End With 
    Next 
End If 
+0

親愛感謝這個工作完美,但,我想保持選定單元格動態,換句話說,我不希望被限制在單元格A2中我需要選擇表格中的任何單元格或完整的行或列並對其應用操作。 – arin

+1

然後使用'Selection'對象:) –

+0

.Range(「Selection」)。Value?對不起,我以前從未使用VBA – arin

1

你可以嘗試這樣的事情

sub myClick() 
    Selection.Value = Selection.value + 1 
end sub 
+0

現在宏添加到選定的單元格。 – Makah