> 引数に対応するアルファベットを返すファンクションを> 下記のような感じでSelect Caseを使用して作製しています。ret = Mid("ABCDEFGHIJKLMNOPQRSTUVWXYZ", num, 1)