xcel 2000 Vs xcel97

[SIXTH SENSE]

hi everyone!
Is this expression not supported in xcel '97

<font face=Courier New>        <SPAN style="color:#00007F">Set</SPAN> X1 = Worksheets("Training Log").Range("C" & FIRST & ":C" & LAST)
            TMP = X1.Value
            Worksheets("90R Data").Range("B2:B91") = TMP</FONT>

this works fine in 2000. But I got a feed back that he
gets and error of

"Compile Error: Can't assign to Array"

thanks

 

[Colo]

Hi SIXTH SENSE,

I think it works in 97. In this case a variable named TMP should be a Variant type.
In your code, since the declaration part was omitted so a variable TMP has been treated as Variant type.
k, to make sure the problem I'll re-write your code as simple one.

Sub TEST()
    Dim X1 As Range
    Dim TMP As Variant
    Set X1 = Worksheets(1).Range("A1:A10")
    TMP = X1.Value
    Worksheets(1).Range("B1:B10").Value = TMP
End Sub

 

[NateO]

Agreeing with Colo, this is going to be true of any quick-stacked array eh, e.g.,

<font face=Courier New><SPAN style="color:darkblue">Sub</SPAN> Quick_Stack()
<SPAN style="color:darkblue">Dim</SPAN> myArr1 <SPAN style="color:darkblue">As</SPAN> <SPAN style="color:darkblue">Variant</SPAN>, myArr2 <SPAN style="color:darkblue">As</SPAN> <SPAN style="color:darkblue">Variant</SPAN>, myArr3 <SPAN style="color:darkblue">As</SPAN> <SPAN style="color:darkblue">Variant</SPAN>
myArr1 = Array(1, 2, 3)
myArr2 = [{1,2,3}]
myArr3 = [Transpose(Offset(O11,(Row(1:5)-1)*7+1,0,1,3))]
<SPAN style="color:darkblue">Debug</SPAN>.<SPAN style="color:darkblue">Print</SPAN> myArr3(UBound(myArr3)).Address
<SPAN style="color:darkblue">End</SPAN> <SPAN style="color:darkblue">Sub</SPAN></FONT>

 

[SIXTH SENSE]

Hi SIXTH SENSE,

I think it works in 97. In this case a variable named TMP should be a Variant type.
In your code, since the declaration part was omitted so a variable TMP has been treated as Variant type.
k, to make sure the problem I'll re-write your code as simple one.

Sub TEST()
    Dim X1 As Range
    Dim TMP As Variant
    Set X1 = Worksheets(1).Range("A1:A10")
    TMP = X1.Value
    Worksheets(1).range("B1:B10").Value = TMP
End Sub

Thanks colo.

I declare the variable tmp as

       dim tmp()

which I think by difualt is variant!
Is it something different from

      dim tmp as variant

TY.

 

[Colo]

Thanks colo.

I declare the variable tmp as

       dim tmp()

which I think by difualt is variant!
Is it something different from

      dim tmp as variant

TY.

Hi, SS!

It's different. TMP() is treated as an array/variant.

Sub Test1()
    Dim TMP()
    Debug.Print TypeName(TMP)
    Debug.Print IsArray(TMP)
End Sub

Sub Test2()
    Dim TMP
    Debug.Print TypeName(TMP)
    Debug.Print IsArray(TMP)
End Sub