Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
12778 / 13665 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【8825】Findで検索した行の取得方法 ケリー 03/11/5(水) 9:49 質問
【8826】Re:Findで検索した行の取得方法 つん 03/11/5(水) 10:04 発言
【8827】Re:Findで検索した行の取得方法 ケリー 03/11/5(水) 10:11 お礼
【8825】Findで検索した行の取得方法
質問  ケリー  - 03/11/5(水) 9:49 -
引用なし
パスワード
   Findで見つけた行を削除したいのですが行番号の取得方法が
わかりません。分かる方教えてくださいお願いします。

　　Sheets("テスト").Select
　　With Worksheets("テスト").Range(Cells(2, 1), Cells(saisyugyo, 1))
　　　　Set c = .Find(a)
　　　　If Not c Is Nothing Then

　　　　　　　Rows(Findで検索した行番号).Delete

　　　　End If
　　End With
【8826】Re:Findで検索した行の取得方法
発言  つん E-MAIL  - 03/11/5(水) 10:04 -
引用なし
パスワード
   ケリー さん、おはようございます。

　　Rows(c.Row).Delete


これでええんでは？と思います。
【8827】Re:Findで検索した行の取得方法
お礼  ケリー  - 03/11/5(水) 10:11 -
引用なし
パスワード
   つんさん

できました、ありごうございます。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
12778 / 13665 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free