View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Code Johnny[_2_] Code Johnny[_2_] is offline
external usenet poster
 
Posts: 2
Default Correct VBA for DO WHILE i.e. X=X AND NOT RS.EOF

Nothing wrong with how you're doing it, however you may wish to try using
the Recordset as the main section of the loop, and the test inside that loop.
Something like the following.
'New Version of Case #1
Do While Not RS.EOF
'01 - Test for TranNumMem
If TranNumMem = TransactionsRS!TranNum Then Exit Do
' xxxxxxx
' xxxxxxx

RS.movenext
Loop 'While Not RS.EOF




" wrote:

2003/2007

Attempting to:

CASE #1

Do While TranNumMem = TransactionsRS!TranNum AND NOT RS.EOF

' xxxxxxx
' xxxxxxx
rs.movenext
Loop

The clause TranNumMem = TransactionsRS!TranNum works but the
AND NOT RS.EOF is not working

I worked around with:

CASE #2

Do While TranNumMem = TransactionsRS!TranNum

' xxxxxxx
' xxxxxxx
rs.movenext
If RS.EOF Then Exit Do

Loop


How could I make CASE #1 work??

TIA EagleOne