ばくがの業務効率化チャンネル

このブログは個人的なエクセルの備忘録です

2023-01-01から1ヶ月間の記事一覧

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

VBA

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) Dim 取得番地 As Long 取得番地 = ActiveCell.Row 'ファイルを書き込みで開く(無ければ新規作成される、あれば上書き)Open "C:test.txt" For Output As #1 '開いたファ…