Excel VBA質問箱 IV

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

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


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

63199 / 76738

←次へ　｜　前へ→


	【18138】Re:入力時にセルスキップしたい

ackkn - 04/9/16(木) 13:25 -


	引用なし

	パスワード

▼IROC さん：
>列ごとならこんな感じで・・
>
>select case target.column
>case 1,3
>　 target.offset(0,2).select
>case 5
>　 target.offset(0,3).select
>End select
IROC さん、なりました！
でも、カーソル移動の際もスキップさせたいので、SelectionChangeイベントなる物を見つけて、同じようにやったのですが（下記コード）、６へ移動すると１２までスキップしてしまい（当然の結果）８で止めれません。
何とか止めて６→８→１０→１２と移動させたいのですが...
よろしくお願いします。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
　　Select Case Target.Column
　　　　Case 6, 8, 10, 13, 15, 17
　　　　　　Target.Offset(0, 2).Select
　　End Select
End Sub

0 hits

▼

【18120】入力時にセルスキップしたい ackkn 04/9/16(木) 9:02