基本　その２

---

Range

    Range("A1","B3).Value = "ABC"
    Range("A5:C7).Value = "ABC"
    Range("4:4").Value = "ABC"
    Range("C:C").Value = "ABC"

            

シートの数とシート名

    Sub ABC()
        Dim i   As Integer
        For i = 1 To Worksheets.Count
            Debug.Print "シート名：" & Worksheets(i).Name
        Next i
    End Sub

            

---