- ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:マクロでマスを作成)
マクロを使用して指定された数のマスを作成する方法
このQ&Aのポイント
- マクロを使用して、入力された数のマスを作成する方法について説明します。
- 具体的には、マクロを使って、指定された数のマスを作成する方法について説明します。最大で20列のマスを作成することができます。
- また、60個以上のマスの場合は、さらに追加の列も作成することができます。マスの作成には、マクロ内の特定のコードを使用します。
- みんなの回答 (2)
- 専門家の回答
質問者が選んだベストアンサー
>(1)A1には作成したいマスの数が入力される >(2)B1~B20に(1)で入力された数の□(しかく)で囲まれたマスが出来る A1に記入された数だけB1~のセルを罫線で囲むのなら Sub Test() Dim 商 As Long Dim 余 As Long 商 = (Range("A1").Value - 1) \ 20 余 = (Range("A1").Value - 1) Mod 20 + 1 If 商 = 0 Then Range("B1").Resize(余).Borders.LineStyle = xlContinuous Else Range("B1").Resize(20, 商).Borders.LineStyle = xlContinuous Range("B1").Offset(, 商).Resize(余).Borders.LineStyle = xlContinuous End If End Sub
その他の回答 (1)
- watabe007
- ベストアンサー率62% (476/760)
回答No.2
>B1~B20ではなく、B2~T2で□(しかく)を囲みたいのですが、 Range("B2").Resize(, 19).Borders.LineStyle = xlContinuous これ、応用できませんか
質問者
お礼
ありがとうございました
補足
回答ありがとうございます。 訂正があります。 B1~B20ではなく、B2~T2で□(しかく)を囲みたいのですが、 お手数ですが教えていただけますか?