Vla-settextstyle2

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(vla-settextstyle2 vla-object nrow ncol ncontent StringStyleName)


機能
セルの文字スタイル名を設定する。


引数
  • vla-object … Table の VLAオブジェクト
  • nrow … 設定するセルの行番号。
  • ncol … 設定するセルの列番号。
  • ncontent … セルの内容の値。
  • StringStyleName … 設定する新しいスタイル名。


戻り値
nil


サンプル
(vl-load-com)
(defun c:Example_settextstyle2()
    (setq acadObj (vlax-get-acad-object))
    (setq doc (vla-get-ActiveDocument acadObj))

    (setq pt (vlax-3d-point 0 0 0))

    (setq modelSpace (vla-get-ModelSpace doc))
    (setq MyTable (vla-Addtable modelSpace pt 5 5 10 30))
    (vla-settextstyle2 MyTable 1 1 1 "new_style") ; new_styleという文字スタイルを用意しておくこと
    (alert "表のセル1:1 の文字スタイルを new_style にしました。")

    (vla-ZoomExtents acadObj)
)


関連事項