Stay away from Speed Up Computer Programs that do more harm than good.
Try these tips instead.
Step by step instructions in trouble shooting Windows Performance issues.
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Excel.Range) Dim bTest As Boolean Dim wb As Workbook Dim MyArray as variant If Target.Column = "3" Then bTest = Target.Row Mod 2 = 0 If bTest = True And Target.Row > 3 And Target.Row < 39 Then ' Here I need to get array containing all folder names in a directory. (Don't need their subfolders) 'MyArray = Function To Get Folder Names Back Into The Array Else: End If Else: End If End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|MS Access vba Print PDF First page only||16||34|
|EMAIL RANGES BASED ON CURRENT TIME||12||40|
|Email SQL Applications not able send to 4 or more recipients||2||34|
|Office 365 Controls||3||18|
Join the community of 500,000 technology professionals and ask your questions.