查找excel表格中a列的一个内容为”汇总 “ 的单元格,并返回单元格的地址,应该怎样写啊?
解决方案 »
- 代表北京CSDNer欢迎来这里挨踢,最好多带几个PLMM来
- 求助 OpenProcessToken 的问题!
- FileCopy出错,请大家给帮助。谢谢!
- 为什么程序只有在2000服务器版上可以运行?(可再加分,急)
- 请求用SetLayeredWindowAttributes函数做半透明的代码(在线)
- 想将自己的控件编译成ocx文件时,提示“检测到非公共的 UserControl”,是怎么回事?怎么解决??
- 怎样定义以数组为参数的函数,请大虾帮帮忙啊
- datareport的用法
- VB中调用AUTOCAD
- 求问winsock封装成dll问题
- 怎么才能检测到POS机的钱箱是否关闭?
- 求助!一个有趣又感觉挺难的问题
for i=1 to 65535
if "汇总"=sheet1.cells(i,1) then
exit for
exit
next
msgbox "a" & i
for i=1 to 65535
if "汇总"=sheet1.cells(i,1) then
exit for
end if
next
msgbox "a" & i
Sub Find_01()
Set wcell = Worksheets("sheet1").Cells.Find("汇总", LookIn:=xlValues)
iLeaderRow = Int(wcell.Row)
iLeaderCol = Int(wcell.Column)
End Sub
应该可以了,你看看吧,可以的话,记得给分分哟
我是这样写的