设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 2139|回复: 5
打印 上一主题 下一主题

[与其它组件] [求助]关于字符串内容的拆分

[复制链接]
跳转到指定楼层
1#
发表于 2007-7-16 17:38:00 | 只看该作者 回帖奖励 |正序浏览 |阅读模式


<p >本人想将 其中的电压和功率单独取出防在两个单元格中不知道该如何写vba <br>
写了一部分但是感觉效果不理想结果如下<br >
<!--[if !supportLineBreakNewLine]--><br >
<!--[endif]--><o:p></o:p></p>

<p >格式是这样的, 每一行在excell的单元格中<br>
60425 UVS 20W 12V G4 20X10X1OEMASIA<br>
64425 UVS 20W 12V G4 10XBLI6   2817NEOLX<o:p></o:p></p>

<p ><br>
如果分开实际想要得可能非常麻烦。<br>
For i = 2 To 6<br>
str = Sheets("sheet3").Cells(i, 6)<br>
x1 = InStr(str, " ")<br>
x2 = InStr(x1, str, " ")<br>
str1 = Left(str, x2)<br>
x3 = InStr(x2 + 1, str, " ")<br>
str2 = Left(str, x3)<br>
Cells(i, 12).Value = str1<br>
Cells(i, 13).Value = str2<br>
<br>
请指点 给源代码参考<o:p></o:p></p>

[em06][em06]
[此贴子已经被作者于2007-7-16 9:45:29编辑过]

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
6#
 楼主| 发表于 2007-7-17 18:05:00 | 只看该作者
太感谢了,但是还是不太懂,我在研究一下[em01][em01][em01][em01][em01][em01][em01][em01][em01]
5#
发表于 2007-7-17 01:09:00 | 只看该作者
i表示用split这个函数取得字符串中用空格分割开的子字符串的顺序号。RC[-1]表示当前单元格左边第一个单元格,RC[-2]表示当前单元格左边第二个单元格,依次类推。<BR>

本帖子中包含更多资源

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

x
4#
 楼主| 发表于 2007-7-16 23:36:00 | 只看该作者

回复

<p><br></p><br>    yourF = Split(YourZfc, " ")(i)中<br>(i)是啥呢,能解释一下不?<br>Split函数没这个参数阿也没有连字符啥的<br><br>=yourF(0,RC[-1])  中 RC[-1]又是啥?<br>请<a href="dispuser.asp?id=47417" target="_blank" >sgrshh29</a>指点
3#
发表于 2007-7-16 20:29:00 | 只看该作者
<>先自定义一个函数:</P>
<>Function yourF(i As Integer, YourZfc As String) As String<BR>    yourF = Split(YourZfc, " ")(i)<BR>End Function<BR></P>
<>然后,在b1,c1,d1,e1,f1分别写上公式(当然你的数据是在a列中):</P>
<P>=yourF(0,RC[-1])   =yourF(1,RC[-2])  =yourF(2,RC[-3])  =yourF(3,RC[-4])  =yourF(4,RC[-5])</P>
<P>下拉。</P>
2#
 楼主| 发表于 2007-7-16 18:25:00 | 只看该作者
高手请指点一下、谢谢斑竹
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-12-2 02:43 , Processed in 0.086934 second(s), 31 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

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