vba outcome
 

can anyone tell me if theres any errors in this and what the outcome
would be?

sub test ()

dim I, J As Integer
dim x as single
for i = 1 to length
for j = 1 to (length - i)
If A(j) < A )j +1) Then
x = a(j +1) = A(j)
A(j) = x
end if
next j
next i
end sub

vba outcome
 

There are few errors in this code

1. I and J are declared as 'I' and 'J' whereas they are used as 'i' and 'j'.
VBA treats variables in small and upper case different.

2. If you are using Option Explicit, this will throw an error as i and j
(small case) are not defined.

3. variable 'length' is not defined


--
Pranav Vaidya
VBA Developer
PN, MH-India
If you think my answer is useful, please rate this post as an ANSWER!!


"harry buggy" wrote:

can anyone tell me if theres any errors in this and what the outcome
would be?

sub test ()

dim I, J As Integer
dim x as single
for i = 1 to length
for j = 1 to (length - i)
If A(j) < A )j +1) Then
x = a(j +1) = A(j)
A(j) = x
end if
next j
next i
end sub

vba outcome
 

There are few errors in this code

1. I and J are declared as 'I' and 'J' whereas they are used as 'i' and
'j'.
VBA treats variables in small and upper case different.

2. If you are using Option Explicit, this will throw an error as i and j
(small case) are not defined.

This is not true. In VBA, letter casing does not matter. As a matter of
fact, if you Dim your variable in upper case letters and then, in your code,
type it in using lower case letters, VBA will change the case to match that
used in the Dim statement. If you don't Dim the variable (of course you
always should, but if you didn't), VBA will change the letter casing for
**all** uses of that variable to match the letter casing you used the last
time you typed the variable's name.

Rick