I'm a newbie in VBA and for example I will call for 2 dates between all the dates in VBA I am doing, 2015/01/01 02-01: parameters 2015/01/01 and 15-01-2015, and I will find in all dates possibles, ie return an array with Function-2015 with 2015/01/01 ..... 15-01-2015 I have not got answers on the forums, thanks in advance for your help so much.
Text after "div class =" itemprop = "text">
You just change dated long and make loop (+1) and between all 2 dates Dated Mill (can be changed to date again)
Sub-calling () Dim test test = getDates (# 1/25/2015 #, # 2/5/2015 # ) End Sub function getDates (Date as ByVal StartDate date, as Date byVal EndDate) Version varied as varDates () Date dim lngDateCounter Long ReDim as varDates (1 to CLng (EndDate) - CLNG (StartDate) LngDateCounter = LBound (varDates) VarDates VarDates (lngDateCounter) = CDate (StartDate) StartDate = CDate (StartDate) + 1) Next lngDateCounter getDates = varDates ClearMemory: If IsArray (varDates) then erase varDates LngDateCounter = Empty End Function
No comments:
Post a Comment