Sub edit_clearall()
	ActiveCell.Clear
End Sub


クリア_書式

Sub edit_clearolign()
	ActiveCell.ClearFormat
End Sub


クリア_数値と値

Sub edit_cleardata()
	ActiveCell.ClearContents
End Sub


クリア_コメント

Sub edit_clearcomment()
	ActiveCell.ClearNotes
End Sub