Excel VBA質問箱 IV

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

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


12320 / 76734 ←次へ | 前へ→

【69940】オートフィルタがおかしい
質問  かかこ  - 11/9/26(月) 15:22 -

引用なし
パスワード
   こんにちは、よろしくお願いします

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列まで下向けの矢印が出来ています。(やり直してもだめ)

どうしてこんな風になるのでしょうか?今まで大丈夫だったのでなぞです。
わかるかたよろしくお願いします。
3 hits

【69940】オートフィルタがおかしい かかこ 11/9/26(月) 15:22 質問
【69941】Re:オートフィルタがおかしい かかこ 11/9/26(月) 16:27 質問
【69942】Re:オートフィルタがおかしい UO3 11/9/26(月) 16:47 発言
【69944】Re:オートフィルタがおかしい かかこ 11/9/27(火) 10:03 お礼
【69945】Re:オートフィルタがおかしい UO3 11/9/27(火) 11:24 発言
【69949】Re:オートフィルタがおかしい かかこ 11/9/27(火) 19:52 お礼
【69946】Re:オートフィルタがおかしい Jaka 11/9/27(火) 14:31 発言
【69950】Re:オートフィルタがおかしい かかこ 11/9/27(火) 19:56 お礼
【69961】Re:オートフィルタがおかしい かかこ 11/9/28(水) 23:22 お礼

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