隐藏＆amp;使用If功能VBA取消隐藏所有工作表上的列

Question

我试图仅在一个名为VPL的工作表上隐藏/取消隐藏特定列，然后在工作簿中的其余工作表上隐藏/取消隐藏另一组特定列。

这是我到目前为止所获得的代码，但它只在名为VPL的工作表上工作，并且在循环浏览工作簿中的其余工作表时没有将列隐藏在任何其他工作表上。

if (current==NULL){
   printf("%d",current->data);  //this is the place cause the seg fault. 
   return NULL;
}

我非常感谢任何帮助，因为我在vba中不是很好。

Answer 1

没有工作表参考，您的代码

Columns("L:M").EnterColumn.Hidden = False

仅会引用活动表格。由于循环遍历多个工作表，因此需要在for循环中引用工作表变量，如此

wsU.Colunns("L:M").EnterColumn.Hidden = False

同样适用于

wsH.Columns("L:M").EntireColumn.Hidden = True