作者tina1688 ()
看板Office
标题[算表] VBA判断范围&合并成1格并换行
时间Thu Mar 15 21:58:57 2018
软体:Excel
版本:2010/2016
大大
想写VBA,将范围内的合并B栏&C栏值,中间以__区隔并换行,
由於B、C栏列数不一定;C栏不一定有值。不知道要如何下手写VBA
请教大大了@@
档案
http://t.cn/RnAfeBP
示意图
https://imgur.com/a/ZEmFX
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 123.194.200.173
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Office/M.1521122339.A.3EA.html
1F:→ soyoso: 回圈,range.find,"a行政区" 03/15 22:26
2F:→ soyoso: 范围起以找到储存格,迄以找到储存格range.end往下 03/15 22:26
3F:→ soyoso: 回圈於该范围,连接字串&,判断if或iif,c栏有值加"__" 03/15 22:26
4F:→ soyoso: 断行以chr(10),连接上如会於第一行断行的话 03/15 22:26
5F:→ soyoso: mid从字串第二个位置开始取 03/15 22:26
6F:→ tina1688: 大大,若行政区不一定为固定2个字数 有其他解吗? 03/15 23:11
7F:→ soyoso: 是指没有固定如储存格b1,b7,b13所出现的"a行政区"吗 03/15 23:24
8F:→ soyoso: 回文range.find是搜寻上述的部分来当范围的起始储存格 03/15 23:25
9F:→ soyoso: 偏移的话以range.offset 03/15 23:26
10F:→ tina1688: 谢谢大大!!!!後来我有成功写出。谢谢!!!!!! 03/17 12:27