如何利用函数或公式或VBA，自动隐藏空白列？

点击联系发帖人 时间：2022-05-28 07:05

隐藏工作表并设置密码vba

这个工作簿（文件名）叫“提取工作表名.xlsm”，工作表（Sheet名）叫“有本事来提取我的名字啊”

CELL函数的第二个参数，可以是当前工作表的任意单元格，如果填写了当前工作表中的单元格，则会返回带有当前工作表名称的路径。

如果第二个参数不写，则函数返回的路径由当前哪个是活动工作表所定(鼠标点在哪个工作表哪个就是活动工作表，点击后需要按F9才刷新公式)

我们可以使用简单的搜索来提取工作表名

256指定了表名的最长长度，当然你不嫌麻烦的话，可以使用LEN()先计算下CELL()返回的字符串长度，然后减去FIND()函数找到的索引，获得表名长度。

参考链接第二个还介绍了用宏的方法，有兴趣的可以了解一下。

}

可以引用源表的单元格内容做判断，生成新表中的列。

例如判断源表中的身份证号的倒数第二位，在新表中生成性别男女

（假设身份证号全部是18位，如果有旧身份证的15位的情况，可以再嵌套一层判断，如果是15位的，用MID函数取最后一位，18位的取倒数第2位。

多层IF嵌套，可参考文章）。

第1步：用MID函数，从第17位开始，取1位字符

第2步：用MOD函数计算第1步中取到值除以2，得到余数，判断余数是否=0

第3步：如果第2步的值=0，表明是偶数，能被2除尽，是女性，否则是男性。

Sheet1!A2 即是对源表中单元格的引用（跨不同的工作簿文件也可以引用单元格，只要是在一台电脑上。）

}