Excelの表を丸ごと配列に入れる
↑のExcelの表を丸ごと配列に入れるやり方
Dim objSheet As Object
Dim lngCol As Long
Dim varArray() As Variant ’格納する配列
Set objSheet = ActiveWorkbook.Worksheets(“Sheet1”)
With objSheet
.Activate
lngRow = .Range(“A1”).End(xlDown).Cells.Row ’最終行を取得
lngCol = .Range(“A1”).End(xlToRight).Cells.Column ’最終列を取得
varArray = .Range(“A1”, Cells(lngRow, lngCol)).Value
End With
Set objSheet = Nothing
Excelは、配列に以下のように格納されます。 varArray(Excelの列、Excelの行）
●現役システムエンジニアが教える
システムを自作したい人のためのMicrosoft Access講座
Accessを覚えておけば、会社の業務だけに限らず様々なところに活用する事が出来る様になりますよ。Excelよりも、もっと便利なツールAccessを是非、この機会に覚えておきましょう。
現役のAccess開発者が、あなたのシステム開発のお手伝いを致します。
既に開発途中のものでも、ご相談ください。
これからAccessでのシステム開発にチャレンジしたい初心者の方も歓迎します。
（対面、オンライン対応）
株式会社ネーブルスでは、Accessでの業務システムの開発を承ります。
システム開発費用の概算を、オンライン上でご提示いたします。（所要時間：3分／無料）
お問い合せする事なく、Access開発費の概算をお確かめいただけます。お気軽にご利用ください。
↓↓↓
