作者runaway580 (让个位)
看板Office
标题[算表] 加总vba
时间Sat Apr 22 14:57:49 2017
软体:excel 2017
大家好
目前碰到此问题
A B
1 文字 5
2 3
3 2
4 6
5 3
6 文字 7
7 5
8 文字 4
9 2
我用vba在另外的储存格 输出成
sum(B1:B5)
sum(B6:B7)
sum(B8:B9) [B栏sum的范围 随A栏 文字和下一个文字 而改变]
方面是先计算A栏有几格文字,然後用回圈,代入第一个文字的范围,
用end(xldown)跳下一格,依此类推
可是发现如果文字相邻中间没有空格的话 end(xldown)就不适用
offset(1,0)这用法也不适用
有比较适合的写法吗QQ
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 1.170.170.59
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Office/M.1492844271.A.760.html
1F：→ heavendemon: 文字都部分有重复吗? 没有的话我会先让文字栏向下填 04/22 15:06
2F：→ heavendemon: 满 然後用simif加总B栏位的值 04/22 15:07
3F：→ soyoso: 有函数sumif，并无simif 04/22 15:18
4F：→ heavendemon: 抱歉 笔误 谢谢so大提醒 04/22 15:30
5F：→ runaway580: 文字不重复 怎麽用vba向下填满QQ 04/22 15:30
6F：→ soyoso: 如果要於a栏填入的话，range.specialcells空白，指定到如 04/22 15:35
7F：→ soyoso: 原文来看的话为"=a1" 04/22 15:36
8F：→ soyoso: 如要显示a栏和加总的话，也可用枢纽分析表 04/22 15:38
9F：推 ptguitar: 我弄过类似的 用录制巨集 ctrl+G 选空白 =a1 填满 04/22 21:15
10F：→ ptguitar: 大概就soyoso大大类似的方法 04/22 21:15