メモ

主にプログラミング系の備忘録

2009-07-01から1ヶ月間の記事一覧

見出しをクリックすると開閉するブロック

javascript関数部分 // URLからIDをGet⇒表示・非表示の切替 // Indexからの遷移の場合は表示させるのみ(非表示への切替は行わない)。 function test(id){ if(id.match(/to/) == "to"){ ChgIconMode("main" + document.getElementById(id).getAttribute("href…

機種依存文字チェック

Public Function Chk_機種依存(strTarget As String) As String Dim strReturn As String 'エラー文字の蓄積用 Dim intStrLen As Integer 'strTargetの文字長 Dim intChar As Integer '判定用の文字コード Dim i As Integer 'counter intStrLen = Len(strTar…

セル内のフォント設定をspanタグに変換する関数

一箇所バグがあったので修正 Public Function GetFontInterior(rCell As Range) As String Dim i As Long, j As Long 'セルのテキスト評価用カウンタ Dim sRet As String '返すテキストを格納 Dim sAttr As String 'style に入れる属性値 Dim nDone As Long …