Excel VBA質問箱 IV

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

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


71857 / 76734 ←次へ | 前へ→

【9370】今、やりたい事が出来ず・・・。
質問  ぴかる  - 03/12/1(月) 10:44 -

引用なし
パスワード
   ichinoseさん、りんさん、みなさん、こんにちは。

ichinoseさん、りんさん
ありがとうございます。試させて頂きました。うまくセルを認識してくれますね。
しかし、実力不足で応用する事が出来ませんでした。

困ってる内容のマクロ
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

  On Error GoTo AAA
  If (Target.Value = "") And (Range("N" & Target.Row) <> "") And _
    (Target.Row >= 19) And (Target.Row <= 28) And (Target.Column = 16) Then
    項目表示ON ’処理マクロ
  End If
  If (Target.Column = 14) Or (Target.Column = 17) Then
    SendKeys "%{DOWN}", True
  End If

AAA:
End Sub
上段の部分である処理を行い、下の部分では、入力規則のリストを表示させています。
今、エラー処理を行っているので動作はするのですが、(Target.Column = 14) が結合セルの為、エラーとなりリスト表示されません。
On Error Resume Next・On Error GoTo 0で上マクロを囲ってみましたが、うまく行きませんでした。何か良い方法は、ないでしょうか。よろしくお願いします。
2 hits

【9321】結合セルのSelectionChangeイベント ぴかる 03/11/28(金) 16:53 質問
【9322】Re:結合セルのSelectionChangeイベント ハマゾウ 03/11/28(金) 17:01 回答
【9323】Re:結合セルのSelectionChangeイベント INA 03/11/28(金) 17:18 回答
【9324】Re:結合セルのSelectionChangeイベント つん 03/11/28(金) 17:28 発言
【9325】Re:結合セルのSelectionChangeイベント ぴかる 03/11/28(金) 17:54 お礼
【9326】やっぱり、自分のミスでした。 ぴかる 03/11/28(金) 18:09 発言
【9327】こんな時は? ぴかる 03/11/28(金) 18:32 質問
【9328】Re:こんな時は? ichinose 03/11/28(金) 20:35 回答
【9329】Re:こんな時は?(無駄コードが・・) ichinose 03/11/28(金) 20:49 発言
【9342】Re:結合セルのSelectionChangeイベント りん 03/11/30(日) 10:38 回答
【9343】Re:結合セルのSelectionChangeイベント ichinose 03/11/30(日) 14:05 発言
【9344】Re:結合セルのSelectionChangeイベント りん 03/11/30(日) 14:22 発言
【9345】Re:結合セルのSelectionChangeイベント ichinose 03/11/30(日) 14:42 お礼
【9370】今、やりたい事が出来ず・・・。 ぴかる 03/12/1(月) 10:44 質問
【9374】Re:今、やりたい事が出来ず・・・。 ichinose 03/12/1(月) 12:50 回答
【9376】出来ました。 ぴかる 03/12/1(月) 13:43 お礼

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