エクセル2003　ＶＢＡでファイルのフォルダを作成

会社の一覧があるのですが企業数が増えてきたのでフォルダを作成して分類しようと考えています。 一覧表には「県ごと」「２０社ごと」「１社ごと」にコードが割り振られています。 以下のようなフォルダの構成にしたいのですが、ＶＢＡによって自動的にフォルダ作成することは可能でしょうか。 zenkoku > hokkaido 　　　　　　　miyagi 　　　　　　　chiba 　　　　　　　mie 　　　　　　　kanagawa > kanagawa01 > kanagawa01A 　　　　　　　　　　・　　　　kanagawa02 > kanagawa02A 　　　　　　　　　　・　　　　　　　・　　　　　kanagawa02B 　　　　　　　　　　・ 　　　　　　　　　　・ １県あたりに20社以上ある場合は、kanagawa01、kanagawa02　となっています。 元のエクセルのデータがソートされてもＯＫです。