2021-09-01から1ヶ月間の記事一覧
Sub macro() Dim checkList As Object Dim i As Long Dim ws As Worksheet Set ws = Worksheets("Sheet1") For i = 2 To ws.Cells(Rows.Count, 2).End(xlUp).Row If ws.Cells(i, 1) = "" Then With ws.Cells(i, 1) ActiveSheet.CheckBoxes.Add(.Left, .Top, …