現在は別シートに転記していますが別ブックに転記したいのです
未読分:1件
昨日以降(0) 2日前以降(0) 3日前以降(0) 4日前以降(0) 5日前以降(0)
近田 伸矢, 植木 悠二, 上田 寛
IEのデータ収集&自動操作のプログラミング本はこの1冊だけ!IEの起動やポップアップウィンドウ、表示を制御する基本的なコードはもちろん、テキストボックスやラジオボタン、表、ハイパーリンクなどのHTML部品を制御する方法など、自動操作に欠かせないノウハウを丁寧に解説。
Message#1 2021年6月26日(土)02時12分 From: 西村 | 返事 削除 変更 |
売上集計表から、B列のある売上日をダブルクリックで その行のデータの「顧客名」C列 「適応」D列 「金額」E列 を 領収書(別ブック)を開き、領収書(別ブック)のB7に顧客名 C11に金額 D16に適応を転記 売上集計表のブックを閉じる このような事を実現したいのですか゛ どちら様か ご指南ください よろしくお願いします。 現在のコード Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) Set Target = Intersect(Target, Me.Range("B4").CurrentRegion) If Target Is Nothing Then Exit Sub Set Target = Intersect(Target.EntireRow, Me.Range("C:E")) Target.Select With Worksheets("Sheet2") .Range("B7").Value = "'" & Target(1, 1).Value .Range("C11").Value = Target(1, 3).Value .Range("D16").Value = Target(1, 2).Value End With Cancel = True End Sub |
昨日以降 2日前以降 3日前以降 4日前以降 5日前以降