How do I use FileSystemObject in VBA?

by

Within Excel you need to set a reference to the VB script run-time library.
The relevant file is usually located at \Windows\System32\scrrun.dll

  • To reference this file, load the
    Visual Basic Editor (ALT+F11)
  • Select Tools > References from the drop-down menu
  • A listbox of available references will be displayed
  • Tick the check-box next to ‘Microsoft Scripting Runtime‘
  • The full name and path of the scrrun.dll file will be displayed below the listbox
  • Click on the OK button.

This can also be done directly in the code if access to the VBA object model has been enabled.

Access can be enabled by ticking the check-box Trust access to the VBA project object model found at File > Options > Trust Center > Trust Center Settings > Macro Settings

VBA Macro settings

To add a reference:

Sub Add_Reference()

    Application.VBE.ActiveVBProject.References.AddFromFile "C:\Windows\System32\scrrun.dll"
'Add a reference

End Sub

To remove a reference: 

Sub Remove_Reference()

Dim oReference As Object

    Set oReference = Application.VBE.ActiveVBProject.References.Item("Scripting")

    Application.VBE.ActiveVBProject.References.Remove oReference
'Remove a reference

End Sub

More Related Contents:

  1. Access files with long paths (over 260)
  2. Save excel file multiple times with file names in another workbook.
  3. Sequence of numbers based on start and end value of 2 cells [closed]
  4. How do I declare a global variable in VBA?
  5. How to use the Implements in Excel VBA
  6. VBA code doesn’t run when cell is changed by a formula
  7. What is the difference between dim and set in vba
  8. How to set recurring schedule for xlsm file using Windows Task Scheduler
  9. Change date format using substitute or replace
  10. Getting the actual usedrange
  11. Delete a row in Excel VBA
  12. VBA: Convert Text to Number
  13. Iterating through populated rows
  14. How can I run VBA code each time a cell gets its value changed by a formula?
  15. Using VBA to detect which decimal sign the computer is using
  16. Referencing Excel Userform Control Name Value From String (VBA)
  17. Loop through each row of a range in Excel
  18. Fill formula down till last row in column
  19. How to create a range from two ranges in VBA?
  20. If string contains word from list, return value adjacent to list value
  21. Refreshing all the pivot tables in my excel workbook with a macro
  22. Countif With Multiple OR Criteria
  23. Vlookup to copy color of a cell
  24. excel vba freeze pane without select
  25. How to delete rows in Excel based on criteria using VBA?
  26. Converting a string representation of a constant into a constant?
  27. Macro to export MS Word tables to Excel sheets
  28. VBA WinHTTP to download file from password proteced https website
  29. Concatenate multiple ranges using vba
  30. How to highlight selected text within excel

Leave a Comment