![名称未設](https://assets.st-note.com/production/uploads/images/8980998/rectangle_large_type_2_a53d57755e519f4512373428c9464f31.jpg?width=800)
【ExcelVBA公開模試】小計の数式を残して、それ以外のセルは値にする
文法を無視して、とりあえず動けばいいという邪道ExcelVBA講座こと「速読VBA単語」に準拠した問題を出題します。
問題
次の図で、セル範囲B1:B100に値または数式が入力されている。小計の行に関数が使われていることは分かっているが、それ以外のセルに数式が入力されているかは不明である。
セル範囲B1:B100のうち、A列に「小計」と入力されている行だけ数式を残し、それ以外の行に数式が使われている場合は計算結果だけ(値の貼り付け)にしなさい。
わえなび式 正解例
(このページの下にあります)
目標回答時間
プロ1分以内、アマチュア5分以内に処理ができたら合格
この問題の出題範囲
「速読VBA単語」Program3-4まで
ご案内
ExcelVBAをなんとなく理解できればいいという初心者のための「速読VBA単語」を受講希望の方はカリキュラムをご覧ください。
正解例
Range()=Range()またはCells()=Cells()で値の貼り付けになります。
Sub moshi()
For i = 1 To 100
If Cells(i, 1) <> "小計" Then Cells(i, 2) = Cells(i, 2)
Next
End Sub
別解
Sub moshi()
For i = 1 To 100
If Cells(i, 1) <> "小計" Then
Cells(i, 2) = Cells(i, 2)
End If
Next
End Sub
バックナンバー
この記事が気に入ったらサポートをしてみませんか?