VBAのグローバル変数をReDimしたい

【状況】
以下のように書いたところ『配列がありません』とエラーが出ます。
——————————-
Public piyo() As Variant

Sub poyo()
count = 100
ReDim piyo(count) As Variant
End Sub
——————————-

【自分でやったこと】
ReDim前にpiyoへの代入ができることは確認できました。
()をつけたり、最初に適当に(1)などで大きさを指定したりしましたが、同様のエラーが出ます。

なにか書き方等、間違っておりますでしょうか？
そもそもグローバル変数のReDimは可能ですかね…？