wps表格怎么把一段字的第二个字跟第六个字隐藏

如题所述

楼主想要单独的把单元格里面的两个字符隐藏,这个好像是没法实现。目前倒是想到一个办法,那就是使用星号(*)把原来的字符替换。

(一)VBA程序代码如下:(程序运行前应当做好数据备份,以免丢失)

Sub Replace_2_6()
Dim i1, i2, str1

On Error Resume Next

Set mysheet1 = ThisWorkbook.Worksheets("Sheet1")

For i1 = 2 To 1000  '从第2行到1000行

 If mysheet1.Cells(i1, 1) <> "" Then  '如果单元格不是空白,则
 
  For i2 = 2 To 6 Step 4  '替换第2、6个字符
   
   mysheet1.Cells(i1, 1) = _
   WorksheetFunction.Replace(mysheet1.Cells(i1, 1), i2, 1, "*")  '替换成星号
   
  Next
  
 End If
 
Next

End Sub

(二)VBA程序运行之后的结果如下:

温馨提示:答案为网友推荐,仅供参考
第1个回答  2019-04-12
能说的详细点吗?
第2个回答  2019-04-13

使用数据-分列-固定宽度,将一列分成你想要的几个列,注意列中没有合并单元格,列后要有足够的空列来存放分好的列。

再建一列,把你要的列连起来,公式:=单元格1&单元格2&单元格3,有几列就合并几个。

用不着的列选中-右键-隐藏