| |
下記ソース(部分抜粋)のAAA_ADDの表示文字色が、現在デフォルトの黒になっているのを
青に改修したいのですが、どのようにすればよろしいのでしょうか?
御指南の方宜しくお願いします。
----------------------------------------------------------------------
If FD_SHEET Is Nothing Then
Set FD_SHEET = REG_FINE
Else
If FD_SHEET.C= REG_FINE.C And FD_SHEET.Row = REG_FINE.R Then
Exit Do
End If
End If
AAA_ADD = cur_SHEETNAME & "_" & REG_FINE.Value & "[A:" ®_FINE.R& ",B:" & REG_FINE.C & "]"
If Me.CheckBox2.Value = True Then
AAA_ADD = SHEETNAME & "?" & AAA_ADD
End If
|
|