|  | Circular Reference Warning | | |
| | | R Tanner |  |
|  Posted: Wed Sep 03, 2008 12:59 pm Post subject: Circular Reference Warning |  |
Hi,
I am getting a circular reference warning with my workbook when I open
it up. There are no indicators as to where the circular reference is
and it is a very big workbook. I have been doing alot of programming
with it - more programming than formulas. Any ideas how I can trace
it down?
Thanks |
| |
| | | Guest | |
| | Posted: Wed Sep 03, 2008 3:03 pm Post subject: Re: Circular Reference Warning | |
You can try using something like this:
As Worksheets("Sheet1").CircularReference only selects the first one
has to clear (content) of the found ref cell.
Sub FindCirRef()
Dim RefCell As Range
Dim Counter As Long
For Counter = 1 To 4
Set RefCell = Worksheets("Sheet1").CircularReference
RefCell.Copy
Worksheets("Sheet2").Cells(Counter, 1).PasteSpecial
Paste:=xlPasteFormulas
Worksheets("Sheet2").Cells(Counter, 2).Value = CStr(RefCell.Address)
RefCell.ClearContents
Next Counter
End Sub |
| |
|
|
