No.4ベストアンサー
- 回答日時:
別にマクロの品評会でもありませんが、こんなコードになります。
マクロ禁断のSelect を使った特殊な例です。
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim sh2 As Worksheet
If Target.Value = "" Then Exit Sub
Set sh2 = Worksheets("Sheet2") '目的のシート
Cancel = True 'これは忘れないこと。おまじない
Me.Select False
sh2.Select False
Target.Select
Selection.Value = Selection.Value '*
Me.Select
End Sub
'数式の場合
'Selection.FormulaLocal = Selection.FormulaLocal
No.3
- 回答日時:
下記のマクロをSheet1のシートモジュールに張り付けて下さい。
Sheet1の任意のセルをダブルクリックするとSheet2に飛びます。
飛び先は、Sheet2のアクティブセル(最後に選択されていたセル)です。
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Sheets("Sheet2").Select
ActiveCell.Value = Target.Value
End Sub
No.2
- 回答日時:
回答が無い様なので。
Sheet1のセルをダブルクリックしたら、Sheet2の同じセルに代入する。
Sheet1のprivate subをして作りこみます。
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim Sh1 As Worksheet
Dim Sh2 As Worksheet
Set Sh1 = Worksheets("Sheet1")
Set Sh2 = Worksheets("Sheet2")
行 = Target.Row
列番号 = Target.Column
列 = Split(Cells(Target.Column).Address, "$")(1)
Sheets("Sheet2").Activate 'Sheet2をアクティブ
Sh2.Range(列 & Target.Row).Activate 'Sheet2のセルをアクティブ
Sh2.Range(列 & Target.Row) = Sh1.Range(列 & Target.Row) '代入
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) Excelの文字列を転記したいのですが。 2 2022/09/30 12:09
- Visual Basic(VBA) Excel VBA 最終行を取得しVlookup関数をコピーする方法をコーディングで教えてください。 3 2023/05/11 13:14
- Visual Basic(VBA) VBA 検索と入力 Excel ブック ぶぶぶ シート ししし 列V 検索対象の列です 最終行は、お 6 2023/05/17 01:40
- Visual Basic(VBA) VBAマクロでシートコピーした新シートにコピー元シートとの計算式の入れ方を教えて下さい。 5 2022/11/20 09:48
- Visual Basic(VBA) エクセルVBA ダブルクリックしたら色反転を指定したセルのみにしたい 2 2022/04/06 12:52
- Excel(エクセル) エクセルで”入力シート”の文字書式の変更を”出力シート”で同じ文字書式で印刷したいです。VBA希望 4 2023/04/24 11:07
- Excel(エクセル) VBA セルの値と同じ名前のシートにデータを貼り付けするやり方を教えてください 2 2022/05/17 16:26
- Excel(エクセル) 【エクセル】文中に別シートのセルの内容を自動入力したい 6 2022/11/17 11:30
- Excel(エクセル) セルの値と同じ名前のシートのセルの結合を解除する方法を教えてください 3 2022/10/03 10:23
- Visual Basic(VBA) EXCEL VBA 単語置き換え について質問です ブック名 ぶぶぶ シート名 ししし セル V3〜 3 2023/03/08 01:41
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
エクセルVBAでダブルクリックをしたらA列のデータが別シートに転記されるにはどうしたらよいですか?
Visual Basic(VBA)
-
VBA セルをダブルクリック→違うセルに値をコピー
Excel(エクセル)
-
エクセル マクロ クリックしたセルの内容を貼り付け
Excel(エクセル)
-
-
4
エクセル クリックした値を転記
Excel(エクセル)
-
5
XL:BeforeDoubleClickが動かない
その他(プログラミング・Web制作)
-
6
エクセル 特定のセルをダブルクリックすると別シートの特定のセルから数値を抽出して表示するマクロ
Excel(エクセル)
-
7
エクセル ダブルクリック入力の範囲が複数の場合
Excel(エクセル)
-
8
エクセルVBAでセルに入力したパスでブックを開く
Excel(エクセル)
-
9
Excel2000 VBA ダブルクリックで別シートの同番地セルへ移動
Excel(エクセル)
-
10
VBA 検索して一致したセルへジャンプさせたい
その他(プログラミング・Web制作)
-
11
選択したセルでダブルクリックをするとエクセルマクロによりそのセルがコピ
Visual Basic(VBA)
-
12
セルをクリックしたらリンク先のシートに飛びたい
Excel(エクセル)
-
13
エクセルでセルをクリックすると“○”と入力
Excel(エクセル)
-
14
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
-
15
【Excel VBA】複数ある特定の文字列を含む行を削除
Excel(エクセル)
-
16
文字列の結合を空白行まで実行
Visual Basic(VBA)
-
17
A1セルに入力したら、入力時間をA2セルに自動挿入
Excel(エクセル)
-
18
WorkBooksをオープンさせずにシートにコピーしたい【EXCEL VBA】
Excel(エクセル)
-
19
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
20
エクセルVBAで5行目からオートフィルタモードに設定したいたい
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
EXCELで特定のセルに表示...
-
エクセル 数字をすべて○などの...
-
太字に設定されているセルの個...
-
Excelで挿入した図をセルの中央...
-
現在のセルの位置を返す関数は...
-
Excel内での検索結果をシート...
-
Excelでセルをクリックす...
-
エクセルでPDFリンクを大量...
-
フォントの色を指定して削除出...
-
クリックすると文章が表示され...
-
Excel ハイパーリンクのURLを別...
-
Excelで、図形内の文字をセルに...
-
セルがクリックされた回数をカ...
-
excelで セルの移動時に...
-
エクセルでの検索ボックスの作...
-
EXCELのセルや文字色の反映
-
エクセルでページ数をあるセル...
-
エクセル シート保護された共...
-
マクロを実行すると画像がズレ...
-
エクセルマクロ 赤色の文字を検...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
EXCELで特定のセルに表示...
-
エクセル 数字をすべて○などの...
-
Excel内での検索結果をシート...
-
クリックすると文章が表示され...
-
Excelでセルをクリックす...
-
マクロを実行すると画像がズレ...
-
太字に設定されているセルの個...
-
Excelで、図形内の文字をセルに...
-
Excelで挿入した図をセルの中央...
-
フォントの色を指定して削除出...
-
Excel ハイパーリンクのURLを別...
-
エクセルでPDFリンクを大量...
-
エクセル 未入力セルがあると...
-
現在のセルの位置を返す関数は...
-
VBA 見つからなかった時の処理
-
EXCELのセルや文字色の反映
-
【EXCEL】先週の月曜日の日付を...
-
セルの値が変ると自動でマクロ...
-
エクセルでセルをダブルクリッ...
-
アポストロフィーの一括挿入 ...
おすすめ情報