ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   For control variable already in use (https://www.excelbanter.com/excel-programming/436604-control-variable-already-use.html)

Otto Moehrbach[_2_]

For control variable already in use
 
Excel 2007, Win 7 64-bit
I have the following code. Note that this is a self-standing macro. This
macro is not called by any other macro. It is executed by a Forms button.
There are 3 FOR loops, none nested

Sub SortByName()
With Sheets("SortSht")
Copy & Paste
Set rColA =...................
For cc = rColA.Count To 2 Step -2
Stuff
Next cc
For cc = rColA.Count To 1 Step -1
Stuff
Next cc
For cc = rColA.Count To 1 Step -1
Stuff
Next cc
End With
End sub

I get an error with the bottom FOR loop. Error reads "For control variable
already in use". I change the variable in that FOR loop to "c". I get the
same identical error but now in the second FOR loop. What is wrong with
this code? Thanks for your time. Otto


Barb Reinhardt

For control variable already in use
 
Have you declared all of your variables?

Barb Reinhardt



"Otto Moehrbach" wrote:

Excel 2007, Win 7 64-bit
I have the following code. Note that this is a self-standing macro. This
macro is not called by any other macro. It is executed by a Forms button.
There are 3 FOR loops, none nested

Sub SortByName()
With Sheets("SortSht")
Copy & Paste
Set rColA =...................
For cc = rColA.Count To 2 Step -2
Stuff
Next cc
For cc = rColA.Count To 1 Step -1
Stuff
Next cc
For cc = rColA.Count To 1 Step -1
Stuff
Next cc
End With
End sub

I get an error with the bottom FOR loop. Error reads "For control variable
already in use". I change the variable in that FOR loop to "c". I get the
same identical error but now in the second FOR loop. What is wrong with
this code? Thanks for your time. Otto

.


OssieMac

For control variable already in use
 
Hi Otto,

Without seeing what code you have in "Stuff' I am guessing that you might
have got something like an End With and Next out of order somewhere or maybe
another For/Next and have mixed up their order by having Next addressing the
wrong variable. eg. Next cc where next c should be.

If you can't find the problem then can you post all of your code.

--
Regards,

OssieMac



Otto Moehrbach[_2_]

For control variable already in use
 
Barb & Ossie
Yes, I declared all my variables and have "Option Explicit". The
"Stuff" is simple copy/paste code with no For loops or Withs/End Withs.
That is what is so perplexing about this. The entire macro is a very simple
macro consisting of nothing more than moving data around. Thanks for your
time. Otto

"Otto Moehrbach" wrote in message
...
Excel 2007, Win 7 64-bit
I have the following code. Note that this is a self-standing macro. This
macro is not called by any other macro. It is executed by a Forms
button. There are 3 FOR loops, none nested

Sub SortByName()
With Sheets("SortSht")
Copy & Paste
Set rColA =...................
For cc = rColA.Count To 2 Step -2
Stuff
Next cc
For cc = rColA.Count To 1 Step -1
Stuff
Next cc
For cc = rColA.Count To 1 Step -1
Stuff
Next cc
End With
End sub

I get an error with the bottom FOR loop. Error reads "For control
variable already in use". I change the variable in that FOR loop to "c".
I get the same identical error but now in the second FOR loop. What is
wrong with this code? Thanks for your time. Otto



Otto Moehrbach[_2_]

For control variable already in use
 
Found it!!!
I wrote this code for an OP. He was having this problem. I found out this
morning that I was NOT having this problem with the same file. I sent him
mine and all is well. I figure his code got corrupted. Thanks again. Otto

"Otto Moehrbach" wrote in message
...
Excel 2007, Win 7 64-bit
I have the following code. Note that this is a self-standing macro. This
macro is not called by any other macro. It is executed by a Forms
button. There are 3 FOR loops, none nested

Sub SortByName()
With Sheets("SortSht")
Copy & Paste
Set rColA =...................
For cc = rColA.Count To 2 Step -2
Stuff
Next cc
For cc = rColA.Count To 1 Step -1
Stuff
Next cc
For cc = rColA.Count To 1 Step -1
Stuff
Next cc
End With
End sub

I get an error with the bottom FOR loop. Error reads "For control
variable already in use". I change the variable in that FOR loop to "c".
I get the same identical error but now in the second FOR loop. What is
wrong with this code? Thanks for your time. Otto




All times are GMT +1. The time now is 10:39 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com