Office中国论坛/Access中国论坛

标题: 表循环问题 [打印本页]

作者: cangqiong    时间: 2007-7-27 23:42
标题: 表循环问题
<>前提 我用的是ACCESS的一个查询 想导入 EXCEL表中.</P>
<>'------------------------------------------------------------------------</P>
<>Private Sub Command41_Click()</P>
<P>dim str as string<BR>str = 取得路径() &amp; "\C1_HL别设备综合效率管理" </P>
<P>Set wb = Workbooks.Open("" &amp; str &amp; "")<BR><FONT color=#e61a94>Set ws = wb.Worksheets("717")       注释:EXCEL中717工作表  </FONT></P>
<P><FONT color=#0000ff>Set rs = CurrentDb.OpenRecordset("工作组导出")</FONT>    '<FONT color=#e61a94><FONT color=#000000>注释</FONT>:</FONT>打开ACCESS中,"工作组导出"的查询</P>
<P>Call 工作组</P>
<P>'-------------------------------------------------------------------<BR>想要的结果是:我不想单独选择EXCEL中717一个工作表(粉色部分).我想要循环. <FONT color=#0909f7>如果ACCESS中工作组导出查询</FONT>中有717.就在导入的EXCEL工作表中循环找到717,并导入.</P>
<P>工作表循环怎么写语句?(粉色部分)</P>
作者: cangqiong    时间: 2007-7-28 00:00
[attach]25518[/attach]<BR>上传了两个图片  一张是ACCESS中的  一张是EXCEL中的
作者: cangqiong    时间: 2007-7-30 16:12
<>帮帮我啊.</P>




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3