#新手 關於EXCEL VBA

各位好 最近在玩excel裡面的開發人員功能 但玩一玩發現了一些問題 我想要用費式數列以順時針畫出一個蝸牛 然後還要填色 填色格數以費式數列從第一項到第十 也就是1 1 2 3 5 8 13 21 34 55 像圖片那樣
megapx
顏色的話用隨機填色 第一格填色設定在H8 我目前是寫到這樣
megapx
執行下去可以在H8那格填色 也可以隨機跳顏色 費式數列的程式碼也完成 但接下來要轉向跟填入某項該有的數量的時候卡住 我是有想到可以寫兩個迴圈 再配合 If else去做 但不知道怎麼著手…… 求助大家 如果有人可以幫我 我會很感謝大家
留言
x,y就儲存格的位置 front_value,value_是用來計算費式數列的 先給初值0 1 費式數列這邊我打算在迴圈內邊做邊運算 Direction是用來作方向移動 0代表向右 1代表向下 2代表向左 3代表向上 Length,change_dir_length,t是用來判斷何時轉方向的 這邊我是用觀察的 如下圖:
megapx
剛開始填的時候是填滿2格轉向,再一次填滿2格轉向,再來填滿3格轉向...一樣兩次 依此類推填滿4格轉向兩次.... 所以三個變數用途分別是"該方向目前幾格填色","需填滿幾格","每填色轉向需要2次" cr就先決定好該數的顏色,好讓內層跑fab(i)次填色 內層第一個if條件句就是判斷該方向有沒有填滿(是否需轉向) 第二個if條件句就是x,y索引移動(由變數Direction決定) 最後那三行運算予值就費式數列運算 前項加該項等於下一項