excelファイルからデータを読み込み、グローバルマトリクスを初期化

[Adahm]

エクセルファイルから読み込まれたデータでvbaからグローバルマトリクスを初期化したい。
可能ですか?

このソリューションの検索を促す理由は、Excelファイルをユーザーパラメーターに接続することで、文字列データやブール値を読むことはできませんが、数値データのみです。

 

[Adahm]

私は何かを理解していますが、私は解決策に到達することはできません。
問題は、そのサイズを定義せずに行を定義し、エクセル行を読み込むようにそれを次元化することです。

ここに到着した瞬間:

お問い合わせ データが文字列、ブール値、数値である可能性があるため、グローバル変数を定義します。
バリアントとしてのグローバルvexceldata

プライベートサブ define_vexceldata()

'...Excelファイルを開くと

アイロウ = 1
イコール = 1
ws.cells(irow, icol) 中に行う < > "
redim vexceldata(参照、3)
n = 1 から 3
スタッフ
vfileexceldata(irow、icol) = ws.cells(irow、icol)
次へ
irow = irow + 1
ループ
メニュー

私によると、Redimが保存する動作しません
誰がそれについて何か知っていますか?

 

[Adahm]

誰かが私が問題を発見したのに役立つことができれば。
配列の最後のサイズだけを変更できます。この場合、カラムとして定義する2番目の値です。
このように行列を反転することで解決しました。

 ・・・
redim 保存 vexceldata(3, irow)
・・・

そのため、Excelファイルに読み込まれた行は列と行列になります。

 

[Mito125]

解決策を考えました。 まだ試してみる機会がなかったし、試してみましょう。 しかし、最後の行と最後の列を探している行列を定義する場合? なので、Redimは使用しないでください。 このようにして、あなたの行列を埋める必要があります。 私はvbaの専門家ではありません。

 

[Adahm]

提案をありがとう。
シートの最後の行と列を見つける方法がわからない場合でも、あなたはどのように知っていますか?

 

[Mito125]

https://www.thespreadsheetguru.com/...to-find-the-last-row-or-last-column-using-vba

私はvbaの専門家ではありませんが、私はここに提示されたシステムの1つを使用しました。 excel シートが形成される方法を教えてください。現在の値から行列を作成しようとします。