VBAが特定のセルの入力に優れていて、警告メッセージを追加する

Question

こんにちは、私はVBAコーディングには新しく、私と一緒に裸にしてください。

私は私が新製品の詳細を入力しようとしているワークシートを持っている。

1列は5桁の番号が必要です。私のコードがしたいことは、正確に5桁の数字ではない場合にこの番号が入力されたら、ジョブ番号を確認するように警告するメッセージボックスを送ります。

エントリが<> 5桁で、文字が含まれている場合は、警告メッセージが適用されます。しかし、私はまだエントリを受け入れるセルをしたいエントリ。

ありがとうございました！

Answer 1

私は単にそれが5桁の数字となりますので、9999と100000の間になるように範囲を変更Excel Data Validation

を使用します。または、標準のExcel式を使用してエントリを検証することもできます。

データ検証ダイアログでは、アラートまたはエラーメンテナンスを定義することもできます。詳細については

：Excel reference on data validation

Answer 2

これは、列Bのためにコード化されています。

置きワークシートのコード領域に、以下：それはワークシートのコードですので

Private Sub Worksheet_Change(ByVal Target As Range) 
    Dim rng As Range, r As Range, s As String, L As Long 
    Dim addy As String 
    Set rng = Intersect(Range("B:B"), Target) 
    If rng Is Nothing Then Exit Sub 
    For Each r In rng 
     s = r.Text 
     L = Len(s) 
     addy = r.Address(0, 0) 
     If L <> 5 Then 
      MsgBox "Please check " & addy 
     Else 
      For i = 1 To 5 
       If Not IsNumeric(Mid(s, i, 1)) Then 
        MsgBox "Please check " & addy 
       End If 
      Next i 
     End If 
    Next r 
End Sub 

、非常に簡単にインストールし、使用する自動化されて：

1. 近くタブ名を右クリックし、 Excelウィンドウの下部
2. [コードを表示]を選択すると、VBEウィンドウが表示されます。
3. VBEウィンドウを閉じて、VBEウィンドウを閉じます。

ご不明な点がございましたら、まず試用版のワークシートをお試しください。

ブックを保存すると、マクロが保存されます。 後で2003その後、Excelのバージョンを使用している場合は、マクロを削除するにはかなりの.xlsx

より.xlsmとして にファイルを保存する必要があります。

1. が
上記のようVBEウィンドウを持ち出しますアウト
2. はクリアコード
3. 参照、一般的にはマクロの詳細についてはVBEウィンドウに

を閉じる：

http://www.mvps.org/dmcritchie/excel/getstarted.htm

と

http://msdn.microsoft.com/en-us/library/ee814735(v=office.14).aspx

イベントマクロ（ワークシートのコード）の詳細については、以下を参照してください。これが動作するために

http://www.mvps.org/dmcritchie/excel/event.htm

マクロを有効にする必要があります！あなたのケースでは