Excel VBA質問箱 IV

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

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


7571 / 76736 ←次へ | 前へ→

【74751】Re:セルの書き換え手法2点の違いを教えてください。
発言  kanabun  - 13/9/7(土) 8:45 -

引用なし
パスワード
   ▼化け猫 さん:

私からも再度...

>  Dim MyV As Variant
>  Set MyV = MyRange

Rangeオブジェクトをセットするんなら、変数 MyV は
Dim MyV As Range
と宣言してください。そこを なぜか? MyV As Variant で宣言するから
混乱に拍車がかかるんだと思います。
そして、Rangeオブジェクトの「値を」代入するなら MyV.Value のように
.Value プロパティを省略しない!

この2点に気をつけて、異なる結果になることがあるのは何故?
と、問題点を絞っていってください。

●Range型オブジェクトは As Variant でなく As Range で宣言する
●Rangeの「値」を使うなら .Value (または .Value2)プロパティを省略しない


>> 皆様
>
>お騒がせしております。
>そして、レスが大変遅くなり申し訳ありません。
>簡単に状況を再現してみましたので、報告させていただきます。
>
>以下の文をケース1~4とし、各々プログラムに組み込むとします。
>
>ケース1: MyV = MyF
>     結果、これでは描画されない。
>ケース2: MyV = MyF
>     MyRange = MyV
>     結果、描画される。
>ケース3: MyV(1,1) = MyF(1,1)
>     結果、(1,1)の該当セルのみ描画される。
>ケース4: MyV(1,1) = MyF(1,1)
>     MyRanage = MyV
>     結果、描画されるがDo Loopを抜けるとクリアされる。
>
>
>Option Explicit
>Declare Function GetTickCount Lib "kernel32" () As Long
>Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
>
>
>Sub kakunin()
>
>  Dim MyRange As Range
>  Set MyRange = Range("B4:G4")
>  
>  Dim MyV As Variant
>  Set MyV = MyRange
>  
>  Dim MyF As Variant
>  Set MyF = Worksheets("確認").Range("B5:G5")
>  
>  Dim StartTime As Long
>  Dim WaitTime As Long
>    
>  StartTime = GetTickCount
>  WaitTime = Range("B3")
>  
>  Do
>      
>    "ケース1~4"
>    
>    If (GetTickCount - StartTime) > WaitTime Then
>      
>      Exit Do
>      
>    End If
>    
>    DoEvents
>    
>  Loop
>    
>End Sub
>
>どういう理屈なのか今一度考えてみようと思います。
>解説いただける方がいれば、よろしくお願いいたします。

0 hits

【74718】セルの書き換え手法2点の違いを教えてください。 化け猫 13/9/3(火) 1:42 質問
【74719】Re:セルの書き換え手法2点の違いを教えてく... 化け猫 13/9/3(火) 5:20 発言
【74720】Re:セルの書き換え手法2点の違いを教えてく... ichinose 13/9/3(火) 6:18 発言
【74726】Re:セルの書き換え手法2点の違いを教えてく... 化け猫 13/9/4(水) 4:51 発言
【74727】Re:セルの書き換え手法2点の違いを教えてく... ichinose 13/9/4(水) 6:34 発言
【74728】Re:セルの書き換え手法2点の違いを教えてく... 13/9/4(水) 7:41 回答
【74731】Re:セルの書き換え手法2点の違いを教えてく... kanabun 13/9/4(水) 10:47 発言
【74733】Re:セルの書き換え手法2点の違いを教えてく... ichinose@食事中 13/9/4(水) 12:58 発言
【74747】Re:セルの書き換え手法2点の違いを教えてく... 化け猫 13/9/6(金) 23:32 発言
【74749】Re:セルの書き換え手法2点の違いを教えてく... ichinose@ 13/9/7(土) 7:51 発言
【74753】Re:セルの書き換え手法2点の違いを教えてく... 化け猫 13/9/7(土) 11:39 お礼
【74751】Re:セルの書き換え手法2点の違いを教えてく... kanabun 13/9/7(土) 8:45 発言

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