VBA

• [PR]
  ×

  [PR]上記の広告は3ヶ月以上新規記事投稿のないブログに表示されています。新しい記事を書く事で広告が消えます。

  • 2025/05/10 06:28
• VBEテクニック
  https://www.excel-chunchun.com/entry/2019/02/10/190143#%E9%85%8D%E5%88%97%E3%82%84Dictionary%E3%82%92%E8%A6%8B%E3%82%84%E3%81%99%E3%81%84%E8%A1%A8%E3%81%A7%E5%87%BA%E5%8A%9B%E3%81%97%E3%81%9F%E3%81%84
  PR
  • VBA
  • 2022/11/08 22:03
  • 0
• VBA　だんだん遅くなる
  https://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q14224808844?__ysp=dmJhIOWun%2BihjOOBmeOCi%2BOBn%2BOBs%2BOBq%2BmBheOBj%2BOBquOCiw%3D%3D
  • VBA
  • 2022/10/31 20:20
  • 0
• VBA文字化け対策
  https://wata-kazu-no1.com/excel-macro-mojibake/
  https://teratail.com/questions/134679
  • VBA
  • 2022/10/31 19:21
  • 0
• VBA 配列関係
  ワークシート関数を配列に対して行う
  　Dim arr(1 To 3) As Long
  　arr(1) = 10
  　arr(2) = 20
  　arr(3) = 30
  

  　Dim total As Long
  　total = WorksheetFunction.Sum(arr)
  https://www.relief.jp/docs/excel-vba-sum-array-elements.html
  
  variant型はキャスト使えない
  https://vba-create.jp/vba-array-convert-type/#toc1
  
  2次元配列を1次元配列に変換

      Dim Array1D As Variant '一次元配列

      Dim Array2D As Variant '二次元配列

   

      Array2D = Range("A1:E5")

   

      '■二次元配列の指定行(2行目)を一次元配列に格納する

      Array1D = WorksheetFunction.Index(Array2D, 2)

   

      '■二次元配列の指定列(A列(1列目))を一次元配列に格納する

      Array1D = WorksheetFunction.Index(WorksheetFunction.Transpose(Array2D), 1)
https://vba-create.jp/vba-array-conv-transpose/

【Excel VBA】2次元配列から1次元目の要素 (配列) を取り出すことはできません＞＜
https://oki2a24.com/2016/02/24/cannot-pick-up-1-d-array-from-2-d-array-in-excel-vba/


  
  


  

  
  
  

  • VBA
  • 2022/10/23 20:43
  • 0
• VBA高速化テク

  コピー範囲を配列に入れて、一括で貼り付けします。

  
  

  Sub Sumple4()
  
  Dim MyArray As Variant
  
  MyArray = Range(Cells(1, 1), Cells(10000, 1))
  Range(Cells(1, 2), Cells(10000, 2)) = MyArray
  
  End Sub
  
  https://officedic.com/excel-vba-copy-paste-highspeed/#toc3
  
  

  
  

  また、CurrentRegionプロパティを使って指定したセルを含む、セルの範囲指定が可能です。

  
  Sub dataArray1_4() Dim sampleDataArr As Variant sampleDataArr = Sheet1.Cells(1, 1).CurrentRegion.Value End Sub
  

  ただし、CurrentRegionプロパティを使う場合は、表の途中に空白行がないことが前提となりますのでご注意ください。
  
  https://lbibouroku.hatenablog.com/entry/array_6
  
  グラフの要素を配列で与える
  
  https://learn.microsoft.com/ja-jp/office/vba/api/excel.series.xvalues

  • VBA
  • 2022/10/20 23:28
  • 0