Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
50172 / 76732 ←次へ　｜　前へ→
【31455】Re:配列（行列）計算をマクロで行いたい...
発言  kobasan  - 05/11/21(月) 20:48 -
引用なし
パスワード
   皆さん　今晩は。

>参照した配列は、別シート（仮にシート１とします）に表記されていまして、その配列の逆行列をまた違うシート（同じくシート２とします）に出力したいのですが、

これを、よく理解してないのですが。
別のやり方ですが、こんなのでどうでしょう。

Sub test()
Dim vntA, vntB
Dim n As Integer

　　vntA = Range("A1").CurrentRegion.Value
　　vntB = Application.MInverse(vntA)
　　n = UBound(vntA, 1)
　　'
　　'---------------ActiveSheet(Sheet1)のA11から貼り付け
　　Range("A8").Resize(n, n) = vntB
　　'
　　'---------------Sheet2のA1から貼り付け
　　Sheets("Sheet2").Range("A1").Resize(n, n) = vntB
End Sub
0 hits
▼ 【31421】配列（行列）計算をマクロで行いたいのですが… あんこ 05/11/20(日) 10:58 質問
【31422】Re:配列（行列）計算をマクロで行いたいの... よろずや 05/11/20(日) 11:16 発言
【31426】Re:配列（行列）計算をマクロで行いたい... とまと 05/11/20(日) 14:50 回答
【31446】Re:配列（行列）計算をマクロで行いたい... あんこ 05/11/21(月) 16:04 質問
【31455】Re:配列（行列）計算をマクロで行いたい... kobasan 05/11/21(月) 20:48 発言≪
【31463】Re:配列（行列）計算をマクロで行いたい... とまと 05/11/22(火) 8:35 回答
【31475】Re:配列（行列）計算をマクロで行いたい... あんこ 05/11/22(火) 13:39 お礼
【31476】Re:配列（行列）計算をマクロで行いたい... あんこ 05/11/22(火) 13:40 お礼
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
50172 / 76732 ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free