|
▼にしもり さん
こんにちは^^
>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
|
|