1次元でいいんじゃないですか？

Sub test()
    Dim table() As String
    
    ReDim table(1 To 200)
    table(105) = "東京"
    
    Debug.Print table(105) '東京
End Sub


この記事にはVBAのコードが含まれています。

緑の太文字→注釈
茶色の太文字→条件分岐
赤の太文字→ループ
青の太文字→その他

＞実際にデータが1件だけ(105の東京)の場合は
＞200個用意したエリアが無駄になるのでしょうか。
無駄になります(まぁ、昨今誰もそんな無駄は気にしないですけど）。

そもそも「格納したい要素が�@何番目のデータか」ですから、
1から105番までは用意しておかなければ理屈としておかしいです。

「105」と「東京」がセットで１つだけの話なら、
キーが105と言う話にすぎないです。順番の話じゃないです。
※順番は多分1番目でしょうね

＞また、質問した純粋な2次元の時のデータ形式指定はどうやるのでしょうか。
＞例えば、1次は数値で2次は文字の場合です。
1次とか2次と言うのは次元の話でして、卑近な例としてエクセルのシートで言えば、
行数ｘ列数の配列の広がり(大きさ）を意味するのであって、
1行目のデータ型が何、2行目のデータ型が何と定義する訳ではないです。

実際に、1行目に番号を入れて、2行目に都市名を入れて使う予定であれば、
データ型としてはVariantにするのが普通でしょうね。

Sub test()
    Dim table() As Variant
    
    ReDim table(1 To 2, 1 To 1)
    table(1, 1) = 105
    table(2, 1) = "東京"
    
    Debug.Print table(1, 1), table(2, 1) '105 東京

    Debug.Print Application.HLookup(105, table, 2, False) '東京
End Sub


この記事にはVBAのコードが含まれています。

緑の太文字→注釈
茶色の太文字→条件分岐
赤の太文字→ループ
青の太文字→その他