chenye07130 发表于 2014-7-28 14:12:56

子过程或函数未定义

最近我在使用2007版CAD中的VBA编写程序，是想将EXCEL表格和CAD连接起来，但是我按照书本上的代码来打的，出现了说子过程或函数未定义(AddTableline和AddTableText )，，求帮助！！

Dim r As Object

    If OptionButton1.Value = Ture Then

      For Each r In xlSheet.UsedRange
      
            AddTableLine ThisDrawing.Blocks("*Model_Space"), iPt, r
         
            AddTableText ThisDrawing.Blocks("*Model_Space"), iPt, r
          Next
      Else
         
            For Each r In xlApp.Selection
         
            AddTableLine ThisDrawing.Blocks("*Model_Space"), iPt, r
         
            AddTableText ThisDrawing.Blocks("*Model_Space"), iPt, r
      Next
    End If


zzyong00 发表于 2014-7-28 22:48:46

代码没打全

chenye07130 发表于 2014-7-29 08:22:57

zzyong00 发表于 2014-7-28 22:48 static/image/common/back.gif
代码没打全

代码哪里没打全，求详细解释~(变量我都已经定义过了，是前面的内容，我没有在这里写出来。。)

机械工程师 发表于 2014-7-29 10:12:43

缺少AddTableLine 的代码

wwswwswws 发表于 2014-9-28 14:18:33

AddTableLine 这是一个自定义函数，这个函数的代码没有，当然会出现函数未定义错误了
页: [1]
查看完整版本: 子过程或函数未定义