Question

我刚刚有一个Windows 10＆＃34;创作者更新＆＃34;在我的工作笔记本电脑上（不能回到以前的版本）。现在我的一个宏坏了。这个宏非常重要，也是我工作的核心。我用它为一家全球主要公司创建复杂的多个实体日记帐分录。这个宏工作了一年多的时间，并且让我感到困惑的是我已经完成了无数个小时的测试可能会出现错误。

破解的代码如下。中断的行是自动填充行

    fromrangeb = "H5:Q" & (4 + count_from)

Sheet3.Range("H5:Q5").AutoFill Destination:=Range(fromrangeb), Type:=xlFillDefault

我得到的错误是＆＃34;运行时错误＆＃39; 1004＆＃39;：Range类的自动填充方法失败。

我看不出有什么错误，并且变量fromrangeb被声明为字符串，当我在调试窗口中将鼠标悬停在它上面时，其值为H5：Q34。此外，如果我将宏按钮复制到Sheet3并按下它，按钮工作完全正常。如果我特意告诉宏在代码中运行第三张，为什么我需要在sheet3上放置宏按钮？

我希望此代码能够在sheet1上运行，因为这是每个人用来填充模板的工作表。

可能导致这种情况发生的原因是什么？还有其他人有这个问题吗？

如果我将最简单的宏编写为如下所示，除非我的工作簿在sheet1上，否则它会正常工作（我在单元格H7中的值为1）。

Sub Macro1()

    Worksheets("Sheet1").Range("H7").AutoFill Destination:=Range("H7:H20"), Type:=xlFillSeries

End Sub

当我在代码中专门调出表单时，我不应该在表单上运行代码。我写了很多VBA程序，这就像某种bug一样尖叫。我还没有在网上找到这个问题的其他人。

我是疯了还是通过最新的Win 10 Creator更新这是一个错误？

这个宏同时停止了对六个同事计算机的工作，他们都进行了更新。我有一个解决方法（通过从隐藏的工作表3中运行宏），但我不想永久地更改我的分布式宏。有谁知道这个bug是否会被修复？

Windows 10 Creator更新自动填充错误

0 个答案: