我在Ubuntu上使用BlackBerry WebWorks 2.2.0.15,项目在添加应用插件之前显示。
添加插件 Sub Delete_DuplicateTotalNet()
Dim WS As Worksheet, row1 As Long, row2 As Long, rng As Long
For Each WS In Sheets
On Error GoTo NextWS
With WS
If WS.Visible = xlSheetVisible Then
row1 = WorksheetFunction.Match("Total Net", .Columns(3), 0)
row2 = WorksheetFunction.Match("Program Operating Net", .Columns(3), 0)
If .Range("D" & row1).Value = .Range("D" & row2).Value And _
.Range("E" & row1).Value = .Range("E" & row2).Value And _
.Range("F" & row1).Value = .Range("F" & row2).Value And _
.Range("G" & row1).Value = .Range("G" & row2).Value And _
.Range("H" & row1).Value = .Range("H" & row2).Value And _
.Range("I" & row1).Value = .Range("I" & row2).Value And _
.Range("J" & row1).Value = .Range("J" & row2).Value And _
.Range("K" & row1).Value = .Range("K" & row2).Value Then
.Rows(row1).Delete
End If
End If
End With
NextWS:
Err.Clear
Next WS
End Sub
时无法预览主屏幕,但在发布时可以在我的设备上使用!
我做了一些研究,我发现了这个old。
答案 0 :(得分:0)
这是一个简单的修复方法,可以通过添加JS errors来继续测试:
function getReadOnlyFields() {
try {
var success = function (data, response) {
readOnlyValues = data;
},
fail = function (data, response) {
throw data;
};
if (!readOnlyValues) {
exec(success, fail, ID, "getReadOnlyFields", null);
}
}
catch(err) {
console.log(err);
}
}