摘要： Sub createfolder()
‘******检查文件夹是否存在******
‘******如果不存在，就新建文件夹******
‘******并设置属性为隐藏******
‘设置属性：setAttr 文件(或文件夹) , 属性
‘获取属性：getAttr 文件(或文件夹) , 属性
Excel表格输入身份证号码乱码怎么回事
当我们录入数字字母，比如身份证时候，出现乱码怎么回事呢?原因和中文乱码一样吗?该怎么解决?相信很多用户遇到这样的问题，不过别着急，下面和小编一起来看看Excel表格输入身份证号码乱码的解决方法。 方法一： 1、打开Excel表格之后，把身份证号这个竖列全部选中。 2、选中之后，右击打开“设置单元
‘******引用Microsoft Scripting Runtime******
Dim datafolder As String
Dim chfolder As Object
Set chfolder = CreateObject("scripting.filesystemobject")
datafolder = ThisWorkbook.Path & "\数据库备份\"
If Not chfolder.FolderExists(datafolder) Then
chfolder.CreateFolder (datafolder)
SetAttr datafolder, vbHidden vbReadOnly
MsgBox "The folder " & datafolder & " was created!"
End If
‘******文件和文件夹属性******
‘常量 数值 属性名称
‘vbNormal 0 普通文件（无其他属性）
‘vbReadOnly 1 只读，不可修改
‘vbHidden 2 隐藏
‘vbSystem 4 系统文件
‘vbDirectory 16 目录
‘vbArchive 32 存档
‘****************************
End Sub
RIGHT函数如何提取数值？
excle中的RIGHT函数可以提出字符串最后一位开始到指定个数字符的函数。下面是小编为大家精心整理的关于RIGHT函数如何提取数值？希望能够帮助到你们。 方法/步骤 1打开对应的excle表格，如下图，需要提取A列的后三位数在B列显示 2在B列输入“=”查找出“RIG
