Autocad 2008 を使用しています。

図面内にダイナミックブロックがあり、移動や回転を行いたいのですが、
VBAでダイナミックブロックを操作の対象とするために、名称を比較しながら行っています。

For Each objEntity In ThisDrawing.ModelSpace

    ' 取り出された図形が対象を判定
    If objEntity.ObjectName = "AcDbBlockReference" Then

      If objEntity.Name = "ダイナミックブロック1" Then

         ' 対象物を回転
         rotationAngle = rrangle
         objEntity.Rotate jiku1, rotationAngle

ダイナミックブロック名称を、"ダイナミックブロック1"としているのですが検索されません。
"*U11"や"*U33"で検索されます。

どなたかご教授いただけないでしょうか。
よろしくお願いいたします。