excle表格中clear函数的具体使用方法。

千问 · 2011-9-18 09:28:58

sheet中没有clear函数。
VBA中可以用clear,例：Worksheets(\"Sheet1\").Range(\"A1:G37\").Clear
本示例清除Sheet1中A1:G37单元格区域的公式和格式设置。
AltF11调出VBA窗口
F2调出对象浏览器窗口，输入clear查找，在搜索结果里右键点击帮助，帮助里有用法和实例。

千问 · 2011-9-18 09:28:58

您想问的是clean函数吧，这个函数的作用是删除文本中的非打印字符。比如，在A1中有公式：=CHAR(7)defds123\"text\"defds123CHAR(7)，显示结果是“text”
如果再A2中输入公式：=CLEAN(A1)，则显示为“text”，这是因为从上面字符串中删除不能打印的字符CHAR(7)
需要补充说明的是，CHAR是一个文本类函数，它依据代码数字返回本机的字符集，CHAR(7)返回的字符是“”

千问 · 2011-9-18 09:28:58

CLEAN删除文本中不能打印的字符。对从其他应用程序中输入的文本使用CLEAN函数，将删除其中含有的当前操作系统无法打印的字符。例如，可以删除通常出现在数据文件头部或尾部、无法打印的低级计算机代码。

要点CLEAN函数被设计为删除文本中7位ASCII码的前32个非打印字符（值为0到31）。在Unicode字符集（Unicode：UnicodeConsortium开发的一种字符编码标准。该标准采用多（于一）个字节代表每一字符，实现了使用单个字符集代表世界上几乎所有书面语言。）中，有附加的非打印字符（值为127、129、141、143、144和157）。CLEAN函数自身不删除这些附加的非打印字符。有关如何删除文本中附加的非打印字符的示例，请参阅删除文本中的空格和非打印字符。

语法

CLEAN(text)

Text要从中删除非打印字符的任何工作表信息。

VBA开发才有clear函数。

千问 · 2011-9-18 09:28:58

根据前人的代码改了一下：这个自动触发的代码不用加在你原有代码中
PrivateSubWorksheet_Change(ByValTargetAsRange)
DimcelAsRange
ForEachcelInTarget

Ifcel.ColumnMod2=1Andcel.Column10Then\'当输入内容的单元格大于J列，且为奇数列时后一单元格写时间
Ifcel=\"\"Then
cel.Offset(0,1).Clear
Else
Ifcel.Offset(0,1)=\"\"Thencel.Offset(0,1)=Datedefds123\"\"defds123Time
EndIf
EndIf
Nextcel
EndSub