Excel VBA

MIPosted by

ダブルクリックで違うシートにコピー

データをもとにリストを作成する際、セルをダブルクリックしたら別のシートにコピーができるコードが書きたくていろいろと調べてみました。1つだけコピーするコードは簡単にできました。今更ですが、Excelも素晴らしいソフトですネ。

Private Sub worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Intersect(Target, Range(“A:C”)) Is Nothing Then Exit Sub
Worksheets(“sheet2”).Range(“A1”).Value = Target.Cells(1, 1).Offset(, 1).Value
End Sub

ただしデータといえば何千行とあるし…
規則的でない場合などもあります…

う~ん、考えなければならないことがたくさんありますね。日々、勉強…

Leave a Reply

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

CAPTCHA