| |
こんにちは、よろしくお願いします
A1:BN235にデータの入った表があります。
A1でオートフィルタを掛けて
下記のようなコードを動かすと、変なところが選択されます。
Sub sample15()
Range(Cells(1, 1), Cells(Rows.Count, 1).End(xlUp)).SpecialCells(xlCellTypeVisible). _
SpecialCells(xlCellTypeLastCell).Select
End Sub
不可解のは、このコードは今までちゃんと動いていたことです。
今まではちゃんと235行目を選択してくれました。
（上記は簡略化して書きましたが実際は一番下の行を選ぶという下記コードを書いています）
lastcell = Range(Cells(1, 1), Cells(Rows.Count, 1).End(xlUp)).SpecialCells(xlCellTypeVisible).SpecialCells(xlCellTypeLastCell).Row
ところが、今日動かすと241行目が選択されます。列もなんの関係もない列BVが選択されています。
その場所になにもデータは入っていません。
念のため表の右側と下側を削除してもう一度やってみるとやはりダメでした。
そして再起動して再度動かすと今度はなんと236行目が選択されやるたびにまちまちです。（列は相変わらずBV）
そして、オートフィルタを良く見ると、BNの列までしか表がないのに何も関係のないBV列まで下向けの矢印が出来ています。（やり直してもだめ）
どうしてこんな風になるのでしょうか？今まで大丈夫だったのでなぞです。
わかるかたよろしくお願いします。
|
|
かかこ
- 11/9/26(月) 15:22 -
