I
Iain King
My vb code is mysteriously aborting without any error or warning.
It's got me puzzled in the extreme. The following code copies values
from cells from one sheet into the columns of a row on a second sheet
(with debugging stuff added):
For Each n In ScanSetup.Names
If Left(n.Name, 4) = "EDIT" And n.Name <> "EDIT_ClientTitle"
Then
tail = Mid(n.Name, 6)
Debug.Print Sheets("Records").Cells(row, Range("RECORDS_"
+ tail).Column).Value
Debug.Print Sheets("Edit").Range(n.Name).Value
Stop
Sheets("Records").Cells(row, Range("RECORDS_" +
tail).Column).Value = _
Sheets("Edit").Range(n.Name).Value
Stop
End If
Next
It prints off the debugs fine, so the cell references are ok. It hits
the first stop, but then terminates. The value in the destination
cell is unchanged. Any ideas?
Iain
It's got me puzzled in the extreme. The following code copies values
from cells from one sheet into the columns of a row on a second sheet
(with debugging stuff added):
For Each n In ScanSetup.Names
If Left(n.Name, 4) = "EDIT" And n.Name <> "EDIT_ClientTitle"
Then
tail = Mid(n.Name, 6)
Debug.Print Sheets("Records").Cells(row, Range("RECORDS_"
+ tail).Column).Value
Debug.Print Sheets("Edit").Range(n.Name).Value
Stop
Sheets("Records").Cells(row, Range("RECORDS_" +
tail).Column).Value = _
Sheets("Edit").Range(n.Name).Value
Stop
End If
Next
It prints off the debugs fine, so the cell references are ok. It hits
the first stop, but then terminates. The value in the destination
cell is unchanged. Any ideas?
Iain