【1 OSの種類 　 　 　 　 .】 Windows7
【2 Excelのバージョン 　 】 Excel2010
【3 VBAが使えるか　 　 .】 はい
【4 VBAでの回答の可否】 否

=If(mod(a1,12)=0,"12",mod(a1,12))
求める事はこれで出来ていますが、条件を複雑にしていくと「mod(a1,12)」が式の中に何度も登場しとても見にくくなります

「もし「判定式」が真ならA、そうでないなら「判定式」」をすっきり各方法ありませんでしたっけ
以前立ち読みした本でチラッと見た記憶があるのですが