Run Time Error '94' Invalid use of null

**stoey** · 11-27-2008, 04:21 PM

hi again,

I am receiving the error message Run Time Error '94' Invalid use of null when running my program.

here is the code where the error is being caused:

Private Sub UserForm_Initialize()
    Dim stSheetName As String
    Const DATE_RANGE As String = "G10:G100"
    Const TITLE_RANGE As String = "h10:h100"
    Const TIME_RANGE As String = "i10:i100"
    stSheetName = Worksheets("Database").Name
    Set Mydata = Worksheets("Database").Range("A1").CurrentRegion   'database
    UserIDTextBox.SetFocus
    lbldate.Caption = Range(DATE_RANGE).Text
    lbltitle.Caption = Range(TITLE_RANGE).Text
    lbltime.Caption = Range(TIME_RANGE).Text

        
End Sub

thanks,

stoey

**Shijesh Kumar** · 11-27-2008, 04:24 PM

The error generally mean that you are trying to use an object / item which is not defined..

Might be you text box name is spelt differently and you are trying to call it by different spelling

If you can post the workbook , we can try to find the error

**stoey** · 11-27-2008, 04:43 PM

here's the sample workbook requested

**royUK** · 11-27-2008, 04:54 PM

You are tring to load data from 90 cells into one label, most of which are empty so there is nothing to display.

Why are you doing this?

**Shijesh Kumar** · 11-27-2008, 05:06 PM

error is in this part of code

   Const DATE_RANGE As String = "g10:g10"
    Const TITLE_RANGE As String = "h10:h100"
    Const TIME_RANGE As String = "i10:i100"

in the first line you have defined a range G10:G100... which will have 90 different values..

And in the below code u are calling that 90 values in one text box .. which is not possible...

try modifying the above code to
"G10:G10" " , "h10:h10" and "i10:i10"

    lbldate.Caption = Range(DATE_RANGE).Text
    lbltitle.Caption = Range(TITLE_RANGE).Text
    lbltime.Caption = Range(TIME_RANGE).Text

**stoey** · 11-27-2008, 05:15 PM

hi,

to answer roy's question:

You are tring to load data from 90 cells into one label, most of which are empty so there is nothing to display.

Why are you doing this?

i would like to display the training,time and date using label on a userform. So if a user enters the training, time and date title on any of the cells on that column, the values will still appear on the userform. any suggestions you have to improve this?

question to Shijesh,
will the values entered in any of those cells under the training,time and date be displayed still on the userform?