009892（009882基金）
009892（009882基金）
假设数据在A1：A10中，要去除其中数字两端的文字，只返回数字，B1中输入
=MID(A1,MIN(FIND(ROW($1:$10)-1,A15^19)),COUNT(--MID(A1,ROW($1:$99),1)))
同时按下CTRL+SHIFT+ENTER输入数组公式，用自动填充柄将B1中公式下拉到B10，就可以了。
北京仁心动物医院有限公司是2016-10-28在北京市昌平区注册成立的有限责任公司(自然人独资)，注册地址位于北京市昌平区回龙观镇天龙苑11号楼S-1一层2号。
北京仁心动物医院有限公司的统一社会信用代码/注册号是91110114MA0098921P，企业法人李丹，目前企业处于开业状态。
北京仁心动物医院有限公司的经营范围是：动物诊疗；医院管理；家庭劳务服务；销售日用品、宠物用品、饲料。（企业依法自主选择经营项目，开展经营活动；依法须经批准的项目，经相关部门批准后依批准的内容开展经营活动；不得从事本市产业政策禁止和限制类项目的经营活动。）。本省范围内，当前企业的注册资本属于一般。
通过百度企业信用查看北京仁心动物医院有限公司更多信息和资讯。
EC055656025CS | 2011-04-26 09:30:00 | 当前处理： 未妥投 | 地点：重庆市邮政速递物流公司永川分公司西大街揽投部
收寄时间： 2011-04-22 18:18:00 收寄局： 晋江分公司陈埭揽投站
寄达地： 重庆 邮件种类： EMS
邮件性质： 物品 回执查询： 回执查询
时 间 处理站点 处理动作 处理说明 备 注
2011-04-22
17:17:00 晋江分公司陈埭揽投站 揽收 揽收员：谢世利15294552228,
2011-04-22
18:18:00 晋江分公司陈埭揽投站 收寄 收件人:聂先生 重量: .315 实收费用: 15.00 操作员：陈埭特快,
2011-04-22
20:07:42 晋江市 国内出口邮件封发 发往泉州市 总包号001798 操作员：黄呈育 , 陈强
2011-04-22
21:13:35 晋江市 计划发运 车次航班: ZY1 操作员：,
2011-04-22
23:06:30 泉州市 国内出口邮件开拆 来自晋江市 总包号001798 操作员：宋麒锋 , 林少刚
2011-04-23
01:28:25 泉州市 国内出口邮件封发 发往重庆市 总包号004045 操作员：邱添福 , 李晓东
2011-04-23
02:18:37 泉州市 计划发运 车次航班: JJJCB 操作员：,
2011-04-23
07:20:00 泉州市处理中心 实际发运 车次航班: MF8487 泉州-重庆航 操作员：王思明,
2011-04-23
12:00:00 重庆市 实际到达 车次航班: MF8487 泉州-重庆航 操作员：黄亚军,
2011-04-23
13:00:00 泉州市处理中心 实际发运 车次航班: * 综合车间 操作员：综合车间,
2011-04-23
13:31:00 泉州市处理中心 实际到达 车次航班: 0423/0528/100000018 泉州速递 操作员：综合车间,
2011-04-24
07:00:00 重庆航站 实际发运 车次航班: * 航趟六次返 操作员：黄亚军,
2011-04-25
06:01:21 重庆市 国内进口邮件封发 发往留存（待验） 总包号005865 操作员：熊杰 , 唐中霖
2011-04-25
14:17:09 重庆市 国内进口邮件开拆 来自留存（待验） 总包号005865 操作员：龙晋西 , 廖斌
2011-04-25
15:26:15 重庆市 国内进口邮件封发 发往留存（待验） 总包号005867 操作员：龙晋西 , 廖斌
2011-04-25
21:18:26 重庆市 国内进口邮件开拆 来自留存（待验） 总包号005867 操作员：刘志章 , 叶渝红
2011-04-26
04:19:46 重庆市 国内进口邮件封发 发往永川区邮政局 总包号009892 操作员：王文广 , 叶渝红
2011-04-26
05:57:55 重庆市 计划发运 车次航班: DSYCC 操作员：,
2011-04-26
07:00:00 重庆邮区中心局邮件处理中心 实际发运 车次航班: 233914131 重庆－大足（快速） 操作员：毛显存,
2011-04-26
09:30:00 重庆市邮政速递物流公司永川分公司西大街揽投部 未妥投 未妥投原因：其它；下一步动作：收件人不在，今日再投；封发去向：永川市段 投递员：,
操作员：永川分公司
#!usr/bin/perl -w
use warnings;
my $srcfile = "original.txt";
my $desfile = "processed.txt";
open INFILE, "$srcfile" or die "Cannot Open in file:$!";
open OUTFILE, "$desfile" or die "Cannot Open out file:$!";
my %hash_table;
while(INFILE)
{
my $prefix=substr($_,0,index($_,"_"));
if(defined($hash_table{$prefix}))
{
push @{$hash_table{$prefix}},$_;
}
else
{
my @array=($_);
$hash_table{$prefix}=\@array;
}
}
foreach my $key (keys %hash_table)
{
if(@{$hash_table{$key}}1)
{
foreach my $item (@{$hash_table{$key}})
{
print OUTFILE $item;
}
}
}
close INFILE;
close OUTFILE;
#希望能够帮到你，代码如果有什么问题可以直接问
比较简单的做法：
1、分列——如果数据长度相同，左右字符长度相同，直接用 数据-分列-固定长度 分列就可以完成去除字符；
2、提取数字——加入上述几个数据放在A1,A2,A3,A4,A5....
在B1中输入=IF(ISERROR(--MID($A1,COLUMN()-1,1)),"",MID($A1,COLUMN()-1,1))，一直向右拖动到所有数据*长度所在的列（比如数据都是7位的，拖到I列就可以了），向下拖动到数据在的最后一行（比如有5个数据，拖动到I5就好了），然后在J1中输入 =B1C1D1E1F1G1H1I1，向下拖动到最后一行（J5）
比较复杂的方法：
用VBA提取数字，以下这个代码可以实现：
Attribute VB_Name = "数字提取模块"
Public Function GetNum(T As String, D As String)
'本公式可以从单元格文本 T 中提取数字，并按 D 的值选择输出结果，
'如果 D = “”，则直接提出数字，如果 D = + ,则输出所有数字相加后的和，
'如果 D 的值为其他，则输出数字并以 D 作为数字之间的分隔符
'注意：D 的数值必须输入，如果为空，请输入""，如果为其他值，请输入"*"（*代表其他值）
Dim a, Res, N(), m
If Len(T) 0 Then
If D = "+" Then
For i = 1 To Len(T)
If (Asc(Mid(T, i, 1)) = 48 And Asc(Mid(T, i, 1)) = 57) Then
Res = Res Mid(T, i, 1)
End If
Next
If Len(Res) 0 Then
ReDim N(1 To Len(Res))
For m = 1 To Len(Res)
N(m) = Val(Mid(Res, m, 1))
Next
Res = Application.WorksheetFunction.Sum(N())
GetNum = Res
End If
Else
For i = 1 To Len(T)
If (Asc(Mid(T, i, 1)) = 48 And Asc(Mid(T, i, 1)) = 57) Then
Res = Res Mid(T, i, 1) D
GetNum = Left(Res, Len(Res) - Len(D))
End If
Next
End If
Else
GetNum = ""
End If
If Len(GetNum) = 0 Then
GetNum = ""
End If
End Function
将这段代码，用插入宏的形式复制到表格VBA内，就可以直接用=GETNUM(,"")的形式取出数值
其实基金还是可以的，最主要看自己的风险承受能力以及自己的钱多久不用，适合买吗
