Learn how to provision tenants, synchronize on-premise Active Directory, implement Single Sign-On, customize Office deployment, and protect your organization with eDiscovery and DLP policies. Only from Platform Scholar.
Course Of The Month
Become a Premium Member and unlock a new, free course in leading technologies each month.
Solved
Code Modification
Posted on 2014-11-08
Hi Experts,
I just need to change some in my existing code. this code download zip files from one site from start date to end date mention on excel cells. but it only for current year only if I have to download for past years ...it cant I have to change year in code
need to change in code that download what ever start date and end date enter in cells i.e. any year and many year
see attached
Thanks
NSE-Eq.xlsm
I just need to change some in my existing code. this code download zip files from one site from start date to end date mention on excel cells. but it only for current year only if I have to download for past years ...it cant I have to change year in code
With oFso
If Not .FolderExists(strSavePath) Then
MakeMultiStepDirectory strSavePath
End If
End With
iYear = 2014
datLastDate = DateValue(strEndDate) 'DateSerial(iYear, 4, 9)
datWorkDate = DateValue(strStartDate) 'DateSerial(iYear, 1, 1)
need to change in code that download what ever start date and end date enter in cells i.e. any year and many year
see attached
Thanks
NSE-Eq.xlsm
[X]
Welcome to Experts Exchange
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
- Help others & share knowledge
- Earn cash & points
- Learn & ask questions
2
2-
2
6 Comments
Active today
Try to add one line after
Do
strMonth = UCase(Format(datWorkDate, "MMM")) ' upper case name of the month, like JAN
iYear = Year(datWorkDate) 'Current Year
Active 1 day ago
Here it is
Please replace this line
iYear = 2014
By these
Workbook attached.
Gowflow
NSE-Eq-V01.xlsm
Please replace this line
iYear = 2014
By these
Do
On Error Resume Next
iYear = InputBox("Please Enter Year to Process", "Year Input", Year(Now))
Loop Until Err = 0 And iYear >= 1900
Workbook attached.
Gowflow
NSE-Eq-V01.xlsm
Active today
Mr.als315,
I tried but not working and I want loop to all dates between start date and end date.
Sir.Gowflow,
Attached WB working but it ask for year in message box ...need to download all files between start date (cell A1) to end date (cell B1) in one click (Button Download) .....current it ask for year. needed - say start date is 1 jan 2013 & end date 20 apr 2014 then it will download all files between this dates irrespective of year i.e. no message box.
Thanks
Thanks
I tried but not working and I want loop to all dates between start date and end date.
Sir.Gowflow,
Attached WB working but it ask for year in message box ...need to download all files between start date (cell A1) to end date (cell B1) in one click (Button Download) .....current it ask for year. needed - say start date is 1 jan 2013 & end date 20 apr 2014 then it will download all files between this dates irrespective of year i.e. no message box.
Thanks
Thanks
Active today
I've tested and it is working
NSE-Eq.xlsm
NSE-Eq.xlsm
Featured Post
Drastically shorten your training time with WalkMe's advanced online training solution that Guides your trainees to action. Forget about retraining and skyrocket knowledge retention rates.
Question has a verified solution.
If you are experiencing a similar issue, please ask a related question
When you see single cell contains number and text, and you have to get any date out of it seems like cracking our heads.
This article describes how you can use Custom Document Properties to store settings and other information in your workbook so that they will be available the next time you open the workbook.
This Micro Tutorial demonstrates how to create Excel charts: column, area, line, bar, and scatter charts. Formatting tips are provided as well.
Access reports are powerful and flexible. Learn how to create a query and then a grouped report using the wizard. Modify the report design after the wizard is done to make it look better. There will be another video to explain how to put the final p…
Suggested Courses
Earn Certification
HTML5 Specialist - Certification
Free withPremium
Course of the Month4 days, 3 hours left to enroll
630 members asked questions and received personalized solutions in the past 7 days.
Join the community of 500,000 technology professionals and ask your questions.