Excel 中使用 VBA 的新函数
KunLun
首先，这是我第一次尝试vba在excel. 我对此一无所知。
我尝试创建一个新函数 into excel，以在特定单元格中设置一个值。
我有这个模块：
Public Function SETVALUE(cell As Range, newValue As Integer) As String
cell.value = newValue
SETVALUE = "-"
End Function
这是我的模块：
如果我输入：=SETVALUE(A2, 1)in cell A1，它不起作用。
在单元格中A1出现#Value!，在单元格A2中什么也没有出现。
斯托拉克斯
试试这个
Option Explicit
Public Function SETVALUE(cell As Range, newValue As Integer) As String
Evaluate "mySetValue( " & Chr(34) & cell.Address & Chr(34) & "," & Chr(34) & newValue & Chr(34) & ")"
SETVALUE = "-"
End Function
Sub mySetValue(cell As String, newValue As Integer)
Dim rg As Range
Set rg = Range(cell)
rg.Value2 = newValue
End Sub
更新：图片如何使用它
本文收集自互联网，转载请注明来源。
如有侵权，请联系 [email protected] 删除。
编辑于
相关文章
TOP 榜单
- 1
Linux的官方Adobe Flash存储库是否已过时？
- 2
在 Python 2.7 中。如何从文件中读取特定文本并分配给变量
- 3
如何检查字符串输入的格式
- 4
如何使用HttpClient的在使用SSL证书，无论多么“糟糕”是
- 5
Modbus Python施耐德PM5300
- 6
错误TS2365：运算符'！=='无法应用于类型'“（”'和'“）”'
- 7
用日期数据透视表和日期顺序查询
- 8
检查嵌套列表中的长度是否相同
- 9
Java Eclipse中的错误13，如何解决？
- 10
ValueError：尝试同时迭代两个列表时，解包的值太多（预期为 2）
- 11
如何监视应用程序而不是单个进程的CPU使用率？
- 12
如何自动选择正确的键盘布局？-仅具有一个键盘布局
- 13
ES5的代理替代
- 14
在令牌内联程序集错误之前预期为 ')'
- 15
有什么解决方案可以将android设备用作Cast Receiver？
- 16
套接字无法检测到断开连接
- 17
如何在JavaScript中获取数组的第n个元素？
- 18
如何将sklearn.naive_bayes与（多个）分类功能一起使用？
- 19
应用发明者仅从列表中选择一个随机项一次
- 20
在Windows 7中无法删除文件（2）
- 21
ggplot：对齐多个分面图-所有大小不同的分面
我来说两句