Excel VBA質問箱 IV

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

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


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

37934 / 76738

←次へ　｜　前へ→


	【43950】Re:ワイルドカードの使い方

りん

- 06/10/30(月) 21:12 -


	引用なし

	パスワード

ToShiYo さん、こんばんわ。
>ワイルドカード「＊」の使い方を教えてください。
今回の内容には不要そうなので省略します。

>数字の一桁目が「７」の数字をピックアップしたいのですが･･･
>ワイルドカードを使っての表現はどのようにすると良いのでしょうか。
>７、１７、２７・・・・・１０７等の一桁目が「７」の数字を
>検索したいのですが、うまく行きません。

>Dim R As Range
>Dim MyR As Range
>Set MyR = Range("A1", Range("A65536").End(xlUp))
>For Each R In MyR
'セルRの値が数値限定ですが、10で割ると余が７
If R.Value mod 10 =　7 Then
>　R.Interior.ColorIndex = 34
>End If
>Next

文字列ならRight(r.Value,1)=7と、右１文字で判定します。

0 hits

▼

【43949】ワイルドカードの使い方 ToShiYo 06/10/30(月) 21:08