Excel VBA質問箱 IV

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

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


19414 / 76732 ←次へ | 前へ→

【62750】Re:AutoFitを使うには
発言  つん  - 09/8/27(木) 14:42 -

引用なし
パスワード
   ▼にしもり さん
こんにちは^^

>AutoFitをつかおうとしています。
>ですが、行数を捕捉できません。
>ドットの前のオブジェクトが指定されてないからだとは思うのですが、
>"A:A"をselectしたのでは認識されないのですか。
>どこをなおせばよろしいでしょうか。
>すみません解っていません。
>
>Dim r As Long
>  
>Range("A:A").Select
>r = .Rows.Count
>’↑ここでエラーになる
>Rows("3:" & r).EntireRow.AutoFit

なんかイマイチ何をされたいのかわからないのですが・・

r = .Rows.Count

こういう書き方をしたいなら、Withステートメント使わないと。
直前で、セレクトしても意味ないです。

With Range("A:A")
  r = Selection.Rows.Count
End With


で、ここをパスできたとして、
「r」に入ってるのは、A列全部指定されてるので、
Excel2007以前なら、「65536」になりますよね?
で、

Rows("3:" & r).EntireRow.AutoFit
これは
Rows("3:65536").EntireRow.AutoFit
と、同じ意味になって、でも、「EntireRow」だから、
3行目の行幅をAutoFitすることになって・・・・
いまいち、「r」の意味がわかりませんorz
1 hits

【62749】AutoFitを使うには にしもり 09/8/27(木) 13:43 質問
【62750】Re:AutoFitを使うには つん 09/8/27(木) 14:42 発言
【62752】Re:AutoFitを使うには にしもり 09/8/27(木) 15:14 質問
【62753】Re:AutoFitを使うには つん 09/8/27(木) 15:31 回答
【62754】Re:AutoFitを使うには にしもり 09/8/27(木) 15:56 質問
【62755】Re:AutoFitを使うには つん 09/8/27(木) 16:05 発言
【62756】Re:AutoFitを使うには にしもり 09/8/27(木) 16:25 お礼

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