请问这段word宏代码有什么问题？

Sub delpar()
'删除只有一个硬回车符的段落

   Dim tempPar As paragragh
   For Each tempPar In ActiveDocument.Paragraphs
       If VBA.Len(tempPar.Range) = 1 Then
       tempPar.Range.Delete
       End If
    Next
      
   
End Sub

我自己检查不出来希望高手能指点迷津！！！

是指paragragh的拼写问题吗