Вы пытаетесь использовать Вордоские константы wdCharacter и wdAlignParagraphCenter, значения которых Экселю неизвестны.  
Поэтому он считает их равными нулю - из-за этого и ошибка.  
 
Либо подключайте к файлу Excel библиотеку Word (тогда и код будет писать намного удобнее), или замените эти константы числовыми значениями:  
 
Sub test()  
   Dim appWD As Object  
 
   Set appWD = CreateObject("Word.Application")  
   appWD.Visible = True  
   appWD.Documents.Add  
   appWD.Selection.Font.Size = 14  
   'appWD.Selection.Font.Bold = True  
 
   appWD.Selection.ParagraphFormat.Alignment = 1    'не работает оцентровка  
 
   appWD.Selection.TypeText Text:=Cells(13, 2).Value & "     "  
 
   appWD.Selection.MoveRight Unit:=1, Count:=4    ' не работает сдвиг курсора  
End Sub