We value your feedback.
Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!
Sub smiley_face() 'macro to open all files within a folder and apply password strPassword = InputBox("Please enter your password") sPath = "S:\Circulation\R Winters\" sDir = Dir$(sPath & "*.xls", vbNormal) Do Until LenB(sDir) = 0 Application.AskToUpdateLinks = False Workbooks.Open Filename:=sPath & sDir, Password:=strPassword sDir = Dir$ Loop End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|The formula is too long formulas should not be longer than 8192 characters||9||59|
|why cannot i download this excel file?||7||29|
|Excel Data Validation Help||9||49|
|need counting specific data on sheet||26||25|