2006-04-01から1ヶ月間の記事一覧

置換

VBA

Private Function CreateRegRxp() As Object Set re = CreateObject("VBScript.RegExp") re.Pattern = "(.)" re.Global = True re.Pattern = "=RSS\|\'....\..{1,2}\'\!" 's1 = "=RSS|'4653.Q'!現在値" 'wk = re.Replace(s1, "RSS|'1234.T!") 'MsgBox wk Set…

自ブック

VBA

ThisWorkbook 自ブック ActiveWorkbook アクティブなブック

条件付書式

VBA

http://www.eurus.dti.ne.jp/~yoneyama/Excel/jyo-syo.html 100以上なら背景赤とか簡単にできる。 VBAじゃないけど。