2012-06-24から1日間の記事一覧
'*** メイン ******************************************************** 'リストから吹き出しを作成する Sub mkFukidasi() Dim lastrow As Integer, i As Integer lastrow = getActiveRows() For i = 1 To lastrow If (matchPatternCell("^1-1-[0-9]+$", getCe…
'*** メイン ******************************************************** 'リストから吹き出しを作成する Sub mkFukidasi() Dim lastrow As Integer, i As Integer lastrow = getActiveRows() For i = 1 To lastrow If (matchPatternCell("^1-1-[0-9]+$", getCe…