Trying to add date & time using button / Numbers

[Legacy 185509]

I am trying to add number to cell using button so don't have to use keyboard
the format of cell is
7/12/2011 15:00:00
First way
I can add date & month using +30 & +1 , I cannot time

Second way(data & time to decimal & fractions)
I can (-) subtract day by using -1
Type The Date And Time 12/12/2004 18:00 In Any Cell
Right Click In The Cell And Select Format Cells And Click The Number Tab, Then General Under Categories:
Look In The Sample: Box And You Should See 38333. 75, Where 38333 Represent The Date (Serial Number) And . 75 Represents The Time (Decimal Fraction).


second way look way better please help me to able to change date & time using vba & button
here is my code

to subtract 1

Sub minzz()
Sheets("Sheet1").Select
Range("C1") = Range("C1") - 1
End Sub

to add 1

Sub pluz()
Sheets("Sheet1").Select
Range("C1") = Range("C1") - 1
End Sub

+30 & -30

Sub mminz()
Sheets("Sheet1").Select
Range("C1") = Range("C12") - 30
End Sub

Sub mpluz()
Sheets("Sheet1").Select
Range("C1").Value = Range("C1").Value + 30
'Range("C1") = Range("C1") + 30
End Sub

 

[Norie]

You don't say what time(s) you want to add/subtract.

For any time you will need to divide it appropriately:

A day in Excel is 1 so an hour is 1/24 and a minute is 1/24/60 and so on.

 

[Legacy 185509]

I wanna make separate button 1 to add 1 hour other to subtract 1 hour
other to add 1 day & subtract 1 day & so on