Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


60247 / 76732 ←次へ | 前へ→

【21127】Re:不連続なセル範囲の指定の仕方
回答  Jaka  - 05/1/12(水) 16:52 -

引用なし
パスワード
   ▼ラータ さん:
>>最終列 = Columns("A:A").Specialcells(xlconstants).Count
  ↑列でいいの?

>>With Range("A1:A" & 最終列).Font
>>    .Name = "MS ゴシック"
>>    .Size = 10
>>End With
>>With Range("K1:K" & 最終列).Font
>>    .Name = "MS ゴシック"
>>    .Size = 10
>>End With

いまいち空白で無いセルの個数と列のかかわり具合がわかりませんが...。
こんな感じでしょうか?

For i = 1 To 11 Step 10
  With Range(Cells(1, i), Cells(NO数, i)).Font
    .Name = "MS ゴシック"
    .Size = 10
  End With
Next
2 hits

【21123】不連続なセル範囲の指定の仕方 ラータ 05/1/12(水) 16:15 質問
【21124】Re:不連続なセル範囲の指定の仕方 ラータ 05/1/12(水) 16:32 質問
【21127】Re:不連続なセル範囲の指定の仕方 Jaka 05/1/12(水) 16:52 回答
【21130】Re:不連続なセル範囲の指定の仕方 ラータ 05/1/12(水) 17:13 質問
【21131】Re:不連続なセル範囲の指定の仕方 Jaka 05/1/12(水) 17:34 回答
【21159】Re:不連続なセル範囲の指定の仕方 ラータ 05/1/13(木) 16:07 お礼
【21129】Re:不連続なセル範囲の指定の仕方 無名 05/1/12(水) 17:04 回答

60247 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free