第86回.総合練習問題10解答
マクロVBA練習問題の解答ページです。
マクロVBA練習問題
表の見出しを残して、データ部分のみ消去してください。
・A1セルを起点に１つのセル領域があります、
・１行目は列見出しとして使用、A列は行見出しとして使用しています、
・つまり、データ部はB2セルから開始されています、
・データ部のみ入力データを消去してください。
・データ部のみ表示形式を文字列にしてください。
※表範囲をはみ出して処理しないようにしてください。
ヒント！
・１行目は列見出しとして使用、A列は行見出しとして使用しています、
・つまり、データ部はB2セルから開始されています、
・データ部のみ入力データを消去してください。
・データ部のみ表示形式を文字列にしてください。
※ResizeとOffsetを使用して下さい。
シンキングタイム
シンキングタイム開始
シンキングタイム終了
シンキングタイム終了
マクロVBA練習問題解答
では解答のマクロVBAコードです。
少し、難しかったかもしれません。
良く読み解いて、参考にして下さい。
もちろん、ClearContentsするだけなら、
.Offset(1, 1).ClearContents
これでも問題ありませんが、ここでは練習として範囲を正確に表現してもらいました。
また、参考までに、Intersectを使って
このような書き方もできます。
Intersectメソッドについては、こちらを参照して下さい。
Sub 練習10()
With Range("A1").CurrentRegion
With .Offset(1, 1).Resize(.Rows.Count - 1, .Columns.Count - 1)
.ClearContents
.NumberFormatLocal = "@"
End With
End With
End Sub
少し、難しかったかもしれません。
良く読み解いて、参考にして下さい。
.Offset(1, 1).ClearContents
これでも問題ありませんが、ここでは練習として範囲を正確に表現してもらいました。
Intersect(Range("A1").CurrentRegion, Range("A1").CurrentRegion.Offset(1, 1)).ClearContents
このような書き方もできます。
IntersectメソッドはApplicationのメソッドです。複数セル範囲の、重なっている部分のセル範囲を取得することが出来ます。あるセルが、特定セル範囲内にあるかどうかを判定したり、セル範囲の中から、特定の列や行の部分だけを取り出したりする場合に使います。
同じテーマ「マクロVBA練習問題解答」の記事
マクロVBA練習問題の解答ページです。マクロVBA練習問題 ブックとシートを扱う問題です。まず以下を見て下さい。シート「ブック一覧」のA列にパス、B列にブック名が入っています。このブックを開き、中の全てのシート名を取得して下さい。
第78回.総合練習問題8解答マクロVBA練習問題の解答ページです。マクロVBA練習問題 ・ダイアログで、Excelファイルを選択する ・指定されたExcelファイルの全ワークシートを印刷する ただし、非表示シートは対象外とする また、シートの全セルの背景色は消して下さい。
第81回.総合練習問題9解答マクロVBA練習問題の解答ページです。マクロVBA練習問題 フォルダごとバックアップするマクロの作成です。自身のブックのあるフォルダについて、以下の処理をして下さい ・サブフォルダ"BACKUP"を作成して下さい ・フォルダ内のすべてのエクセルファイルを"BACKUP"にコピ…
第86回.総合練習問題10解答練習問題1（For～Nextの練習）解答
マクロVBA練習問題1の解答ページです。マクロVBA練習問題 ・客単価を計算して、D列に入れて下さい。※行数は2～11行の固定の記述で良いです。※客単価=売上÷客数。練習問題用のExcelファイル こちらからダウンロードできます。
練習問題2（最終行の取得の練習）解答マクロVBA練習問21の解答ページです。マクロVBA練習問題 ・金額を計算して、D列に入れて下さい、ただし、行数は随時変わるので、行数の変化に自動対応して下さい。※金額=数量×単価 練習問題用のExcelファイル こちらからダウンロードできます。
練習問題3（二重ループの練習）解答マクロVBA練習問題3の解答ページです。マクロVBA練習問題 100マス計算です。1行目の数値と、A列の数値の掛け算を、各交点のセルに入れて下さい。練習問題用のExcelファイル こちらからダウンロードできます。
練習問題4（Ifの練習）解答マクロVBA練習問題4の解答ページです。マクロVBA練習問題 ・箱数とバラ数を計算して、それぞれの列に入れて下さい。・1箱に満たない場合は、D列の箱数に"×"を入れて下さい。※入数とは、1箱に入る数量です。
練習問題5（ElseIfとSelect Caseの練習）解答マクロVBA練習問題5の解答ページです、マクロVBA練習問題 ・昨年比を計算して、それぞれの列に入れて下さい。・昨年比の数値により、記号を入れて下さい。S:105%以上 A:100%以上、105%未満 B:95%以上、100%未満 C:90%以上、95%未満 D:90%未満 ※昨年比=今年売上÷昨年売上 ※D列は事…
練習問題6（変数を使っての合計の練習）解答マクロVBA練習問題6の解答ページです。マクロVBA練習問題 ・金額を計算して、D列に入れて下さい、・金額の合計を計算し、最終行の1行下のD列に入れて下さい。（下の票では、D22セルになります。） 練習問題用のExcelファイル こちらからダウンロードできます。
練習問題7（メッセージボックスの練習）解答マクロVBA練習問題7の解答ページです、マクロVBA練習問題 ・金額を計算して、D列に入れて下さい、・金額の合計と平均を計算し、MsgBoxで画面に表示して下さい。練習問題用のExcelファイル こちらからダウンロードできます。zipはこちらです。
新着記事NEW ・・・新着記事一覧を見る
ブール型（Boolean）のis変数・フラグについて｜VBA技術解説(2024-04-05)
テキストの内容によって図形を削除する｜VBA技術解説(2024-04-02)
ExcelマクロVBA入門目次｜エクセルの神髄(2024-03-20)
VBA10大躓きポイント（初心者が躓きやすいポイント）｜VBA技術解説(2024-03-05)
テンキーのスクリーンキーボード作成｜ユーザーフォーム入門(2024-02-26)
無効な前方参照か、コンパイルされていない種類への参照です。｜エクセル雑感(2024-02-17)
初級脱出10問パック｜VBA練習問題(2024-01-24)
累計を求める数式あれこれ｜エクセル関数応用(2024-01-22)
複数の文字列を検索して置換するSUBSTITUTE｜エクセル入門(2024-01-03)
いくつかの数式の計算中にリソース不足になりました。｜エクセル雑感(2023-12-28)
アクセスランキング ・・・ ランキング一覧を見る
1.最終行の取得（End,Rows.Count）｜VBA入門
2.セルのコピー&値の貼り付け（PasteSpecial）｜VBA入門
3.RangeとCellsの使い方｜VBA入門
4.ひらがな⇔カタカナの変換｜エクセル基本操作
5.繰り返し処理（For Next)｜VBA入門
6.変数宣言のDimとデータ型｜VBA入門
7.ブックを閉じる・保存（Close,Save,SaveAs）｜VBA入門
8.並べ替え（Sort）｜VBA入門
9.セルのクリア（Clear,ClearContents）｜VBA入門
10.Findメソッド（Find,FindNext,FindPrevious）｜VBA入門
- ホーム
- マクロVBA入門編
- マクロVBA練習問題解答
- 総合練習問題10解答
このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。