すべてのサーフェス スタイルは、AeccDocument.SurfaceStyles コレクション(AeccSurfaceStyles 型のオブジェクト)に格納されます。新しいスタイルを作成するには、新しいスタイルの名前を指定して AeccSurfaceStyles.Add メソッドを呼び出します。 これは、ドキュメントの環境設定に基づいて初期設定されます。
Dim oSurfaceStyle As AeccSurfaceStyle
oSurfaceStyle = oDocument.SurfaceStyles.Add("New Style")