VBA自定义用友报表函数.docVIP

  • 7
  • 0
  • 约4.74千字
  • 约 4页
  • 2016-11-22 发布于北京
  • 举报
VBA自定义用友报表函数

[原创]VBA自定义用友报表函数 2008-09-17 13:15 分类:VBA学习 字号: 大大? 中中? 小小 取科目的期末值,支持未记账取数和辅助核算,熟悉VBA设计和用友数据库结构的网友可据此开发出更多实用的报表函数。我将其命名为UfoInExcel程序,意思是在Excel中可以像UFO一样取数,而实用性更胜于UFO,因为Excel的优越性地球人都知道。 Function qm(科目代码, 月份, Optional 年度 As String, Optional 帐套号 As String, Optional 包含未记帐 As String = Y, Optional 辅助核算方式 As String, Optional 辅助核算编码 As String) If 年度 Year(Date) Then Exit Function If 年度 = Year(Date) And 月份 = Month(Date) Then Exit Function Dim csqlstr As String ??? qm = 0 ??? If Trim(科目代码) = Then Exit Function ??? If Trim(月份) = Then Exit Function ??? If Trim(年度) = Then Exit Function ??? If Trim(帐套号)

文档评论(0)

1亿VIP精品文档

相关文档