作者nature23306 (pART)
看板Office
标题[算表] 要如何读取某栏位的值
时间Mon Aug 6 13:21:17 2018
大家好
我有一个表单 "清单1"
里面内容长这样
https://imgur.com/a/i8oEtF2
我再另外一个表单想要读最後一笔的地点
这是我目前的程式码(Vba)
Dim a As String
a = Worksheets("清单1").Cells(B,3).End(xlDown).Row
一直卡在这行
不知道哪边有错
谢谢
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 111.246.220.130
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Office/M.1533532880.A.AB0.html
1F：→ soyoso: B是什麽？变数？ 08/06 13:27
2F：→ soyoso: cells是先列row後栏column，栏号可用数字或字串，如b栏为 08/06 13:28
3F：→ soyoso: 2或"b" 08/06 13:29
4F：→ soyoso: 如是要以储存格b3往下找最後一笔有值的储存格传回列号 08/06 13:33
5F：→ soyoso: cells(3,"b").end(xldown).row 08/06 13:34
6F：→ soyoso: 但留意从b3下方需要有一个有值储存格，或者会回传最大列号 08/06 13:36
7F：→ soyoso: b3起下方有一个以上有值的储存格，但不连续的话，会找连续 08/06 13:40
8F：→ soyoso: 储存格的最後一笔，如b3为连续储存格後一笔或单一储存格， 08/06 13:42
9F：→ soyoso: 则会再往下找另一笔有值储存格，回传列号 08/06 13:42
10F：→ soyoso: 如有该情形的话，也可看以xlup往上是否符合，cells的列号 08/06 13:44
11F：→ soyoso: 则是改为最大列号或多於表格会存在的列号 08/06 13:45