アクティブシートの複数のセルに同じ文字を入れる

アクティブシートの特定のセルに文字を入れるには「Range("A1:C3").Value = "エクセル"」のようにします。
図は実行前の画面です。

実行するとA1からC3までのセルに"エクセル"の文字が表示されます。

サンプルファイルをダウンロード (sample.xlsm)