よくある質問(FAQ)

1. ワークシートの切り替え

   https://www.tipsfound.com/vba/10002

   Worksheets("Data").Activate

   で、「Data」という名前のワークシートをアクティブ化する。

2. 乱数

   Rnd(-10)など、負の値を入れれば毎回同じ乱数になる。

   https://www.tipsfound.com/vba/05rnd

   その後はRndでOK（引数を省略する）

    

   Int(Rnd * 10)　‘0～9のいずれかを返す

   Int(Rnd * 5) + 1 ‘1～6のいずれかを返す

    

   ASC()　でアスキーコードを返す

    

3. セルをソートする
   
   'AZ列をJ列をキーにして並び替える
   
       Columns("A:Z").Select
       Selection.sort Key1:=Range("J1"), Order1:=xlAscending, Header:=xlYes, _
           OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _
           :=xlPinYin, DataOption1:=xlSortNormal
   
   　

4. 画像を表示する

Image1.Picture = LoadPicture(ActiveWorkbook.Path & "\pa.jpg")

上のコードだと、「Image1」に「pa.jpg」という画像が表示される（「pa.jpg」はExcelファイルと同じフォルダに保存されている必要がある）。