EXCEL表格怎么设置快速抠文字

1.excel有很多格子,每个格子有三排文字,我想把每个格子里的一排字

建议你把这些数据粘贴到word里面 去处理 excel 处理这个 实在不是强项……

在word 中 就可以使用 替换命令来 替换了……

对于 字体有特殊要求 并且格式要求不同的 的东西 尽量不要再excel中来做 即使是做 也不要放在同一个单元格……像你现在这个样子 在excel 只能用VBA 来模拟你的操作才可以达到要求……这需要 你对VBA 比较熟悉才行……

转换到word里面去吧……

像你现在这样的 只想 修改 Design： 后边第一行的字母……那么 可以使用下面一段儿 代码……

Sub test()

Dim mycel As Range

On Error Resume Next

For Each mycel In ActiveSheet.UsedRange

en = WorksheetFunction.Find(Chr(10), mycel） '第一行末尾字符位置

With mycel.Characters(Start:=8, Length:=en - 8).Font '8 是 Design： 这几个字符之后开始修改的开始位置

.Name = "宋体" '字体的名称

.FontStyle = "加粗" '加粗

.Size = 16 '字号的大小

.Strikethrough = False '在此之下可选 不更改可以不要

.Superscript = False

.Subscript = False

.OutlineFont = False

.Shadow = False

.Underline = xlUnderlineStyleNone

.ColorIndex = xlAutomatic

End With

Next

End Sub

自己酌情修改一下吧……

alt+f11 打开vbe 窗口 插入 模块……粘贴这段代码……

然后 在要处理的 工作表 窗口 运行这个 宏……就可以了……

2.怎样快速拆分合并文本excel中的文本

首先，将单元格的宽度拉到能放下所有文字即可。

然后将这一列全部选中见下图

接着点击填充下面的两端对齐

之后你会发现很神奇的是不是很快就自动合并在一起了。

那么相反如何将下图很快的变为左侧的那种形式，有的朋友可以说我用复制粘贴，可是你要知道那样的话还得操作12次。

其实我们可以用相反的方法，首先将单元格的宽度往左拖到容纳两个字的位置

接着点击填充下面的两端对齐

你会发现很快就自动调整为我们想要的状态。是不是很方便呢