Excel VBA質問箱 IV

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

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


50578 / 76738 ←次へ | 前へ→

【31045】注釈(働き)
質問    - 05/11/9(水) 22:48 -

引用なし
パスワード
   Dim Eto(11), tanzyouseki(11) As String
 Dim n As Integer
 
 For n = 0 To 11 Step 1
  Eto(n) = Sheet2.Cells(n + 1, 1).Value
  tanzyouseki(n) = Sheet2.Cells(n + 1, 2).Address
 Next n
 
 With Sheet2.Range(tanzyouseki(Range("B2").Value - 1))
  Range("D1").Value = Eto(Range("B1").Value Mod 12)
  Range("D2").Value = .Value
  Range("D3").Value = .Offset(, 1).Value
 End With
End Sub
のプログラムの一行一行の注釈(働き)を知りたいのですが、
教えてくれませんか?
お願いします
※もし、他の人で同じようなプログラムを聞いている人が
いても、気にしないで下さい
0 hits

【31045】注釈(働き) 05/11/9(水) 22:48 質問
【31046】Re:注釈(働き) かみちゃん 05/11/9(水) 22:55 発言
【31053】Re:注釈(働き) 05/11/10(木) 10:24 発言
【31054】Re:注釈(働き) Blue 05/11/10(木) 10:34 発言
【31060】Re:注釈(働き) 05/11/10(木) 19:27 質問
【31061】「課題」の投稿について わさび 05/11/10(木) 19:47 発言

50578 / 76738 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free