VB编写的函数无法添加到excel中进行自定义。 为什么？

csdn Home 社区帖子 按时间查看旧帖子 按论坛查看旧帖子 按专家查看旧帖子 按热门帖子查看旧帖子。

Office Development VBA-论坛帖子索引列表。

7001： 如何在 Access中使用 VBA 制作图表7002： 如何使用 Excel 的 ActivePrinter？ 快 点！ **等！ 谢谢。

7003：非常困难，我想在excel中实现两个下拉篮子链接？

7004：VB 调用 VBA 生成报告并打印！ 快 点！！

7005：有关 excel 宏中变量的问题，SOS 7006：有关单词页码的问题。

7007：为什么我找不到旧大厅？

7008：如何确定 Excel 中当前叶中打印的行数？

7009：吱吱嘎吱（戏剧可乐） 请转到 7010：word call 问题。

7011：关于 WebBrowser 和 Word7012：如何判断产品 A产品B....在一个时间段内使用，在另一个时间段内使用。

因为你没有胸毛！

按 Ctrl+F3 显示“定义名称”窗口。

根据需要写下当前工作簿的名称，例如：Andy Lau。

引用位置将写入公式。

在单元格 A1 中输入 Q1 的值，依此类推。

然后在任意单元格中输入 = Andy Lau，即可获得结果。

使用 VBA 建立函数，然后调用它。

您的程序可以这样修改。

sub su()

dim i as integer

for i = 3 to 100

if ,4) = "操作问题" and ,5) = "网络问题" then

end if

nextend sub

另外，这个应用程序有意义吗？ 为什么不试试 countifs 函数。

子 stat（）。

dim i%, j%, n%

j = 3for each sht in sheetsif <>"统计学" then

for i = 3 to sht.[a65536].end(3).row

if , 1) <"" then

sheets("统计学").cells(j, 2).value = , 1).value

j = j + 1

end if

nextend if

nextend sub

主要问题是变量工作表未设置。

我没有看你的**，但你说：查了一下信息，好像任务管理器中的进程没有关闭，导致了错误。

然后你只需关闭该过程。

ctrl+alt+del

选择右二的“进程”。

只需找到您的流程并结束它。

如果这真的是原因。

'关闭工作簿文件。

结束 excel 对象。

set xlbook = nothing

set xlsheet = nothing

在excel中保存这一段没有问题，我觉得这应该设置为能够覆盖和保存。

模块分为标准模块、类模块、表单模块和文档模块。

只要在项目资源窗口中双击模块名称，就可以在右侧的**窗口中看到它;

也可以通过双击“工资资源”窗口中的工作表名称或此工作簿来查看文档模块。

表单模块的**需要点击表单名称打开表单，然后双击表单或表单的任意控件，或者右键点击表单，选择“查看”即可查看。

在公共表格 1 前面加上以下文字：

imports

而是你不引用excel，所以vb不知道xltoleft常量，也和end无关，所以把xltoleft改成-4159。

col = "iv8").end(-4159).列在行上。

使用 createobject 创建的 excel 对象不应具有引用库，因此您需要自己定义常量或添加引用。

菜单：项目 - 引用，添加对 excel 库的引用，可以在对象浏览器中查看 excel 的常量。

年占卜码的目测应该没有问题，纯雀神请按f9在程序中设置断点，按做损失f8逐句运行调试，看看问题出在哪里**。

基本上，这是您的文件不存在。

请使用 ？ temp\"检查路径名是否符合预期。

让我们先使用 on error 句子'租金正在被抽取，看看这句话哪里错了，哪里错了。 估计是对象创建失败。 另外，你是在 VB 中的 ** 中，还是在 VBA 中？