VBA練習問題解答
第78回.総合練習問題8解答

Excelマクロ練習問題集、エクセルVBAの学習教材
最終更新日:2019-06-27

第78回.総合練習問題8解答

マクロVBA練習問題の解答ページです。


マクロVBA練習問題

・ダイアログで、Excelファイルを選択する
・指定されたExcelファイルの全ワークシートを印刷する
ただし、
非表示シートは対象外とする
また、
シートの全セルの背景色は消して下さい。


チャレンジしてみましょう。

ヒント!

書き方はいろいろあります。
まずは自分なりの書き方で書いてみましょう。

シンキングタイム

シンキングタイム開始


シンキングタイム終了

マクロVBA練習問題解答

では解答のマクロVBAコードです。

Sub Sample()
  Dim wb As Workbook
  Dim ws As Worksheet
  Dim FileName As Variant
  FileName = Application.GetOpenFilename(FileFilter:="Microsoft Excelブック,*.xls*")
  If FileName = False Then
    Exit Sub
  End If
  Set wb = Workbooks.Open(FileName)
  For Each ws In wb.Worksheets
    If ws.Visible = xlSheetVisible Then
      ws.Cells.Interior.ColorIndex = xlNone
      ws.PrintOut preview:=True
    End If
  Next ws
  wb.Close SaveChanges:=False
End Sub

今までの内容の組み合わせだけです。
書き方は色々ありますので、
自分なりのコードを書いてみて下さい。



同じテーマ「マクロVBA練習問題解答」の記事

第43回.総合練習問題5解答

マクロVBA練習問題の解答ページです。マクロVBA練習問題 以下の表で問題です、いわゆる百ます計算です。このシートは、「Sheet1」とし、別に「Sheet2」が存在します。百マス計算です。・交点のセルに掛け算を入れて下さい。
第50回.総合練習問題6解答
マクロVBA練習問題の解答ページです。マクロVBA練習問題 1問目 セルA1に、20120203 と入っています、これを、セルB2に、日付(2012/2/3) として出力して入れて下さい。2問目 セルA1に、日本太郎 と入っています、姓名の間の空白は半角スペースです。
第67回.総合練習問題7解答
マクロVBA練習問題の解答ページです。マクロVBA練習問題 ブックとシートを扱う問題です。まず以下を見て下さい。シート「ブック一覧」のA列にパス、B列にブック名が入っています。このブックを開き、中の全てのシート名を取得して下さい。
第78回.総合練習問題8解答
第81回.総合練習問題9解答
VBA練習問題の解答ページです。VBA練習問題 フォルダごとバックアップするマクロの作成です。自身のブックのあるフォルダについて、以下の処理をして下さい ・サブフォルダ"BACKUP"を作成して下さい ・フォルダ内のすべてのエクセルファイルを"BACKUP"にコピーして下さい。
第86回.総合練習問題10解答
VBA練習問題の解答ページです。VBA練習問題 表の見出しを残して、データ部分のみ消去してください。・A1セルを起点に1つのセル領域があります、・1行目は列見出しとして使用、A列は行見出しとして使用しています、・つまり、データ部はB2セルから開始されています、・データ部のみ入力データを消去してください。
練習問題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列は事前に%編集してあることとして下さい。


新着記事NEW ・・・新着記事一覧を見る

ユーザーに絶対に停止させたくない場合のVBA設定|VBA技術解説(4月1日)
CharactersプロパティとCharactersオブジェクト|VBA技術解説(3月31日)
指数近似/対数近似/累乗近似(掲載順位とCTR)|エクセル関数超技(3月31日)
練習問題32(連続数値部分を取り出し記号で連結)|VBA練習問題(3月24日)
連続数値部分を取り出し記号で連結|エクセル関数超技(3月24日)
数式バーの高さを数式の行数で自動設定|VBAサンプル集(3月21日)
LET関数(数式で変数を使う)|エクセル入門(3月21日)
スピルに対応したXSPLITユーザー定義関数(文字区切り)|VBAサンプル集(3月15日)
XMATCH関数(範囲から値を検索し一致する相対位置)|エクセル入門(3月14日)
XLOOKUP関数(範囲を検索し一致する対応項目を返す)|エクセル入門(3月14日)


アクセスランキング ・・・ ランキング一覧を見る

1.最終行の取得(End,Rows.Count)|VBA入門
2.RangeとCellsの使い方|VBA入門
3.セルのコピー&値の貼り付け(PasteSpecial)|VBA入門
4.マクロって何?VBAって何?|VBA入門
5.Range以外の指定方法(Cells,Rows,Columns)|VBA入門
6.変数宣言のDimとデータ型|VBA入門
7.ひらがな⇔カタカナの変換|エクセル基本操作
8.繰り返し処理(For Next)|VBA入門
9.徹底解説(VLOOKUP,MATCH,INDEX,OFFSET)|エクセル関数超技
10.セルに文字を入れるとは(Range,Value)|VBA入門




このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。


記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。



このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
本文下部へ