AdanosТакой макрос:
Sub Test()
Dim App As Object
Set App = CreateObject("Excel.Application", Application.Workbooks(1).Sheets(1).Range("A1").Value)
App.Workbooks.Add
Debug.Print App.Workbooks(1).Sheets(1).PageSetup.Application
Debug.Print App.Workbooks(1).Sheets(1).PageSetup.Zoom

End Sub

Excel запускается удалённо на сервере заданном в "А1", но все свойства у PageSetup не определены, если тоже самое делать локально PageSetup заполнен.
Почему так? и как от этого избавится?

PageSetup зависит от установленного принтера. Смею предположить, что у вас на удаленном сервере не установлен принтер, поэтому PageSetup у вас и не заполнен.