VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Eingabe von Werten verhindern, wenn Wert in Nebenspalte

Gruppe

Allgemein

Bereich

Zelle

Thema

Eingabe von Werten verhindern, wenn Wert in Nebenspalte

Problem

Die Eingabe von Werten in den Spalten A bzw. B soll verhindert werden, wenn in der jeweiligen Korrespondenzzelle der anderen Spalte bereits ein Wert vorhanden ist.

Lösung

Nur anhand einer Beipspielarbeitsmappe darstellbar.




ClassModule: Tabelle1

ClassModule: frmNurPositiv

Private Sub cmdContinue_Click()
    Unload Me
End Sub

Private Sub txtValue_KeyDown( _
   ByVal KeyCode As MSForms.ReturnInteger, _
   ByVal Shift As Integer)
   Dim sTxt As String
   If KeyCode = 189 Then
      KeyCode = 0
   End If
End Sub

StandardModule: basMain

Sub CallForm()
   frmNurPositiv.Show
End Sub

    


Beiträge aus dem Excel-Forum zu den Themen Allgemein und Zelle