VBA中怎样从固的字符串中提取指定字符:

laosanjie

<p>假设在A2:A4分别有： <table cellspacing="0" cellpadding="0" width="80" border="0" xstr="" style="WIDTH: 60pt; BORDER-COLLAPSE: collapse;"><colgroup><col width="80" style="WIDTH: 60pt; mso-width-source: userset; mso-width-alt: 2560;"></col><col></col><col></col><col></col></colgroup><tbody><tr height="19" style="HEIGHT: 14.25pt;"><td class="xl22" width="80" height="19" style="BORDER-RIGHT: #ece9d8; BORDER-TOP: #ece9d8; BORDER-LEFT: #ece9d8; WIDTH: 60pt; BORDER-BOTTOM: #ece9d8; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent;"><div style="MIN-HEIGHT: 200px; WORD-WRAP: break-word;"><font size="2">001|一班</font></div></td></tr><tr height="19" style="HEIGHT: 14.25pt;"><td class="xl22" height="19" style="BORDER-RIGHT: #ece9d8; BORDER-TOP: #ece9d8; BORDER-LEFT: #ece9d8; BORDER-BOTTOM: #ece9d8; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent;"><div style="MIN-HEIGHT: 200px; WORD-WRAP: break-word;"><font size="2">001|一班甲</font></div></td></tr><tr height="19" style="HEIGHT: 14.25pt;"><td class="xl22" height="19" style="BORDER-RIGHT: #ece9d8; BORDER-TOP: #ece9d8; BORDER-LEFT: #ece9d8; BORDER-BOTTOM: #ece9d8; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent;"><div style="MIN-HEIGHT: 200px; WORD-WRAP: break-word;"><font size="2">001|一班丙2</font></div></td></tr></tbody></table></p><p>用下面的程序就可分别提取出: <font size="2">一班、一班甲 和 一班丙2</font></p><p><font size="2">

游客，如果您要查看本帖隐藏内容请回复

</p>

[此贴子已经被作者于2008-7-20 7:50:37编辑过]

laosanjie

<p>找到答案了： </p><p>Mid(字符串, 7, 10)</p><p>上面的公式怎么用我想看看！？ 能写个能实际运用的程序来看看吗？</p>

动静循环

[em01]

xm258

stonekk

太想看了太想看了太想看了

galois1983

好好好好看看看！！！！！！！！！！！！！

恋风语

laosanjie 发表于 2008-7-20 10:00
找到答案了： Mid(字符串, 7, 10)上面的公式怎么用我想看看！？ 能写个能实际运用的程序来看看吗？

Mid(字符串，p,n)表示从位置p起取字符串的n个字符，exp:Mid("ABCD",2,1)的结果为B

bbhiox

学习
VBA中怎样从固的字符串中提取指定字符: