Excel VBA質問箱 IV

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

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


22746 / 76732 ←次へ | 前へ→

【59363】Re:入力日の自動セット
発言  Jaka  - 08/12/8(月) 15:21 -

引用なし
パスワード
   あっ、
>If Target.count = 1 Then Exit sub
  ↓
>If Target.count > 1 Then Exit sub
すみません。

>⇒コピペされた範囲を取得する方法を教えていただけますか?
> 範囲取得できればループで処理できそうですが、範囲取得の方法が
> 調べているのですが見つからず・・・
範囲って、Targetが全てです。

msgbox Target.Address

ってやってみればわかります。
こうもできるし
For Each xx in Target

next

コピペの場合、コピー元のセルが離れていても
コピー先のセルではくっつきます。

また、複数セルを選択して、
Ctrlを押しながら確定した場合は、全てのセルの中身は同じになります。

だから、
Target.Areas の1つ目のセルの値が範囲にいくつあるかを数えて
セルの個数と同じならば、コピペでなく複数同時入力したものと考えられます。
(コピペでも全て同じ値なら、同じような結果になります。)
個数が違うなら、間違いなくコピペです。
2 hits

【59355】入力日の自動セット MM 08/12/8(月) 12:42 質問
【59357】Re:入力日の自動セット Jaka 08/12/8(月) 13:53 発言
【59361】Re:入力日の自動セット MM 08/12/8(月) 14:51 質問
【59363】Re:入力日の自動セット Jaka 08/12/8(月) 15:21 発言
【59366】【解決】Re:入力日の自動セット MM 08/12/8(月) 16:48 お礼

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