findnext(findnextfile顺序)

张工 2022-06-01 21:53:52 阅读:28
  

excel vba findnext这个函数我哪里用错了

  参数错了。

  这个函数的参数只能是搜索范围内的单个单元格,而你的c(1)在前面得到的是查找到第一个单元格的地址,是一个字符串变量。参数应该改为:

  After:=Range(c(1))

findnext

200分请教findfirst()findnext的用法,有原代码最好(我会分几

  过程德尔特里(常数目录:字符串);var SearchRec: TSearchRec\\声明TSearchRec变量状态:整数;开始状态:=FindFirst(Dir '\* .*、faAnyFile、search rec);\\查找第一个适合的文件当状态=0时尝试开始if (SearchRec .属性和fad目录=fad目录)然后开始if (SearchRec .名称".")和(搜索记录.名称'.')然后开始Deltree(Dir '\' SearchRec).姓名);//RMDir(Dir '\' SearchRec .姓名);结束;end else删除文件(目录搜索记录).姓名);状态:=FindNext(搜索记录);结束;最后FindClose(搜索记录);结束;结束;TSearchRec=记录时间:整数;//文件修改的时间尺寸:整数;//文件大小Attr:整数;//文件属性Name:文件名//文件名称排除属性:整数;//排除属性FindHandle: THandle平台;//文件句柄FindData: TWin32FindData平台;//赢系统其它信息结束;(vSearchRec .属性和目录)是否是目录我也试试看能不能给点注释TSearchRec是什么东西啊?能说的详细一点吗?

二维码