Hi All,
I have been give a speadsheet that has a date column which should increment by either by 2, 5, 7, 14, 28 or 56 days. These are chosen by selecting 1 of 6 buttons.
Each time I press a but to increment the date I receive the following error message:
Sub Increase_date_by_days_on_button_1()
Dim r As String
r = ActiveCell.Row
Dim h As String
h = "K" & r
Range(h).Value = Range(h).Value + Worksheets("Settings").Range("c5").Value
End Sub
Any advice on resolving this would be hugely appreciated.
I have been give a speadsheet that has a date column which should increment by either by 2, 5, 7, 14, 28 or 56 days. These are chosen by selecting 1 of 6 buttons.
Each time I press a but to increment the date I receive the following error message:
Sub Increase_date_by_days_on_button_1()
Dim r As String
r = ActiveCell.Row
Dim h As String
h = "K" & r
Range(h).Value = Range(h).Value + Worksheets("Settings").Range("c5").Value
End Sub
Any advice on resolving this would be hugely appreciated.