フォルダの有無をチェックして
なければフォルダを作成しようと思っているのですが
フォルダの有無をチェックをする方法が
よくわかりません。
どなたかおわかりの人がいましたら教えていただけないでしょうか？

ここのファイル操作関係を見て下さい。
ファイルの有無を調べるのと同じです。
引数に vbDirectory 16 フォルダ を指定すればOKです。

MyDirectory = Dir$("C:\My Documents", vbDirectory)