本学習テーマ紹介動画
 - YouTube
YouTube でお気に入りの動画や音楽を楽しみ、オリジナルのコンテンツをアップロードして友だちや家族、世界中の人たちと共有しましょう。
👆本学習テーマをYouTubeで紹介しています!
チャンネル登録宜しくお願いします!
効果音ラボ ナレーション 音読さん
*基本的に, 記事投稿日翌日夜18:30頃から, 動画を閲覧できます。
本学習ツールでの問題文・解答例
問題文
以下の要件を満たすVBAのプログラムを実装して下さい。
要件
| シート「読み込みシート」の「テーブル」のデータを全て削除する。 (データが既にない場合にエラーが出ないように実装すること。) | 
| プログラムの最後に, シート「読み込みシート」をアクティベートにして, MsgBox関数で「実行完了」と表示する。 | 
解答例
Option Explicit
Sub correctAnswerExample()
    Dim ws As Worksheet: Set ws = ThisWorkbook.Worksheets("読み込みシート")
    Dim tbl As ListObject: Set tbl = ws.ListObjects("テーブル")
    ' テーブルの初期化
    If Not (tbl.DataBodyRange Is Nothing) Then
        tbl.DataBodyRange.Delete
    End If
    ws.Activate
    MsgBox ("実行完了")
End Sub上のプログラムが実際に動く様子は, 下の学習ツールをダウンロードして, 確認してみて下さい!
本学習ツールの内容
下👇の画像のように, テーブルのデータを削除するプログラムを実装し, そのプログラムを実際に実行することが出来ます!



VBA設定
尚, 本ツールには, 「VBA」(Excelのプログラミング言語)が組み込まれている為, 以下のマニュアルに従った設定・エラー時の対処が必要となります。
ダウンロード
ぜひ, 勉強にご活用下さい!(xlsmファイル)👇

 
         
         
         
         
         
         
         
         
         
         
         
         
         
         
         
         
         
         
  
  
  
   



コメント