Sub edit_fill_justyfy()
	Selection.Justyfy
	'選択範囲の文字列をセル幅にあわせて割り付けます
End Sub