知恵を貸してください

ある可変長2次元配列のデータについて
各列のデータから1つずつ抽出した文字列の組み合わせを出力したいと考えています

例えばArray（2,2）のデータが以下だとします
Array（0,0）="いちご"
Array（0,1）="みかん"
Array（0,2）=""
Array（1,0）="あまい"
Array（1,1）="すっぱい"
Array（1,2）="にがい"
Array（2,0）="100円"
Array（2,1）="200円"
Array（2,2）=""
この場合
「いちご,あまい,100円」「いちご,あまい,200円」「みかん,すっぱい,100円」
などの
空白を除く2*3*2=12通りの組み合わせ全てを抽出したいのです
（抽出先はシートでも配列でも何でも良いです）

そして実際にはこの配列をArray（x,y）とすると
xとyは1以上の自然数で不定です

配列の行数が固定長であれば各行において行の数だけFor文でループの中にループを入れれば良いのでしょうが
配列の行数が1以上の不定数の場合にどうすれば良いか思い付きません

vbaというよりアルゴリズムの問題かも知れませんが
良い方法はあるのでしょうか