VB2010にて部分一致検索についての質問です。
DataGridView1のセル(0,0)に文章(例:The apple is red.)
があって、DataGridView2のセル(1,1)に単語(2つ以上も可能とする)(例:apple is)
が入っていたとします。
DataGridView2のセル(1,1)に入っている単語がDataGridView1(0,0)のセルに入っている文章に含まれていたら、OKを返すという条件文を作りたいのですが、どう書いたらいいのかわかりません。
ご教授いただけると嬉しいです。よろしくお願いします。例は文中の単語検索ですが、可能ならば文頭、文末の検索にも対応していただけると嬉しいです。
No.1ベストアンサー
- 回答日時:
例えばこんな感じで
Dim s1 As String = "The apple is red."
' 部分一致
Dim s2 As String = "apple is"
dim r2 As String
If s1.Contains(s2) Then
r2 = "OK"
Else
r2 = "NG"
End If
' 前方一致
Dim s3 As String = "The apple"
Dim r3 As String
If s1.StartsWith(s3) Then
r3 = "OK"
Else
r3 = "NG"
End If
' 後方一致
Dim s4 As String = "is red."
dim r4 As String
If s1.EndsWith(s4) Then
r4 = "OK"
Else
r4 = "NG"
End If
お礼が遅くなって申し訳ありません。
VBにはこんな便利な関数があったのですね。。。色々調べてみたのですが、hitせずまだまだ勉強不足です。
本当に助かりました。ありがとうございました!
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) VBA 検索と入力 Excel ブック ぶぶぶ シート ししし 列V 検索対象の列です 最終行は、お 6 2023/05/17 01:40
- Excel(エクセル) 【Excel】指定のセル内容を基に別シートのセルを検索して選択する【VBA】 1 2022/06/16 16:16
- Excel(エクセル) Excelヘルプの原文を表示する最速の方法(手順)には? 1 2023/08/11 11:30
- Excel(エクセル) エクセルの数式で教えてください。 1 2023/02/08 09:05
- Word(ワード) Wordで作った資料の修正方法 2 2023/06/19 00:51
- Excel(エクセル) エクセルの条件付き書式で*を使いたい 4 2022/05/13 16:49
- オープンソース Python openpyxlを使用したセル番地の使用について 1 2023/08/03 22:05
- Excel(エクセル) 指定値をマクロで検索&シート移動 2 2022/04/27 23:29
- Excel(エクセル) エクセルの数式で教えてください。 1 2023/03/09 14:24
- Visual Basic(VBA) EXCEL VBA 単語置き換え について質問です ブック名 ぶぶぶ シート名 ししし セル V3〜 3 2023/03/08 01:41
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAマクロ実行時エラーの修正に...
-
Excel UserForm の表示位置
-
エクセルVBA 配列からセルに「...
-
Excelで空白セル直前のセルデー...
-
【Excel VBA】一番右端セルまで...
-
VBA にて、条件付き書式で背景...
-
エクセルの合計を自動で表示さ...
-
特定の色のついたセルを削除
-
VBA 複数条件の分岐処理の上手...
-
excelで結合セルの場合にエラー...
-
昨日、質問した件『VBA にて、...
-
VBAでユーザーフォームにセル値...
-
【VBA】【ユーザーフォーム_Lis...
-
VB.netでのExcelデータの読み込み
-
Excel VBA でFunctionプロシジ...
-
VBAの一次元配列から二次元配列へ
-
「Spread」のセルを移動させる...
-
CSVファイルを読み込んだらセル...
-
マクロのコマンドボタンの位置...
-
VBA 特定のセルからoffsetされ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBAマクロ実行時エラーの修正に...
-
エクセルVBA 配列からセルに「...
-
VBA 複数条件の分岐処理の上手...
-
Excelで空白セル直前のセルデー...
-
Excel UserForm の表示位置
-
EXCEL VBA 文中の書式ごと複写...
-
特定の色のついたセルを削除
-
VBA にて、条件付き書式で背景...
-
VBAでユーザーフォームにセル値...
-
【VBA】写真の貼り付けコードが...
-
【Excel VBA】一番右端セルまで...
-
Excel VBAでCheckboxの名前を変...
-
エクセルの合計を自動で表示さ...
-
【VBA】【ユーザーフォーム_Lis...
-
VBA:日付を配列に入れ別セルに...
-
Excel VBA IF文がうまく動作し...
-
下記のマクロの説明(意味)を...
-
入力規則のリスト選択
-
C# DataGridViewで複数選択した...
-
関数の引数でrangeを指定したとき
おすすめ情報