//英単語の先頭だけ大文字にするマクロ
var word = new Array(
//aからzまでの一文字以上があれば先頭の一文字だけ大文字にする

"([^A-Z]|^)a([a-z]*?)","$1A$2",
"([^A-Z]|^)b([a-z]*?)","$1B$2",
"([^A-Z]|^)c([a-z]*?)","$1C$2",
"([^A-Z]|^)d([a-z]*?)","$1D$2",
"([^A-Z]|^)e([a-z]*?)","$1E$2",
"([^A-Z]|^)f([a-z]*?)","$1F$2",
"([^A-Z]|^)g([a-z]*?)","$1G$2",
"([^A-Z]|^)h([a-z]*?)","$1H$2",
"([^A-Z]|^)i([a-z]*?)","$1I$2",
"([^A-Z]|^)j([a-z]*?)","$1J$2",
"([^A-Z]|^)k([a-z]*?)","$1K$2",
"([^A-Z]|^)l([a-z]*?)","$1L$2",
"([^A-Z]|^)m([a-z]*?)","$1M$2",
"([^A-Z]|^)n([a-z]*?)","$1N$2",
"([^A-Z]|^)o([a-z]*?)","$1O$2",
"([^A-Z]|^)p([a-z]*?)","$1P$2",
"([^A-Z]|^)q([a-z]*?)","$1Q$2",
"([^A-Z]|^)r([a-z]*?)","$1R$2",
"([^A-Z]|^)s([a-z]*?)","$1S$2",
"([^A-Z]|^)t([a-z]*?)","$1T$2",
"([^A-Z]|^)u([a-z]*?)","$1U$2",
"([^A-Z]|^)v([a-z]*?)","$1V$2",
"([^A-Z]|^)w([a-z]*?)","$1W$2",
"([^A-Z]|^)x([a-z]*?)","$1X$2",
"([^A-Z]|^)y([a-z]*?)","$1Y$2",
"([^A-Z]|^)z([a-z]*?)","$1Z$2",

"","");	//この行はいじらない
//文字列を選択していなければ全文を選択する
if (document.selection.Text == "")
	document.selection.SelectAll();

//選択した文字列をすべて小文字にする
document.selection.ChangeCase(meCaseLowerCase);

var tx = document.selection.Text;
	for (i = 0; i < word.length; i += 2) {
		var r = new RegExp(word[i], "img");	//大文字と小文字を区別する
		tx = tx.replace(r, word[i+1]);
}
document.selection.Text = tx;