I am trying to handle Large XML file thru SAXON library in VBA 

**Source XML** has following tag

```xml
<Id><![CDATA[IPMS_TEST_DS_2 & 13]]></Id>

```

**Destination XML** while writing into a destination file if am getting following xml tag

```xml
<Id>IPMS_TEST_DS_2 &amp; 13</Id> <!--- This should be as same as parent XML -->

```

by implementing **SAXXMLReader60** as reader & **MXXMLWriter60** as writer
(Source : [FlyLib.com](https://flylib.com/books/en/2.378.1.61/1/), [learn.microsoft.com](https://learn.microsoft.com/en-us/previous-versions/aa926344%28v%3Dmsdn.10%29) )

```vb
Implements IVBSAXContentHandler
Implements SAXXMLReader60
Implements IVBSAXLexicalHandler
Implements IVBSAXDTDHandler

Private rdr As New SAXXMLReader60
Private wrt As New MXXMLWriter60

Private ch As IVBSAXContentHandler
Private dtdh As IVBSAXDTDHandler
Private lexh As IVBSAXLexicalHandler

Private Sub Class_Initialize()

    Set ch = wrt 
    Set dtdh = wrt

    Call rdr.putProperty("http://xml.org/sax/properties/lexical-handler", wrt)
    Set lexh = wrt

End Sub

'....Following Event handlers are not getting triggered...

Private Sub IVBSAXLexicalHandler_comment(strChars As String)
End Sub

Private Sub IVBSAXLexicalHandler_endCDATA()
    lexh.endCDATA
End Sub

Private Sub IVBSAXLexicalHandler_endDTD()
End Sub

Private Sub IVBSAXLexicalHandler_endEntity(strName As String)
End Sub

Private Sub IVBSAXLexicalHandler_startCDATA()
    lexh.startCDATA
End Sub

```

Please suggest way to detect *< ![CDATA[]]>* while reading