qq_18731035 2021-05-30 12:59 采纳率: 0%
浏览 42

为啥excel VBA addline x坐标一样画出来的线是斜的

end_range就是一个单元格

last_y是前一个单元格水平线的y值,now_y是当前单元格水平线的y值

  1.  ver_ps = sht.Cells(end_range.Row, j).Left
         
        
       adl_vb = adl_v(ver_ps, last_y, now_y)
    
    
    Public Function adl_v(x As Single, last_y As Single, now_y As Single) As Boolean  '绘制竖直线
    
    With ActiveSheet.Shapes.AddLine(x, last_y, x, now_y).Line
     .Weight = 2
     .ForeColor.RGB = RGB(0, 0, 0)
    End With
    End Function

    明明传入X都一样为啥画出来的线是斜的

     

  • 写回答

1条回答 默认 最新

  • 赵4老师 2024-04-10 17:25
    关注

    注释掉所有On Error Resume Next语句,在VBA for Excel IDE中(按Alt+F11键)运行,
    出错后点击调试,光标会停在出错的那条语句处,
    或者
    事先在怀疑可能有逻辑错误的语句处设置断点,运行经过断点时中断,

    此时可以在立即窗口中使用
    ?变量名

    ?函数名(函数参数)

    过程名(参数)
    辅助调试。

    评论

报告相同问题?

悬赏问题

  • ¥15 JNA调用DLL报堆栈溢出错误(0xC00000FD)
  • ¥15 请教SGeMs软件的使用
  • ¥15 自己用vb.net编写了一个dll文件,如何只给授权的用户使用这个dll文件进行打包编译,未授权用户不能进行打包编译操作?
  • ¥50 深度学习运行代码直接中断
  • ¥20 需要完整的共散射点成像代码
  • ¥15 编写vba代码实现数据录入工作
  • ¥15 做过TCL海信电视小米电视相关影视会员软件私我
  • ¥15 Mapreduce是正常的,在运行其他jar包时并没有任何问题,只是在做LogCount.jar 时出的问题。如图所示
  • ¥15 ImportError: DLL load failed while importing _iterative: 找不到指定的模块。
  • ¥15 如何通过交互分析得出某高危患者对放疗获益更多