`
阅: 700 | 回: 3
发表于2023/8/4 16:25:46 楼主 
头像 等级:初学者
积分:2
财富值:2.0
身份:普通用户

如何删除U列中不可见字符和空格的VBA代码  表格是从U8系统导出来的  

HRFR-4UV M
HRG-4150 CTI
这种格式的

我的个性签名
发表于 2023/8/4 16:28:58   
头像 等级:初学者
积分:2
财富值:2
身份:普通用户

Sub 删除不可见字符和空格()
    Dim ws As Worksheet
    Dim rng As Range
    Dim cell As Range

    Set ws = ThisWorkbook.Worksheets("Sheet1") '根据实际情况修改工作表名称
    Set rng = ws.Range("U2:U200")

    For Each cell In rng
        cell.Value = Replace(cell.Value, " ", "") '删除空格
        cell.Value = Replace(cell.Value, Chr(160), "") '删除不可见字符
    Next cell
End Sub

我的个性签名
发表于 2023/8/4 16:29:37   
头像 等级:初学者
积分:2
财富值:2
身份:普通用户
这个代码提示 类型不对  13 
我的个性签名
发表于 2023/8/4 16:44:10   
头像 等级:传说级人物
积分:2532
财富值:6
身份:系统管理员

删除不可见字符

方方格子安装教程http://www.ffcell.com/WenKu/article.aspx?id=376

快速回复

目前不允许游客发表,请 登录 注册 后再发贴。