Excel VBA質問箱 IV

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

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


1964 / 13645 ツリー ←次へ | 前へ→

【70773】行をクリックした時点でデータ取得 acess 11/12/28(水) 15:46 質問[未読]
【70774】Re:行をクリックした時点でデータ取得 UO3 11/12/28(水) 16:37 回答[未読]
【70775】Re:行をクリックした時点でデータ取得 acess 11/12/28(水) 16:43 お礼[未読]

【70773】行をクリックした時点でデータ取得
質問  acess  - 11/12/28(水) 15:46 -

引用なし
パスワード
   「70768」での質問は回答者様のお陰で無事、解決できたのですが

[Database]sheetsのデータを[見積]シートに戻すにはどうしたらよいでしょうか?

但し、[Database]sheetsは数百行のデータから、クリックした行のセルA1、

B1、C1を[見積]sheetsのD1、E1、F1に戻すといったものにしたいのです

(セルのクリックは無反応で)。

要は前回データを参照するために取得するためなのですが。

データをコピーするだけなら、なんとかなるのですが、行をクリックしたら

となると・・・わたしには難しいです。

宜しくお願いします。

【70774】Re:行をクリックした時点でデータ取得
回答  UO3  - 11/12/28(水) 16:37 -

引用なし
パスワード
   ▼acess さん:

こんにちは

シート上で○○したら というタイミングの処理は、その○○のイベントプロシジャで実行します。
基本的には、そのシートの「シートモジュール」というところに記述します。
(シート名のタブを右クリックしてコードの表示を選ぶと出てくるところ)

ただ、残念なことに「セルをクリックしたら」というイベントは、我々には渡りません。
「ダブルクリックしたら」とか「右クリックしたら」は、あるのですが。
クリックと似たような動作で「セルが選択されたら」というものがあります。
ただ、これは、同じセルを選んでも発生しないことに加え、なにげなく、うっかりとシート上で
セルをクリックしてしまっても発生しますので、あまり使い道がないイベントです。

ここは、ダブルクリックでいかれませんか?
DATABASEシートでダブルクリックした行の「A列」〜「C列」の値を、
見積シートの「D1」〜「F1」に戻します。

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
  Cancel = True
  Sheets("見積").Range("D1:F1").Value = Target.EntireRow.Range("A1:C1").Value
End Sub

【70775】Re:行をクリックした時点でデータ取得
お礼  acess  - 11/12/28(水) 16:43 -

引用なし
パスワード
   UO3様のご提案通り、ダブルクリックでいこうとおもいます。


前回同様、早速の解答ありがとうございました。

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