I have been using the same VBA routines for reading Block Attributes but now it's not working in AutoCAD 2104 (32 bit)
The simplified code and problem area (I can read the block attribute tag names)
Dim VarArray as Variant
VarArray = objBlkRef.GetAttributes
For Count = LBound(VarArray) To UBound(VarArray)
StrTag = VarArray(Count).TagString ' I get an error here
Next Count
I added the few lines below for testing and here are the results
If objBlkRef.HasAttributes Then MsgBox "I have attributes" ' The message is printed so I know the block has attributes (but I already filter for blocks with attributes)
Msgbox LBound(VarArray) ' returns a 0 as expected
Msgbox LBound(VarArray) ' returns a 4 as expected for a block which has 5 attributes
Msgbox VarArray(1).TextString ' returns and error
Msgbox VarArray(1).Textstring ' returns and error
****************
I get the following error number and description
Error Number = 48
Error Description = Error Loading DLL (not sure what DLL is not being loaded which is required for reading block attributes