取消服务器excel文件只读,excel表格怎么取消只读模式

Excel中存在合并的单元格,对我们来说已经是司空见惯啦!在另外一些时候我们又需要将已经合并的单元格的值,进行取消合并,并每个都填充原来合并之前的值。

对于结构简单的带有合并单元格的表格,我们一般正常操作是手动取消单元格合并,然后手动进行定位,然后填充空白值。但是如果有几千行数据,或者上万行数据需要取消合并单元格时在每个单元格中保留内容,你确定需要一个一个的手动进行操作吗?其实你大可不必慌张,我们可以一键操作即可。

照例举一个例子,源数据如下图所示,B列为已经合并的数据,需要将部门字段取消合并单元格并在每个单元格中保留内容。

源数据:

我们先看看动画执行的效果：

看了以上的动画，你是不是发现批量操作取消合并单元格，并保留原来的值，其实很简单。

您只需要将以下代码复制到Excel的VBE窗口的模块中，然后执行程序即可。

PS:操作流程如下，按照顺序1到4步，然后执行程序。

附上Excel VBA代码

Sub CancelMergeCells()

Dim r As Integer,MergeStr As String,MergeCot As Integer,i As Integer

Dim rng As Range

On Error Resume Next

选择需要合并的列，由用户进行制定，并限定值

Set rng = Application.InputBox("请输入需要合并的列", "区域选择", , , , , , 8)

将用户指定的单元列取得行号

k = rng.Column

With Sheet1

取得最大循环数

r = .Cells(.Rows.Count, 1).End(xlUp).Row

For i = 2 To r

将合并单元格赋值给到变量

MergeStr = .Cells(i, k).Value

计算合并单元格区域的大小

MergeCot = .Cells(i, k).MergeArea.Count

取消合并单元格

.Cells(i, k).UnMerge

将取消的单元格进行赋值填充

.Range(.Cells(i, k), .Cells(i + MergeCot - 1, k)).Value = MergeStr

循环的步长进行累加，减少循环的次数

i = i + MergeCot - 1

添加边框线，数据美化

.Range("A1:C" & r).Borders.LineStyle = xlContinuous

End With

End Sub

以上就是今天要和大家分享的技巧，希望对大家有所帮助，祝各位一天好心情！

唯有不断学习，才能不被淘汰！

Excel中每一个方法都有特定的用途，不是他们没有用处，只是你不了解或者暂时用不着，建议你收藏起来，万一哪天用着呢？

取消服务器excel文件只读,excel表格怎么取消只读模式相关推荐

关于asp.net C# 导出Excel文件打开Excel文件格式与扩展名指定格式不一致的解决办法...
-----转载:http://blog.csdn.net/sgear/article/details/7663502 关于asp.net C# 导出Excel文件打开Excel文件格式与扩展名指定格 ...
freemaker导出excel文件使用Excel打不开
freemaker导出excel文件使用Excel打不开最近在做导出的功能过程中,发现导出的excel只能用wps打开,用office打开就报文件损坏网上搜了一些文章,找到了解决方案只要把ss: ...
java文件无法导出excel文件,【excel表格文件格式无效】java导出excel，excel打不开，报文件格式无效，怎么解决！...
excel提示打开的文件.xls的格式与文件扩展名不一致怎么办如果打开文件的格式与文件的扩展名不一致,只要能够打开就不用去管他. java导出excel,excel打不开,报文件格式无效,怎么解决 ...
python合并excel文件关键字_使用 Python 合并多个格式一致的 Excel 文件，Excel 表格...
一问题描述最近朋友在工作中遇到这样一个问题,她每天都要处理如下一批 Excel 表格:每个表格的都只有一个 sheet,表格的前两行为表格标题及表头,表格的最后一行是相关人员签字.最终目标是将每个 ...
oracle 数据导出 excel 自动分多个文件,从oracle数据库中导出大量数据到excel中为什么自动分成了好几个excel文件《excel表格新手入门》...
EXCEL中一个单元格中多行文本如何导入或复制到SQL SERVER 数据库表中? 保留换行符保存进数据表啊,读取出来显示的时候根据需要进行转换就行了,比如要在网页上显示,可以把换行符转换成HTML的 ...
excel文件工作表保护如何取消
excel文件设置了工作表保护,想要编辑excel文件就需要对excel文件的工作表保护进行撤销,但是如果想要撤销的前提是输入正确的密码,因为在设置工作表保护的时候设置了密码,所以想要撤销保护也需要输 ...
前端实现下载excel文件的el-table表格数据
创建一个js文件安装依赖 file-saver xlsx 在刚才创建的js文件中粘以下代码我这里文件名就叫htmlToExcel.js import FileSaver from "f ...
XX健康:预约管理-预约设置日历插件文件简单下载Excel文件解析Excel表数据批量导入
1. 需求分析前面我们已经完成了检查项管理.检查组管理.套餐管理等.接下来我们需要进行预约设置,其实就是设置每一天的体检预约最大数量.客户可以通过微信端在线预约,在线预约时需要选择体检的时间,如果客 ...
python怎么打开excel文件并处理_Python利用openpyxl处理Excel文件（Excel文件基本操作）...
上一篇,我们简要介绍了openpyxl及其安装过程,这一篇我们学习使用openpyxl处理Excel的具体过程,力争涵盖大多数官方文档中相关内容,对这一知识点进行简单的汇总. 一.学习目标 (一)op ...
Pandas读取Excel文件XLRDError: Excel xlsx file； not supported
问题背景: 工作中大部使用Pandas分处理的数据都是以csv后缀结尾的文件,但是突然换成xlsx后缀的表格之后,出现的一些错误. 问题现象: XLRDError: Excel xls ...

取消服务器excel文件只读,excel表格怎么取消只读模式

取消服务器excel文件只读,excel表格怎么取消只读模式相关推荐

最新文章

热门文章