excel - 删除长度小于 8 个字符的单元格
问题描述
我有一些有几千行的电子表格。我想要一个宏来计算“A”列中单元格中的字符数,如果该行少于 8 个字符,则删除该行。
解决方案
请在 Excel 上运行此代码
Sub DelRows()
Dim LR As Long, i As Long
Application.ScreenUpdating = False
LR = Range("A" & Rows.Count).End(xlUp).Row
For i = LR To 1 Step -1
If Len(Range("A" & i).Value) < 8 Then Rows(i).Delete
Next i
Application.ScreenUpdating = True
End Sub
推荐阅读
- java - buildSrc:无法为 org.gradle.api.internal.artifacts.dsl.dependencies.DefaultDependencyHandler 类型的对象获取未知属性
- winforms - Click-Once 应用程序的用户可访问文件夹
- python - 在 python 中,这是做什么的: tan_y[:-1][np.diff(tan_y) < 0]
- svn - 搜索托管在 tigris.org 上的旧代码:svnwcrev-1.0.tar.gz
- ios - 使用电容器的 iOS 离子应用程序中的 Google SignIn 集成
- python - 安装 Python 包时遇到问题
- java - 在空格处拆分字符串,但仅在引号之外
- python - PyOWM 无属性
- android - 如何在 Logcat 中获取 Firebase 数据库选定条目的密钥?
- apache - .htaccess 重定向而不更改 url 相同的主机