名称未設

【ExcelVBA公開模試】左右を入れ替える、3つの場所を入れ替える

文法を無視して、とりあえず動けばいいという邪道ExcelVBA講座こと「速読VBA単語」に準拠した問題を出題します。

問題

B2、D2、F2にそれぞれ文字列が入力されています(図1)。文字列は任意です。ExcelVBAを用いて次の処理を実行しなさい。
(1)B2とD2を入れ替えなさい。
(2)設問(1)のコードを利用してB2、D2、F2の文字列を入れ替えなさい。

<図1>

<図2:設問(1)完成イメージ>

<図3:設問(2)完成イメージ>

わえなび式 正解例

(このページの下にあります)

目標回答時間

プロ30秒以内、アマチュア5分以内に処理ができたら合格

この問題の出題範囲

「速読VBA単語」Program3-3まで

ご案内

ExcelVBAをなんとなく理解できればいいという初心者のための「速読VBA単語」を受講希望の方はカリキュラムをご覧ください。

考え方

順序を変えるときはいったんセルの値を変数に保存します。B2とD2を保存したあとで、逆にしてセルに代入します。

hidari = Range("B2")
migi = Range("D2")

Range("B2") = migi
Range("D2") = hidari

なお、2行目と3行目は、D2→migi→B2と代入しているので、ダイレクトに代入しても構いません。

Range("B2") = Range("D2")

正解例

Sub kakko1()
   hidari = Range("B2")
   Range("B2") = Range("D2")
   Range("D2") = hidari
End Sub

Sub kakko2()
   hidari = Range("B2")
   Range("B2") = Range("D2")
   Range("D2") = Range("F2")
   Range("F2") = hidari
End Sub

バックナンバー


この記事が気に入ったらサポートをしてみませんか?