| |
>コードを見てみないとなんとも・・・。
情報が少なすぎてすみません。
大量のシート上のデータに対して以下のようなループ処理を
実行していて、ループ内の★部分でシート上でCut処理を
実施しています。
記述の仕方的にはクリップボードを経由しないで直接切り取って
貼り付けているつもりなのですが、
このループ処理を実施している間、Editor等でクリップボードが使えたり
使えなかったりして、安定しません。
下記★の処理を削除するとループ処理中も問題なくCut&Pasteが
他のEditor等でも使用できます。
クリップボードの使用を競合しないように実装する方法が
ありましたら教えていただけないでしょうか？
Do While (1)
If Worksheets(main_sheet_name).Range("B" & main_row_no) = Empty Then
'比較元が""の場合は処理終了
Exit Do
End If
〜処理1〜
★コピー処理
Worksheets(chk_to_sheet).Range("XX:YY).Cut Destination:=Worksheets(chk_frm_sheet).Range(strtoClm & main_row_no)
〜処理2〜
main_row_no = main_row_no + 1
Loop
|
|
VBA初心者
- 07/3/29(木) 13:30 -
