Question

我不完全确定发生了什么，但是一切都很好，我们有一个名为FallingLeavesChristmas.min.js的东西，而且它没有专门在这个页面上激活。我一开始认为它本身就是js，但事实并非如此。它可以在其他页面上工作，而不是专门的。

Public Sub DeleteRows()
  Dim RowToTest As Long

  Call setVariables   '***sets wsName variable

  'Code to delete unneeded rows based on cell value in Column "A"
  For RowToTest = Cells(Rows.Count, 1).End(xlUp).Row To 1 Step -1
    With ActiveWorkbook.Worksheets(wsName).Cells(RowToTest, 1)
      If Not (.Value Like "???????" Or .Value Like "*[,]*" Or .Value Like "*?[/]*?[/]*??" Or _
                .Value Like "?????[:]*" Or .Value = "INPATIENT" Or .Value = "OUTPATIENT") Then
        ActiveWorkbook.Worksheets(wsName).Rows(RowToTest).Delete
      End If
    End With
  Next RowToTest
End Sub

此网站是：http://www.eternagaming.com/home2clone

Answer 1

您需要在任何需要jquery的文件之前移动或添加jquery.js。看起来e-particles.js正在抛出错误。在此之前尝试移动它。

Answer 2

我无法弄清楚出了什么问题所以我只是删除了整个东西并使用CSS创建了雪效果。

有些东西干扰了我的Jquery

2 个答案: