Error '1004'
Why does setting the RefersTo value cause a run-time error 1004 ?
Sub Macro_Change_Function() ' ' Macro_Change_Function Macro ' ' If Sheet2.CheckBoxes("Check Box 23").Value = False Then Sheet2.CheckBoxes("Check Box 23").Value = True Else Sheet2.CheckBoxes("Check Box 23").Value = True End If z = Sheets("Settings").Range("XLQ_Functions") x = GetRefersTo("Fill_Formula") a = SEARCHFORMULA(z, x) b = ("xlqh") & Sheets("Settings").Range("Data_Type") y = Application.Substitute(x, a, b) ActiveWorkbook.Names("Fill_Formula").RefersTo = y End Sub - Ronald K. |
Error '1004'
kittronald explained :
Why does setting the RefersTo value cause a run-time error 1004 ? Sub Macro_Change_Function() ' ' Macro_Change_Function Macro ' ' If Sheet2.CheckBoxes("Check Box 23").Value = False Then Sheet2.CheckBoxes("Check Box 23").Value = True Else Sheet2.CheckBoxes("Check Box 23").Value = True End If z = Sheets("Settings").Range("XLQ_Functions") x = GetRefersTo("Fill_Formula") a = SEARCHFORMULA(z, x) b = ("xlqh") & Sheets("Settings").Range("Data_Type") y = Application.Substitute(x, a, b) ActiveWorkbook.Names("Fill_Formula").RefersTo = y End Sub - Ronald K. Debug.Print y to see what it is. -- Garry Free usenet access at http://www.eternal-september.org ClassicVB Users Regroup! comp.lang.basic.visual.misc |
Error '1004'
Garry,
Just so everyone knows ... there's a 255 character limit for a name's Refers to: value. Of course, ... I already knew that. 8o - Ronald K. |
Error '1004'
on 10/11/2011, kittronald supposed :
Garry, Just so everyone knows ... there's a 255 character limit for a name's Refers to: value. Of course, ... I already knew that. 8o - Ronald K. Yes, I know that! I've never tried (via code) to enter anything longer so are you saying the length exceeded the limit and so the error? -- Garry Free usenet access at http://www.eternal-september.org ClassicVB Users Regroup! comp.lang.basic.visual.misc |
Error '1004'
Garry,
That was the problem. - Ronald K. |
All times are GMT +1. The time now is 09:04 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com