Fill-in the details.
Business Professionals
Excel Brushup | Power BI | DAX | Copilot | Claude AI
VB Programming | Report Automation |
MS-Office Automation
60+ Formulas | Dynamic Dashboards | MIS Reports | Excel Models
Adv. Excel | MIS Reports | Power Pivot | Power Query
Techno-Business Professionals
Power BI | Adv. DAX | MIS Reporting | SQL | VBA |
Web Scrapping | API Integration | Python | Copilot | Claude AI
Power BI | Power Apps | Power Automate |
Power Pages | Dataverse | Copilot | Claude AI
Power BI | MIS Reporting | SQL | VBA | Python |
Power Apps | Power Automate | Power Pages | Dataverse | Copilot |
Claude AI
Business Professionals
Excel Brushup | Power BI | DAX | Copilot | Claude AI
VB Programming | Report Automation |
MS-Office Automation
60+ Formulas | Dynamic Dashboards | MIS Reports | Excel Models
Adv. Excel | MIS Reports | Power Pivot | Power Query
Techno-Business Professionals
Power BI | Adv. DAX | MIS Reporting | SQL | VBA |
Web Scrapping | API Integration | Python | Copilot | Claude AI
Power BI | Power Apps | Power Automate |
Power Pages | Dataverse | Copilot | Claude AI
Power BI | MIS Reporting | SQL | VBA | Python |
Power Apps | Power Automate | Power Pages | Dataverse | Copilot | Claude AI
This can be achieved by using the objects available in DSOFile.dll.
To begin with, add a reference to DSO Ole Document’s property library as shown in the below image.
Function GetPropFromDSO(ByVal sFile As String, ByVal sCP As String) As String
Dim oFil As DSOFile.OleDocumentProperties
Dim oCP As DSOFile.CustomPropertiesOn Error GoTo Err_Tp
Set oFil = New OleDocumentProperties
oFil.Open sFile, True
Set oCP = oFil.CustomProperties
GetRevFromDSO = oCP(sCP).Value
oFil.CloseErr_Tp:
If Err ;; 0 Then
Err.Clear
Resume Next
End IfEnd Function
The function gets the Filename and the Property to be extracted and returns the property value.
Explore comprehensive Course on Excel Automation or VB Programming here and, learn to write VB coding with ease.
Happy Excelling
Team Excelgoodies
VBA & Python
New
Next Batches Now Live
Power BI
SQL
Power Apps
Power Automate
Microsoft Fabrics
Azure Data Engineering
VBA & Python
Is knowing Excel VBA a good starting point for learning any other programming languages?
Read
