variable or with block variable not set

**kissfrito** · 10-15-2008, 03:22 PM

Hi all,

I'm having two problems with a program that I'm writing and I'm wondering if you could help me out:

1) In the following code, I have a collection of "Group" objects stored in "groups". I want to make a temp Group object to store an item from the collection. However, on the 2nd line below I keep getting: "Object variable or with block variable not set".

   

Dim currentGroup As Group
currentGroup = groups.Item(counter2)

2) I'm trying to retrieve an item from a variant array and convert it to an int using CInt, however on the fifth line below I get the error: "Type Mismatch"


Dim currentBit As Integer
Dim lineBits As Variant
Line Input #filePathNumber, lineString
lineBits = Split(lineString, ",")
currentBit = CInt(lineBits(bitCount))

Any help would be appreciated thanks.

KiSS

**Leith Ross** · 10-15-2008, 04:37 PM

Hello kissfrito,

In your first question, you define a variable as the type Group. Unless you have defined Group yourself as a UDT (User Defined Type), I am unaware of any such object type. This why you get the error.

In your second question, you are coercing a data type, presumably a string, into an integer. I don't see where you have assigned a value to bitCount. Also, if there is no comma present in lineString the Split function will return all of lineString. So, if bitCount exceeds the number of commas found or there are no commas present and lineString can not be evaluated to a number then you will get an error.

Sincerely,
Leith Ross