如何有条件地用VBA连接范围？
黛西·穆尼兹（DaisyMuñiz）
在工作中，每个月的月底，我必须检查保存在电子表格中的数据（如图像）。我唯一感兴趣的数据是检查L列的值并获取BS列中的数据。每个文件的列长都不同。我正在尝试创建VBA代码来逐行检查，并且如果L的任何列等于-2，则将同一行的数据与BS列连接在一起。该字符串将保存到声明为RefExc的变量中，该变量将在另一页上显示。我看了一些其他类似问题的答案，但找不到我需要的东西。我感谢您的帮助。谢谢你。
贾斯汀·多沃德（Justin Doward）
像这样吗？
debug.print将把每个循环的结果打印到开发人员的直接窗口中。
Sub MyConcat()
Dim RefExc As String
Dim c As Range
Dim x As Long
For Each c In Sheet1.Range("L2:L10")
If c.Value = -2 Then
For x = 6 To 73
If x <> 71 Then RefExc = RefExc & ", " & Sheet1.Cells(c.Row, x)
Next x
Debug.Print RefExc
End If
Next c
End Sub
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
编辑于
相关文章
Related 相关文章
- 1
如何有条件地用Thymeleaf解析格式？
- 2
如何有条件地渲染
- 3
如何有条件地通过范围内的条件
- 4
EXCEL VBA 循环遍历单元格并有条件地连接
- 5
Ruby：有条件地用换行符连接字符串的简便方法？
- 6
有条件地链接范围的最佳方法
- 7
Pyspark：有条件地将列与空白连接
- 8
有条件地连接字符串
- 9
Pandas - 有条件地连接两列
- 10
我如何才能有条件地连接两个不同的数组？
- 11
如何有条件地连接两个表
- 12
有条件地运行VBA代码
- 13
有条件地从嵌套for循环退出-VBA
- 14
VBA 有条件地为变量赋值
- 15
有条件地用rails注册4
- 16
有条件地用NA替换零
- 17
有条件地用数字替换行
- 18
如何有条件地用整数替换空值 Pyspark 数据框
- 19
如何在有条件的js中有条件地应用标题
- 20
如何在有条件的组件上有条件地添加道具？
- 21
如何有条件地读取所有属性？
- 22
如何有条件地应用动画？
- 23
如何使EditorFor有条件地变为只读状态？
- 24
如何有条件地包装React组件？
- 25
如何有条件地调用spring验证器
- 26
如何有条件地增加新的列值
- 27
如何有条件地使用Test :: Simple？
- 28
如何有条件地捕获异常？
- 29
如何使autoconf有条件地使用系统扩展？
我来说两句