Excel中的Vba完全忽略了select

所以这个,当我运行例如下面的代码:

ActiveSheet.Cells(5, 4).Select ActiveCell.Value = "test" 

我从字面上从http://support.microsoft.com/kb/291308 (无论如何,第一行)复制。 显然当我说ActiveSheet.Cells(5,4).value = "test"它的工作,但重点是,select只是不工作。

我的意思是,我可能在这里大量吸吮,但我不知道有什么想法?

编辑:可能有用的添加到这,我得到的结果是它写入testing在我select的单元格之前,我按下代码所附的button。 因此,我声称它忽略了select。

编辑2:在另一台计算机上运行良好的一些Excel代码也不会运行在这一个由于excel skippin的select部分。

由于我的评论为您的问题提供了一个解决方法,我决定做一些更多的研究,以升级它的答案。

msdn网站提到.EnableSelection属性如下:

“只有在工作表受到保护时,此属性才会生效: xlNoSelection禁止在工作表上进行select, xlNoRestrictions允许selectLocked属性为False的单元格, xlNoRestrictions允许select任何单元格。

由于ActiveSheet.EnableSelection = xlNoRestrictions在你的工作表中工作,没有什么别的结论除了该表被保护。 但是, 为什么工作表是受保护的,我们不知道,但最有可能的是它是一个插件,触发某种保护,就像@S纳什在他的答案中提到的。 (当然,我也乐意听取其他意见/build议)。

您可以尝试删除加载项(请参阅本文 ),然后重新启动excel,看看问题是否仍然存在(如果可以的话,请回复,如果最终导致问题的附加组件,那么每个人都会感兴趣!)

如果你用这四行代替你的两行:

 ActiveSheet.Cells(5, 4).Select ActiveCell.Value = "test" MsgBox Selection.Address MsgBox ActiveCell.Address 

你看到了什么??

“编辑2:在另一台计算机上运行良好的一些Excel代码也不会运行在这一个由于优秀skippinselect部分。

这是我强烈的猜测:

在这台电脑的Excel中有一个加载项取消select。

 ActiveSheet.Cells(5, 4).Select 

除此以外

 ActiveSheet.Cells(5, 4).Select ActiveCell.Value = "test" 

应该始终工作。

尝试逐个禁用excel加载项以查找入侵者。 我知道,很多Excel插件,如路透社或彭博社的链接可能会干扰Excel单元格select。