Excelで遊んでました。配列とレンジ。

Option Explicit
Option Base 1
Sub 試験()
    Dim vnttmp As Variant
    Dim 実行 As Long
    Dim 実桁 As Long

    With Worksheets("Sheet1")
        vnttmp = .Range("A2", .Range("D65536").End(xlUp)).Value

    End With
    
    実行 = UBound(vnttmp, 1)
    実桁 = UBound(vnttmp, 2)
    
    vnttmp(10, 3) = "Takahashi"
    
    Worksheets("Sheet1").Range(Cells(2, 1), Cells(実行, 実桁)) = vnttmp
    
End Sub

Excelの場合は、2次元の配列を簡単に扱えるので、ワークシートから配列への読込や

その逆でも、1行で済むのが素晴らしいですね。でも色んな関数とかが書いてあれば

駄目のようですが。(^0^)

 

試験に使ったワークシートです。確かに1カ所変更になってます。