情報蒐集蒐集 - ホワイトボーダー ～生大喜利品蒐集～

ホワイトボードを購入する店は？

選択肢	投票
ダイソー (1)
キャンドゥ (1)
セリア (0)
文房具店 (0)

VBA試作

欽ちゃんシステム
Ｃtrl+U → １点加算

Sub up()
'
' up Macro
' マクロ記録日 : XXXX/XX/XX  ユーザー名 : XXX
'
' Keyboard Shortcut: Ctrl+u
'
    ActiveCell.Offset(-1, 0).Select      //セルを１上に移動
    Selection.Interior.ColorIndex = 3　　//背景を赤に
End Sub

Sub down()
'
' down Macro
' マクロ記録日 : XXXX/XX/XX  ユーザー名 : XXX
'
' Keyboard Shortcut: Ctrl+d
'
    Selection.Interior.ColorIndex = 15　//背景を灰に
    ActiveCell.Offset(1, 0).Select      //セルを１下に移動
    Selection.Interior.ColorIndex = 15　//背景を灰に
End Sub