VB怎样提取excel里的最后一个写入单元格的行列
如题
VB code:
'不知道你是不是要这个:
'vba代码如下:
行号 = ActiveCell.Row
列号 = ActiveCell.Column
'VB中用时,加上VB中创建excel的对象
'以下也是常用的:
'vba代码如下:
nLR = ActiveSheet.Cells.SpecialCells(xlLastCell).Row '最后一行(与连续与否无关)
nLC = ActiveSheet.Cells.SpecialCells(xlLastCell).Column '最后一列(与连续与否无关)
Nextcol = Cells(nLR, 1).End(xlToRight).Column '查找最后一行最后一列(与连续与否无关)
Nextrow = Cells(1, nLC).End(xlDown).Row '查找最后一列最后一行(与连续与否无关)
'VB中用时,同样加上VB中创建excel的对象
关注
我要的是,当有一个excel文件已经被写到第二行第三列了,那我要在下一次打开这个文件的时候接着对这个文件写。这时就得知道,这个文件写到哪了,也就是要清楚这个文件的上一次最后写入最后一格的行与列。
如果你的表格是矩形的,用以下语句可以完成:
nLR = ActiveSheet.Cells.SpecialCells(11).Row '最后一行(与连续与否无关)
nLC = ActiveSheet.Cells.SpecialCells(11).Column '最后一列(与连续与否无关)
如果你输入完最后一个单元格后,没有移动过活动单元格(即黑框套住的单元格)可以如下:
行号 = ActiveCell.Row
列号 = ActiveCell.Column
nLR = ActiveSheet.Cells.SpecialCells(xlLastCell).Row '最后一行(与连
相关问答:
希望大家能够帮我下.感谢了..
源码传在大米盘 VB6 的源码 http://www.damipan.com/file/3wNoKLW.html
转为VB.NET源码.
小弟完全是新手 不懂的说.麻烦各位帮忙一下
我的EMAIL是:4452 ......
VB偶学得不错,现在大一,高三的时候就学VB了,现在学校里都是学C#和VB.NET的兄弟多。。。
偶要转行VB.NET了~当年学VB学了2年,对VB里面的常用函数都十分了解。
Select、If结构、For Next循环、等都了解。。。 ......
在vb中怎么判断,插入到数据库中的值是重复的,本人才刚接触VB语言,甚是有好多地方还不懂,还请各位大侠们给出代码,谢谢了呀!!!
插入之前select一下阿。
或者写一个组合SQL插入语句,例如
IF not Exist(
& ......
.net里面有没有像vb里的richtextbox控件啊?
有的。名字也差不多。RichEdit 或者 RichTextBox。
winfrom项目中工具箱有的吧
webform没的,只有win有
web可以用fckedit
引用
webform没的,只有win有 ......
我这样写对吗?
Printer.Font = "黑体加粗"
Printer.FontSize = 24 '设置文字的大小
Printer.Print "汽车燃料消耗量标识"
VB code:
Private Sub Com ......