飾り文字の変更
Public Sub SetOrnament(
ByVal Row As Integer - 行番号
ByVal Col As Integer - 列番号
ByVal Start As Integer - 開始位置
ByVal Length As Integer - 文字列長
ByVal Val As String - 文字
ByVal FONTSTYLE As String - 飾り文字
)
指定された文字に飾り文字を付ける。
FormulaR1C1を毎回変更すると、設定ができないため、既に設定しているセル の値を保持している。
・文字列長が1以下の場合は、なにもしない
日付 | 担当 | バージョン |
---|---|---|
'07.01.26 | 今井 浩司 | 1.0 |
日付 | 担当 | バージョン |
---|---|---|
'07.02.18 | 今井 浩司 | 2.1 |
目次 | ファイル一覧 | プロシージャ一覧 | 定数一覧 | 変数一覧 | 構造体一覧 | フォーム一覧 | 飾り付け関数群