[算表] 请教这种写法出现了什么问题 yyingx PTT批踢踢实业坊

[算表] 请教这种写法出现了什么问题

楼主: yyingx (bless) 2016-07-26 12:00:37

软件:office
版本:2007
Sub test1()
Dim RNG As Range
Set RNG = Sheets("生产投料单").Columns(1).Find(what:="产品型号", LookIn:=xlV
alues, LookAt:=xlWhole)
RNG.Offset(2, 0) = 1
End Sub

作者: soyoso (我是耀宗) 2016-07-26 12:06:00

测试于a栏储存格内有"产品型号"情况下，无报错http://imgur.com/CnlQWli测试于a栏储存格内以"产品型号 "情况下，则报错http://imgur.com/upMyuqp在不全等于what下有万用字符(*)或lookat为xlpart

楼主: yyingx (bless) 2016-07-26 14:02:00

发现了一个问题，合并单元格的内容如何找到？

作者: soyoso (我是耀宗) 2016-07-26 14:14:00

如不是在第一列是可以找到的http://imgur.com/bEW9LZ1如包含第一列于range.find内searchdirection指定xlprevioushttp://imgur.com/PUgrBYS

楼主: yyingx (bless) 2016-07-26 14:29:00

还有两种情况，横向合并A1:B1,另外一种情况是A1:B12

作者: soyoso (我是耀宗) 2016-07-26 14:41:00

将columns(1)改为columns("a:b")或[a:b]方式加上searchdirection指定

继续阅读

[算表] 请问EXCEL小数点显示的问题perasa [算表] Excel算表HILLFLY [文件] word方程式编辑器大小跑掉sirius0601 [算表] EXCEL缩减行数o1o3o1o31030 [问题] 由班表中指定日期取出储存格问题veryeasy [买卖] 征一套Office365个人版leonsky [算表] 产生的随机乱数符合特定二次多项式Tomogi [算表] 去除字段中头两个数字的方法m3gl4a [算表] 无以数列方式填满可用kisha024 [Excel] 座标轴上的科学记号表示snownight00