S
Stuart
User has selected a folder, and I'm opening each file in the
folder in turn, working on it, leaving it open, and then opening
the next.
Whatever I try, I cannot get past the file "Vln 2 Barn 4.xls".
This sequence throws the error:... "The cell or chart you are
trying to change is protected, and therefore Read Only etc":
If C.Offset(0, 9).Value = "0" Then
C.Offset(0, 5).Value = Round(C.Value * C.Offset(0, 2).Value, 2)
ElseIf C.Offset(0, 9).Value = "5" Then
C.Offset(0, 6).Value = Round(C.Value * C.Offset(0, 2).Value, 2) ###
ElseIf C.Offset(0, 9).Value = "17.5" Then
C.Offset(0, 7).Value = Round(C.Value * C.Offset(0, 2).Value, 2)
End If
and the ### line is highlighted.
If I check each sheet, I find them all to be unprotected.
At this point variables in locals tells me that
C = D11
ws = Substructure 'the sheet being operated on
Actingonwkbk = "Vln 2 Barn 4.xls"
If I check D11, I find it empty/blank, and this is the same for
C.Offset(0, 9). However, if I hover over the code, then I'm
told that C.Offset(0, 9) = 5
I've used Format>Cells>Font>Automatic, but cannot see any values.
Can anyone help, please?
Regards.
folder in turn, working on it, leaving it open, and then opening
the next.
Whatever I try, I cannot get past the file "Vln 2 Barn 4.xls".
This sequence throws the error:... "The cell or chart you are
trying to change is protected, and therefore Read Only etc":
If C.Offset(0, 9).Value = "0" Then
C.Offset(0, 5).Value = Round(C.Value * C.Offset(0, 2).Value, 2)
ElseIf C.Offset(0, 9).Value = "5" Then
C.Offset(0, 6).Value = Round(C.Value * C.Offset(0, 2).Value, 2) ###
ElseIf C.Offset(0, 9).Value = "17.5" Then
C.Offset(0, 7).Value = Round(C.Value * C.Offset(0, 2).Value, 2)
End If
and the ### line is highlighted.
If I check each sheet, I find them all to be unprotected.
At this point variables in locals tells me that
C = D11
ws = Substructure 'the sheet being operated on
Actingonwkbk = "Vln 2 Barn 4.xls"
If I check D11, I find it empty/blank, and this is the same for
C.Offset(0, 9). However, if I hover over the code, then I'm
told that C.Offset(0, 9) = 5
I've used Format>Cells>Font>Automatic, but cannot see any values.
Can anyone help, please?
Regards.