Spreadsheet::WriteExcel、デフォルトフォントを「ＭＳ Ｐゴシック」に

cellにフォーマットを指定することはできるけど、これだと空のcellにはフォーマットが適用されない。
デフォルトを変えたい。

$_->set_properties(
    font  => 'ＭＳ Ｐゴシック',
    size  => 11,
    align => 'vcenter',
) for (@{ $workbook->{_formats} });

$workbook->{_formats}[15]がデフォルトとして使われる。
_で始まるのを弄るのはヤだけど、これを弄るインターフェースはないっぽ。