Warning: file_get_contents(/data/phpspider/zhask/data//catemap/2/facebook/8.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
使用宏在Excel中将数字格式转换为文本_Excel_Text_Numbers_Format_Vba - Fatal编程技术网

使用宏在Excel中将数字格式转换为文本

使用宏在Excel中将数字格式转换为文本,excel,text,numbers,format,vba,Excel,Text,Numbers,Format,Vba,我已经在Excel中创建了一个宏,用于将列编号格式转换为文本,以便在从文本文件复制/通过后不会更改编号格式: Sub ConvertBitColumn() ' ConvertBitColumn Macro ' This macro converts 3rd column of the worksheet to Text. Dim sht As Worksheet Set sht = ActiveSheet sht.Columns(2).NumberFormat = "@" End Sub 代码

我已经在Excel中创建了一个宏,用于将列编号格式转换为文本,以便在从文本文件复制/通过后不会更改编号格式:

Sub ConvertBitColumn()
' ConvertBitColumn Macro
' This macro converts 3rd column of the worksheet to Text.
Dim sht As Worksheet
Set sht = ActiveSheet
sht.Columns(2).NumberFormat = "@"
End Sub
代码运行良好,但questin中的列在某些单元格的左角显示一些绿色,是否有办法消除它,或者这是正常的?谢谢你的回复


Amy

绿色三角形表示单元格中有一个存储为文本的数字。Excel警告您,不能对格式为文本单元格的数字执行数学公式。由于听起来您实际上希望根据宏将数字作为文本,因此您可以在Excel中关闭错误检查,以消除这些讨厌的绿色三角形:

  • 单击“文件”选项卡
  • 在“帮助”下,单击“选项”
  • 在“Excel选项”对话框中,单击“公式”类别
  • 在“错误检查规则”下,清除格式为文本或前面带有撇号的数字复选框
  • 单击“确定”