以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  其他  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=150696)

--  作者：发财 --  发布时间：2020/6/5 9:48:00 --  其他 请问老师如下VB代码，为何提示该代码错误： .Add 3, 1, 1, "=iv1:iv" & i  ，应如何改？  Dim arr(), i&, c As Range     ReDim arr(1 To Range("科目1").Cells.Count, 1 To 1)     For Each c In Range("科目1").Cells         i = i + 1         arr(i, 1) = c.Value     Next     [iv1].Resize(i) = arr     With Range("i1").Validation         .Delete         .Add 3, 1, 1, "=iv1:iv" & i     End With

--  作者：有点蓝 --  发布时间：2020/6/5 10:20:00 --   vb我不懂

--  作者：发财 --  发布时间：2020/6/5 16:56:00 --   请问老师：如何用代码生成EXCEL表定义名称的引用变量？

--  作者：有点蓝 --  发布时间：2020/6/5 17:04:00 --   参考：http://www.foxtable.com/webhelp/topics/2121.htm

--  作者：发财 --  发布时间：2020/6/5 17:07:00 --   此主题相关图片如下：1591347908(1).png