Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

4181 / 13658 ﾂﾘｰ

←次へ　｜　前へ→

▼

【58077】A列を走査し、特定文字以下をdeleteしたい 初心者 08/10/1(水) 15:05

【58078】Re:A列を走査し、特定文字以下をdeleteした... マクロマン 08/10/1(水) 15:07

【58079】Re:A列を走査し、特定文字以下をdeleteした... マクロマン 08/10/1(水) 15:25

【58084】Re:A列を走査し、特定文字以下をdeleteした... Abebobo 08/10/1(水) 16:37


	【58077】A列を走査し、特定文字以下をdeleteしたい

初心者 - 08/10/1(水) 15:05 -


	引用なし

	パスワード

A列のどこかに検証からはじまる文字列があります。

A列を上から走査し、検証を含む文字列を発見した場合、そこから下(検証含む)を全てをdeleteしたいのです。

できますでしょうか？

ご教示の程宜しくお願い致します。


	【58078】Re:A列を走査し、特定文字以下をdeleteし...

マクロマン - 08/10/1(水) 15:07 -


	引用なし

	パスワード

セル範囲をループで見ていく方法もありますが、
今回のような場合は、
Findメソッド
がいいかもしれません。


	【58079】Re:A列を走査し、特定文字以下をdeleteし...

マクロマン - 08/10/1(水) 15:25 -


	引用なし

	パスワード

取得したセルから最終行までのセルの取得に関しては、↓が参考になると思います。

tp://www.asahi-net.or.jp/~ef2o-inue/vba_k/sub04_070_10.html
tp://www.asahi-net.or.jp/~ef2o-inue/vba_o/sub05_030_100.html


	【58084】Re:A列を走査し、特定文字以下をdeleteし...

Abebobo - 08/10/1(水) 16:37 -


	引用なし

	パスワード

マクロマンさんから　Find　の提案がありましたので
その次の段階です。

Sub t()
　Dim Tr　As Range　　'実際は　Find　で見つかったRangeです
　Set Tr = ActiveCell
　Tr.Value = Left(Tr.Value, InStr(Tr.Value, "検証") - 1)
End Sub


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

4181 / 13658 ﾂﾘｰ

←次へ　｜　前へ→

ページ：

┃

記事番号：

(SS)C-BOARD v3.8 is Free