一个宏(不是我的,但我“继承”它)运行多个循环。该代码有几千行,所以我只提供片段中循环的部分。 Dim repoLastRow As Integer, repoLastCol As Integer
Worksheets("ATT_LEV").Activate
With ActiveSheet
repoLastRow = .Cells(.Rows.Count, "A").End(xlU
我想要做的是在任何时候页面退出或导航离开时创建一个弹出框。现在我有 <script type="text/javascript">
function box()
{
var r=confirm("Message");
if (r==true)
{
window.location.href="yes.html";
}
else