マクロでオートフィル動画

マクロでオートフィル

動画でExcelマクロ解説

マクロでオートフィル

動画版「3行マクロ講座8回」です。
エクセルのオートフィルは、とっても便利な機能ですが、これを3行マクロにするとさらに便利に使うことができます。 連続データを入力する（AutoFill メソッド） AutoFill メソッドの使い方を紹介します。

マクロでオートフィル3行マクロ講座8回

動画内で作成したコード。

コードの解説は動画または記事解説をご覧ください。

'====================================
'=3行マクロ講座　8回
'=8 回､便利なオートフィルのマクロ
'====================================

Sub 数字の月のオートフィルマクロ()
    Range("A1") = "1月"
    Range("A1").AutoFill Destination:=Range("A1:A12")
End Sub

Sub 曜日のオートフィルマクロ()
    Range("B1") = "日"
    Range("B1").AutoFill Destination:=Range("B1:B31")
End Sub

Sub オートフィルの一般例マクロ()
    Range("C1").AutoFill Destination:=Range("c1:c31"), Type:=xlFillSeries
End Sub

Sub オートフィル1月から12月まで()
' 1月から12月までオートフィルマクロ

    Range("A2") = "1月"
    Range("A3") = "2月"
    Range("A2:A3").AutoFill Destination:=Range("A2:A13")
End Sub


Sub 英語で1月から12月まで()
' 1月から12月までオートフィル

    Range("B2") = "January"
    Range("B2").AutoFill Destination:=Range("B2:B13")
End Sub

Sub 曜日のオートフィルで太字にするマクロ()
' 日から土までオートフィル＆太字
'
    Range("B2") = "日"
    Range("B2").AutoFill Destination:=Range("B2:H2")
    Range("B2:H2").Font.Bold = True
End Sub