Posted to microsoft.public.excel.programming

loren.pottinger loren.pottinger is offline

external usenet poster

Posts: 34

Using DateAdd function with cell values.

Both F7 and H7 contain a date yet this sub does not execute the
statements after Then.................Please help.

Sub GetAmOrDep()

Dim TestDate As Date
TestDate = DateAdd("m", Range("F7").Value, Range("H7").Value)

If TestDate < Range("I7").Value Then
Range("K7").Select
Selection.Copy
Range("M7").Select
ActiveSheet.Paste
End If
End Sub

Reply With Quote

Thread Tools	Search this Thread
Show Printable Version	Search this Thread: Advanced Search
Display Modes
Switch to Linear Mode Switch to Hybrid Mode Threaded Mode

Posting Rules
Smilies are On [IMG] code is On HTML code is Off Trackbacks are On Pingbacks are On Refbacks are On

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Dateadd function	Dr. Maunuk	Excel Discussion (Misc queries)	2	September 28th 07 07:32 AM
Using DateAdd Function with cell values	loren.pottinger	Excel Discussion (Misc queries)	3	August 30th 06 01:10 AM
DateAdd	johnboy	Excel Programming	2	June 17th 06 10:58 PM
DateAdd	Michael Wise[_7_]	Excel Programming	1	August 27th 04 07:40 PM
DateAdd function	Bill[_19_]	Excel Programming	2	November 12th 03 07:07 PM

All times are GMT +1. The time now is 09:44 PM.

About Us

"It's about Microsoft Excel"

Menu

About Us