Excel VBA質問箱 IV

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

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


51070 / 76732 ←次へ | 前へ→

【30537】Re:否定の方法
回答  VBAビギナー  - 05/10/29(土) 18:10 -

引用なし
パスワード
   回答有難うございます。

If Target.Address = "$A$3" Then
 If Target.Value = "佐藤" Or Target.Value = "田中" Or Target.Value = "森" Then
  MsgBox "OK"
  Exit Sub '・・・1.
 Else
  MsgBox "名前が見つかりません" & vbCrLf & Target.Address & " " & Target.Value
 End If
Else
 MsgBox "入力チェック範囲外 " & Target.Address
End If
このコードで実行してみましたが、A3のセルに佐藤と入力すると、
「入力チェック範囲外 $B$3」
という風に表示されます。
If Target.Address = "$A$3" Then
でA3のセルを取得しているはずなのになぜ
MsgBox "入力チェック範囲外 " & Target.Address
で$B$3と表示されるのがわかりません。
ちなみに
MsgBox "名前が見つかりません" & vbCrLf & Target.Address & " " &
ではきちんと
「名前がみつかりません
$A$3 名前」
というように表示されます。
0 hits

【30513】否定の方法 VBAビギナー 05/10/29(土) 9:03 質問
【30514】Re:否定の方法 かみちゃん 05/10/29(土) 9:18 回答
【30515】Re:否定の方法 VBAビギナー 05/10/29(土) 9:55 回答
【30516】Re:否定の方法 かみちゃん 05/10/29(土) 10:15 回答
【30517】Re:否定の方法 VBAビギナー 05/10/29(土) 10:52 回答
【30522】Re:否定の方法 かみちゃん 05/10/29(土) 11:33 発言
【30528】Re:否定の方法 VBAビギナー 05/10/29(土) 12:52 回答
【30529】Re:否定の方法 かみちゃん 05/10/29(土) 13:07 回答
【30537】Re:否定の方法 VBAビギナー 05/10/29(土) 18:10 回答
【30538】Re:否定の方法 かみちゃん 05/10/29(土) 18:24 発言
【30539】Re:否定の方法 VBAビギナー 05/10/29(土) 18:58 回答
【30540】Re:否定の方法 かみちゃん 05/10/29(土) 19:09 発言
【30542】Re:否定の方法 VBAビギナー 05/10/29(土) 23:17 お礼

51070 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free