- ベストアンサー
エクセルの行の幅を変更するＶＢＡ
エクセルの'sheet1'の行幅を１行目，４行目，７行目，１０行・・・と ３行目ごとに一回の動作で変更するプログラムは可能でしょうか？ （例） (行) (幅) １ 20 ２ デフォルト ３ デフォルト ４ 20 ５ デフォルト ６ デフォルト ７ 20 ８ デフォルト ・ ・ ※Excel2003を利用しています。
- diy_0316
- お礼率21% (3/14)
- その他（プログラミング・開発）
- 回答数1
- ありがとう数1
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
例えば1000行までなら Sub xxx() For i = 1 To 1000 If i Mod 3 = 1 Then Rows(i).RowHeight = 20 Next i End Sub 行を3で割って余りが1のものについて行高さ20
お礼
迅速な対応ありがとうございます！ Modでの処理ですか～ありがとうございます！ 勉強なりました。