MS Excel VBA类型不匹配错误

塔希尔·默穆德

我使用下面提到的代码时收到类型不匹配错误。如果可能,请帮助解决下面提到的代码错误。AP#和AR3都有字符值。

我的基本要求是使用函数,就像使用vba代码在一个excel单元格中的两个单元格中添加两个字符值的连接函数一样

Range("AI3:AI" & lrv + 2).Value = Range("AP3:AP" & lrv + 2).Value & " " & Range("AR3:AR" & lrv + 2).Value
悉达思·劳特

您会遇到不匹配错误,因为这是分配值的错误方法。例如,这是不正确的

Range("D1:D3").Value = Range("A1:A3").Value & " " & Range("B1:B3").Value

您正在使用数组。所以试试这个

Range("D1:D3").FormulaArray = _
"=(" & Range("A1:A3").Address & ") & "" "" & (" & Range("B1:B3").Address & ")"

所以你的代码变成

Range("AI3:AI" & lrv + 2).FormulaArray = _
"=(" & _
Range("AP3:AP" & lrv + 2).Address & _
") & "" "" & (" & _
Range("AR3:AR" & lrv + 2).Address & ")"

或者以更简化的方式

Dim rng1 As Range, rng2 As Range, rng3 As Range

Set rng1 = Range("AI3:AI" & lrv + 2)
Set rng2 = Range("AP3:AP" & lrv + 2)
Set rng3 = Range("AR3:AR" & lrv + 2)

rng1.FormulaArray = "=(" & _
                    rng2.Address & _
                    ") "" "" & (" & _
                    rng3.Address & _
                    ")"

rng1.Value = rng1.Value

rng2.Resize(1,2).ClearContents

本文收集自互联网,转载请注明来源。

如有侵权,请联系[email protected] 删除。

编辑于
0

我来说两句

0条评论
登录后参与评论

相关文章

来自分类Dev

VBA Excel 2016:类型不匹配错误

来自分类Dev

Excel VBA中的类型不匹配错误

来自分类Dev

Excel VBA 宏类型不匹配错误

来自分类Dev

类型不匹配:Excel VBA

来自分类Dev

类型不匹配Excel VBA

来自分类Dev

类型不匹配:Excel VBA

来自分类Dev

不断收到Excel VBA类型不匹配错误13

来自分类Dev

Excel VBA运行时错误类型不匹配13

来自分类Dev

MS Excel的VBA脚本

来自分类Dev

代码片段不处理 MS Excel VBA

来自分类Dev

Excel VBA:如何解决索引和匹配函数类型不匹配错误

来自分类Dev

SQL查询中的MS Access VBA数据类型不匹配错误

来自分类Dev

#N / A的Excel VBA类型不匹配

来自分类Dev

类型与数组不匹配:VBA Excel

来自分类Dev

Excel VBA With语句返回类型不匹配

来自分类Dev

Excel VBA数组类型不匹配

来自分类Dev

Excel VBA对象变量类型不匹配

来自分类Dev

Excel运行时错误13中的VBA:类型不匹配

来自分类Dev

VBA Excel:由于字符过多,运行时错误13类型不匹配

来自分类Dev

Excel VBA Target.Address被修改并导致错误13类型不匹配

来自分类Dev

切换到64位Excel后如何修复VBA“类型不匹配”错误

来自分类Dev

Application.Wait和Excel VBA运行时错误'13'类型不匹配

来自分类Dev

Excel VBA中的锯齿状数组,类型不匹配错误

来自分类Dev

Excel VBA数据透视缓存类型不匹配运行时错误'13'

来自分类Dev

Excel VBA工作代码今天突然出现“类型不匹配”错误

来自分类Dev

MS Access 2013 SQL类型不匹配错误

来自分类Dev

Ms Excel 或 VBA 中借方和贷方条目的匹配

来自分类Dev

如何从MS Access 2003 VBA处理MS Excel分页符

来自分类Dev

从Access VBA搜索Excel列-类型不匹配