| |
▼γ さん：
>> たとえば変数CががC12ならその交差している行と列の連結がKeyになる
>> と思うのですがこの１文でその解釈をパソコンがしてくれているイメージでいいんでしょうか
>> ？
>それでよいと思います。
>
>参考までにお聞きしますが、
> For Each c In .Offset(1, 2).Resize(.Rows.Count - 1, .Columns.Count - 2)
> dt = tSh.Cells(1, c.Column).Value2
> com = tSh.Cells(c.Row, "A").Value
> tDic(com & dt) = VBA.Array(c.Value, c.Address(External:=True))
> Next
>の3行の意味は理解されているのですよね。
>
>こうしうことがすべきだと思うのだけど、
>それはどこで実行しているのかな、
>といったことがもしあるなら、
>その「すべきこと」を教えてください。
>
>なお、必要もないのに全文引用するのはやめたほうが良いと思います。
返事ありがとうございます
3行の意味は理解されているのですよね。
>
For Each c In .Offset(1, 2).Resize(.Rows.Count - 1, .Columns.Count - 2)
> dt = tSh.Cells(1, c.Column).Value2
> com = tSh.Cells(c.Row, "A").Value
> tDic(com & dt) = VBA.Array(c.Value, c.Address(External:=True))
> Next
上記意味はKey以外のすべての配列要素（変数C）に対して繰り返し処理
変数dtに日にちの入力された行範囲の値(シリアル値)を代入
変数comに文字列ﾃﾞｰﾀの入力してある列範囲の値を代入(A列)
Dictionaryオブジェクト変数tdicに変数Comとdtを連結した値をKeyとし変数Cの値と変数Cのアドレスを配列要素とし代入
＊ComとdtがKeyになっているのは今回教えてもらって理解しました
自分の理解はこんな感じです
こうしうことがすべきだと思うのだけど、
>それはどこで実行しているのかな、
>といったことがもしあるなら、
>その「すべきこと」を教えてください。
>
すべきことはできていてどこの文で実行しているか
なんとなく文をみて
予測できます
変数 配列等の解釈に少し不安な部分があり不躾な質問ばかり
してしまい申し訳ありません
>なお、必要もないのに全文引用するのはやめたほうが良いと思います
必要か必要でないかと言われたとき自分のしている仕事の効率化
をするためにこのときはどうしても必要でした
今もそうですが知識と経験が足りなくここまで難しい文
をオリジナルで作れるほどのスキルがないです
道理的にもいけないことは承知していますが
このままではいけないと思い直し恥をしのんで教えを乞うています
|
|
T-k
- 13/12/20(金) 0:36 -
![[未読]](./data/excel/image/read_icon.gif){kind=icon}
