セルの選択範囲アドレスをクリップボードにコピーする

Sub CopySelectedArea() ' ## 選択範囲アドレスをクリップボードにコピーする ## CS = Selection(1).Address CL = Selection(Selection.Count).Address SCI = CS & ":" & CL With CreateObject("Forms.TextBox.1") .MultiLine = True .Text = SCI .SelStart = 0 .SelLength = .TextLength .Copy End With MsgBox "クリップボードにセル範囲 " & SCI & " をコピーしま…

Excelの入力規則で2段リストを作る方法

Excelでドロップダウンリストで入力をする「入力規則-リスト」が便利ですが、例えばリストを2つ用意して、1つめのドロップダウンリストの結果で2つめのドロップダウンリストを変化させることは可能でしょうか。答えは可能です。ここでは、このような2段リストの作り方を解説していきます。 1段目のリストを作成する 2段目のリストを作成する 見出しの下に行を追加する 「市」のセル範囲を絶対指定で追加した行に書き込む ※選択範囲アドレスをクリップボードにコピーするVBAコード 「市」に対する作業用セルを追加する 2段目リストを設定する 2段目リストの結果 図のようなシートを用意しました。1段目のリストは北東…