【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
バックナンバー
この記事が気に入ったらサポートをしてみませんか?