设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

123
返回列表 发新帖
楼主: cangqiong
打印 上一主题 下一主题

[基础应用] 求助EXCEL.制做宏.实现以下功能

[复制链接]
21#
 楼主| 发表于 2006-9-9 00:00:00 | 显示全部楼层
谢谢.我都改出来了。。。

谢谢你了。
22#
 楼主| 发表于 2006-9-9 00:26:00 | 显示全部楼层
不好意思还得麻烦你一下。。。还是有点问题




打EXCEL作的和ACCESS作的。。。打了个比较。。。

还是有点问题.....

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
23#
 楼主| 发表于 2006-9-11 16:51:00 | 显示全部楼层
谢谢。非常感谢。。。做出来了

还有个问题是这句。。Range(Cells(3, 8), Cells(Sheets(1).UsedRange.Rows.Count, 8)).ClearContents
                     For i = 2 To Sheets(1).UsedRange.Rows.Count
要改为五个工作表都能用。或者更多,,是不是要改Sheets(1)这个啊。改成什么?
24#
 楼主| 发表于 2006-9-11 18:56:00 | 显示全部楼层
           (Left(Cells(i, 3), 1) = "C" And InStr(Cells(i, 3), "Q2") <> 0 And InStr(Cells(i,  3), "80-") > InStr(Cells(i, 3), "Q2"))

这句用“白话”怎么读啊?

还有这两句 11.  ((Left(Cells(i, 3), 1) = "M") And InStr(Cells(i, 3), "BK"))

           22.   (Left(Cells(i, 3), 1) = "C" And InStr(Cells(i, 3), "S1")) <> 0  

为什么11那句没有“<>0"  而22那句有等于  "<>0"啊
25#
 楼主| 发表于 2006-9-11 21:19:00 | 显示全部楼层
           (Left(Cells(i, 3), 1) = "C" And InStr(Cells(i, 3), "Q2") <> 0 And InStr(Cells(i, 3), "80-") > InStr(Cells(i, 3), "Q2")) Or _
   

这个地方  > InStr(Cells(i, 3), "Q2")) 怎么理解啊......



还有一个问题就是  * 号          如*abcd   ab*cd   abcd*    a*b*c*

以后遇到这样的,怎样写语句啊。。不能以后总问你吧。。。。
26#
 楼主| 发表于 2006-9-11 23:48:00 | 显示全部楼层
EXCEL里有LIKE的函数吗?
27#
 楼主| 发表于 2006-9-14 16:10:00 | 显示全部楼层
你可以用LIKE 语句写一条吗?

如   型号           品种        类别

c2q080-05-51654      制品           量产品
28#
 楼主| 发表于 2006-9-15 20:38:00 | 显示全部楼层
要用LIKE做编程的方式怎么写语句啊。。。



还有个编程的问题想问你。。。问题在首页。。。作者名是CANGQIONG

用什么样的方法最好 。。。最快捷。。最好要用编程的方式。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-5-22 04:24 , Processed in 0.111240 second(s), 31 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表