vb.netでのif文について

vb.netでエクセルを操作する
プログラムを作ってて、

Dim xlrange As Excel.Range
Dim xlcells As Excel.Range

xlrange=xlcells(1,1)

if xlrange.value<>"*合計*" then
xlrange.value=""
end if

というプログラムを考えたのですが、
うまくいきません。
if文の条件にxlrange.valueは使えるのでしょうか？

No.1 ベストアンサー 回答者： n-jun 回答日時： 2013/06/01 09:11

>if xlrange.value<>"*合計*" then

これってxlrange.value　の値が　"*合計*"　と言う文字列かどうかを
判定しているんですよ。
なのでたぶんですけど目的とは違うでしょうね。

"合計"と言う文字を含む判定なら、

if xlrange.value Like "*合計*" then

です。
⇒含まないって事なら

if Not xlrange.value Like "*合計*" then

それを否定すれば良い。

この回答へのお礼

回答ありがとうございます。


if文で文字を含む判定には
LikeかNot Like
を使うんですね。
勉強になりました。

お礼日時：2013/06/01 21:47