後で要素数を変更したい配列を定義するとき
Dim Str() as String
要素数を変更し再定義
ReDim Str([n]) as String
※最初に要素数を指定し、宣言した場合はReDimを使っての再定義ができません。
配列の内容を残したまま、要素数を増やしたい場合は
ReDim Preserve Str([n]) as String
と再定義します。
Cells(RowIndex, ColumnIndex).Hyperlinks.Item(1).Address
例)
Cells(1, 2).Value = Cells(1, 1).Hyperlinks.Item(1).Address