Hi
I am trying to use the following code with a range of 175 cells, but it seems to stop working after 50 cells. Is there a limit to how many you can put in? I have tried doing named ranges on the sheet itself, but that doesnt seem to work (actually causes the VBA to stop).
Can anyone please help?
Code
[B]Private Sub Worksheet_Change(ByVal Target As Range)[/B]
If Not Intersect(Target, Range("A1:A10,B2,C5:D10")) Is Nothing Then
MsgBox "Hello"
End If
[B]End Sub[/B]
This is the full list of cells I am trying to use (ie the code will only fire when these cells change, on any worksheet within the workbook)
Code
[FONT=Calibri]=!$C$14:$L$14,!$C$17:$L$17,!$C$21:$L$21,!$C$24:$L$24,!$C$28:$L$28,!$C$31:$L$31,!$C$35:$L$35,!$C$38:$L$38,!$C$42:$L$42,!$C$45:$L$45,!$C$49:$L$49,!$C$52:$L$52,!$C$56:$L$56,!$C$59:$L$59,!$C$63:$L$63,!$C$66:$L$66,!$C$70:$L$70,!$C$73:$L$73,!$C$77:$L$77,!$C$80:$L$81,!$C$84:$L$84,!$C$87:$L$87,!$C$91:$L$91,!$C$94:$L$94,!$C$98:$L$98,!$C$101:$L$101,!$C$105:$L$105,!$C$108:$L$108,!$C$112:$L$112,!$C$115:$L$115,!$C$119:$L$119,!$C$122:$L$122,!$C$126:$L$126,!$C$129:$L$129,!$C$133:$L$133,!$C$136:$L$136,!$C$140:$L$140,!$C$143:$L$143,!$C$147:$L$147,!$C$150:$L$150,!$C$154:$L$154,!$C$157:$L$157,!$C$161:$L$161,!$C$164:$L$164,!$C$168:$L$168,!$C$171:$L$171,!$C$175:$L$175,!$C$178:$L$178,!$C$182:$L$182,!$C$185:$L$185,!$C$189:$L$189,!$C$192:$L$192,!$C$196:$L$196,!$C$199:$L$199,!$C$203:$L$203,!$C$206:$L$206,!$C$210:$L$210,!$C$213:$L$213,!$C$217:$L$217,!$C$220:$L$220,!$C$224:$L$224,!$C$227:$L$227[/FONT]