永发信息网

如下图,在Excel里怎么批量把一列文本自动分为A选项,B选项,C选项,并用<p></p>标签包含起来?

答案:5  悬赏:10  手机版
解决时间 2021-04-29 00:59
如下图,在Excel里怎么批量把一列文本自动分为A选项,B选项,C选项,并用<p></p>标签包含起来?
最佳答案
答:编写自定义函数来实现。
按ALT+F11组合键,打开VB窗口,执行"插入"-"模块",复制下面代码进去。回到工作表使用该公式如:=tran(A1)
Function Tran(Rng As Range)
    Dim Arr As Variant
    Dim Str As String
    Dim i As Integer
    Str = "ABCDEFGHIJKLMN"
    Arr = Split(Rng, "|")
    For i = 0 To UBound(Arr)
        Arr(i) = "" & Mid(Str, i + 1, 1) & ":" & Arr(i) & "
"
    Next i
    Tran = Join(Arr, String(3, " "))
End Function
全部回答
先用“分列”将数据分成4列,再用公式组合就简单了


先分列 再用公式加加上A:,B:,C:,D:并每个都用
,再用公式合并
1、分列--分列标志,用 | 做标志 分列多个选项。
2、A1:

B1:

C1: 选项a D1=A1&C1&B1 (结果为

选项a


(不懂vb的笨办法 ,注意用下拉实现公式复制,注意p标签要位置固定用$)
="

A:"&SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A1,"|","
B:",1),"|","
C:",1),"|","
D:",1)&"

"
可以用这个公式
这个里面的A1改成你的表里要调整的单元格,然后下拉就可以额
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
送女生生日礼物要送什么
现在QQ三国几级就可以升级图标?
为何她们要用这样的眼光看人
怡乐路地址在什么地方,想过去办事
我桌面上有一个文件怎么也删不掉,粉碎也没有
天龙八部在哪里购买元宝便宜
诺基亚N92多少钱
lols8不能玩暴伤了吗
问问可以解决一些学习上的问题吗
咨询一下各位专业人士,哪家广告传媒公司拍摄
炫舞幸运金币是什么啊
??????? 我想下东西但内存不对 电脑上能出来
吃止痛片有什么负作用
我是超级QQ,为何升级比没有超级QQ升级更慢?
维加妮酒庄我想知道这个在什么地方
推荐资讯
描述三峡人家诗词,美丽优美的地方三峡人家300
怎样才能赚好多钱
关于wcg2009
有咩电影好体啊,最主要好体!!!
《魔女幼熙》有续集吗???
有关摩擦起电的问题
佳兆业广场西门在什么地方啊,我要过去处理事
如何抓住顾客的消费理念?
如果朋友找你借钱,你不想借,你会怎样拒绝…
如何用帐号密码形式来提交表格
安庆到洛阳多少公里,杭州到洛阳多长时间,杭
关于工伤保险
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?