イラストレーター テキストの中黒（・）でのエラーを回避

Dim IllApp As New Illustrator.Application
Dim IllDoc As Illustrator.Document
Dim temText As TextArtItem
Dim tChara As Character
IllDoc = IllApp.ActiveDocument
For Each temText In IllDoc.TextArtItems
	temText.Selected = True
	For Each tChara In temText.TextRange.Characters
		Try
			If Asc(tChara.Contents) = -32443 Then '中黒（・）のアスキーコードは -32443
				tChara.Contents = "X"
			End If
		Catch ex As Exception
			tChara.Contents = "X"
		End Try
	Next
	temText.Selected = False
	'MsgBox(temText.Contents)
	If Not temText Is Nothing Then System.Runtime.InteropServices.Marshal.ReleaseComObject(temText)
Next