Option Explicit
Private Trial As Long
[CODE]
Private Sub cmdCheck_Click()
'Declare the variables
Dim AddData As Range
Dim user As Variant
Dim Code As Variant
Dim result As Integer
Type: Posts; User: bhandari
Option Explicit
Private Trial As Long
[CODE]
Private Sub cmdCheck_Click()
'Declare the variables
Dim AddData As Range
Dim user As Variant
Dim Code As Variant
Dim result As Integer