[[20060728110658]]　『指定したセルに入力』（めめすけ）　ページの最後に飛ぶ

『指定したセルに入力』（めめすけ）

あるセルが空白だと次のセルに進めなくすることってできますか？

たとえば、【東京都】と入力しないと【○○区】の欄が入力できない
という感じです。

Win XP Excel2002

 多分、これだけの情報では回答は難しいかと...
左の列に入力がなされていない場合、強制的に左に移動させるマクロの試作品です。
シートモジュール（＼Sheet1／←ここを右クリックしてコードの表示を選択して出てくる画面）
に貼り付けて使います。
叩き台ということで...
(ROUGE)
'----
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With ActiveCell
    If .Column > 1 Then
        If .Offset(, -1).Value = "" Then
            .Offset(, -1).Activate
        End If
    End If
End With
End Sub

さっそくのご解答ありがとうございました。
参考にさせていただきます。　

決まったセルに入力してもらわないとデータとして
成り立たないのに空白にする人がいるんです(-_-;)

マクロは苦手ですががんばってみます。（めめすけ）

 入力規則を使う方法です。

    A     B      C	     D        E
 1  氏名  住所1  住所2   住所3   住所4
 2					
 3					
こんな感じで表組されているとして、C列以降に規制を掛けます。
C2:E3セルを選択し、 
 【データ】-【入力規則】-『設定』タブ　と進み、
入力値の種類：ユーザー設定　を選択
数式：=COUNTBLANK($B2:B2)=0　と入力
 『エラーメッセージ』タブ　をクリックし、
◆『無効なデータが入力されたらエラーメッセージを表示する』にチェックを入れて（確認して）
スタイル：停止　を選択
タイトル：漏れてまっせー！　←入力の一例
エラーメッセージ：左から順に入力してけろ。　←入力の一例
 『スタイル』部分を[注意]や[情報]にすると、入力内容を取り消さなくてすみます。
違いは、お試しあれ。その上で、適するものをお選び下さい。

 >決まったセルに入力してもらわないとデータとして成り立たないのに空白にする人がいるんです
決ったセルが、左から順番で無い場合は、スペースキーで入力してパスさせるとか、
スタイルを注意にしておくとか　になるのかな？
(sin)

 衝突しました。[sin]さんと重なるけどせっかくなので掲載します。

 例えばB1セルの入力規則で、入力値の種類を「ユーザー設定」、数式を「=A1<>""」とします。
 A1に未入力だとB1に入力できませんが、A1に文字でも数字でも何かが入っていれば、
 B1に入力できます。
 (ちゅうねん)

 わわわわわ。
 いつのまにかみなさんありがとうございます。
 sinさんの【入力してけろ】そのまま使わせていただきます！！
 さっそく実際のシートでやってみます。
（めめすけ）

コメント返信：

[ 一覧(最新更新順) ]

[[20060728110658]] 『指定したセルに入力』（めめすけ） ページの最後に飛ぶ

[[20060728110658]]　『指定したセルに入力』（めめすけ）　ページの最後に飛ぶ