VBA中union报错

软件 2023-06-03

VBA中为什么会出现Msgbox "类型不匹配，13"？不能显示Union()的结果吗？

Msgbox是显示字符串，而你代码中rang是单元格对象，所以类型不匹配出错。（如果rang是单个单元格，就会将单元格的默认属性Value转换为字符串显示出来，多个单元格时就会出错）如果要显示rang的值，可定义一个字符串变量如S，可在Set rang = Union(rang, x)处加一句： S=S & X & " "，最后显示S即可：Msgbox S

vba 问题类型不匹配

不用联合选择一次上色，遍历检测，然后上底色一样的效果呀

OptionExplicit
Subcolor()
DimrngAsRange
DimlnAsInteger
WithActiveSheet
ln=.[a60000].End(xlUp).Row
ForEachrngIn.Range("a2:a"&ln)
Ifrng.Value>500Thenrng.Interior.ColorIndex=3
Nextrng
EndWith
EndSub

在vba中，使用union选择不同单元格，然后组成数组，结果数组里元素的顺序和希望的不一样。希望大神指教。

## 结构体与sort排序的完美结合 ## 各位正在学习语言的小伙伴们大家好，本期栏目，小编将带领正在学习结构体的同学，一起深入地学习他们！在实际问题中，一组数据往往具有不同的数据类型。例如，在学生登记表中，姓名应为字符型；学号可为整型或字符型；年龄应为整型；性别应为字符型；成绩可为整型或实型。显然不能用一个数组来存放这一组数据。因为数组中各元素的类型和长度都必须一致，以便于编译系统处理。为了解决这个问题，C++语言中给出了另一种构造数据类型——“结构”。它相当于其它高级语言中的记录。 C++中定义了一组表示整数、浮点数、单个字符和布尔值的算术类型（arithmetic type）

Vba中Union的用法

使用Union方法可以将多个非连续区域连接起来成为一个区域，从而可以实现对多个非连续区域一起进行操作，如下面的代码所示。 Sub UnSelect() Union(Sheet5.Range("A1:D4"), Sheet5.Range("E5:H8")).Select End Sub 代码解析： UnSelect过程选择单元格A1:D4和E5:H8所组成的区域。Union方法返回两个或多个区域的合并区域，语法如下： expression.Union(Arg1, Arg2, ...) 其中参数expression是可选的，返回一个Application对象。参数Arg1, Arg2, ...