Visual Basic Programozás, segítsetek nekem
  • milyenferi
    #129
    Kezdőként én még csak az EXCEL-t szeretném egy kicsit megpatkolni.Csináltam egy formot, aminek a cikk textbox-ába kértem be adatot, az ellenőrzés után, ha nem megfelelő az érték szeretném kinullázni a változót és ismételten bekérni de nem tudok visszalépni.

    Private Sub Cikk_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    wcikk = Cikk.Value
    If Cikk = 0 Then
    ElseIf Cikk < 1000000000 Then
    MsgBox "Ez nem cikkszám"
    ElseIf Cikk > 9999999999# And Cikk < 1000000000000# Then
    MsgBox "Ez nem cikkszám"
    ElseIf Cikk > 9999999999999# Then
    MsgBox "Ez nem cikkszám"
    End If