VB如何调用单元格当中的数字?

如题，

Set fso = CreateObject("Scripting.FileSystemObject")

With ActiveSheet

Dim i%

For i = 5 To 31 '起始行，如果是第三行到第一百行，则改成 3 to 100

MyFName = ThisWorkbook.Path & "\" & Cells(i, 1) & ".txt"

我想到导出的是5行到31行的数据，第31行当中的行并不是固定数量，我想调用把31这个数字改成调用的这一区域内的非空单元格的个数！求解！加急

没明白你的意思..到底是要读取5行到31行的数据还是要读取这一区域内的非空单元格的个数?

------解决方案-------------------------------------------------------- mshflexgrid本身不能输入数据，要输入数据，可以添加一个textbox控件，在mshflexgrid的rowcochange事件中添加代码移动textbox控件使其和当前单元格重合（遮住当前单元格），并将当前单元格内容拷贝到textbox控件，然后在textbox控件中编辑，在textbox的change事件中，将数据回写回单元格。 合并数据：mshflexgrid1.mergecells = xxx 这样，如果相邻行或列的数据如果相同，则和起来显示 xxx值，具体为 flexmergenever 0 不显示。包含相同内容的单元不分组。这是缺省设置。 flexmergefree 1 自由。包含相同内容的单元总是合并。 flexmergerestrictrows 2 限制行。只有行中包含相同内容的相邻单元（向当前单元左边）才合并。 flexmergerestrictcolumns 3 限制列。只有列中包含相同内容的相邻单元（向当前单元上方）才合并。 flexmergerestrictboth 4 限制行和列。只有在行中（向左）或在列中（向上）包含相同内容的单元才合并。 ------解决方案-------------------------------------------------------- 不然，你就处理keypress事件 ------解决方案--------------------------------------------------------

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息