如果单元格值为空,我想删除多个工作表上的行(仅限工作簿中的特定行)。请注意,行中的其余字段确实包含数据。到目前为止,我有以下不确定如何指定工作表。有人可以帮忙吗?
Sub sbDelete_rows_if_cell_blank()
Dim lRow As Long
Dim iCntr As Long
lRow = 2000
For iCntr = lRow To 1 Step -1
If Cells(iCntr, 1).Value = "" Then
Rows(iCntr).Delete
End If
Next
End Sub
答案 0 :(得分:3)
将代码置于此循环中将循环遍历此代码所在的工作簿中的所有工作表,并在每个工作表中运行代码。
double a = Double.parseDouble(editDieselRate.getText().toString());
double b = Double.parseDouble(editDieselQty.getText().toString());
double c = a * b;
editAmount.setText(String.valueOf(c));
更新了D_Bester对.container {
width: 200px;
height: 200px;
position: relative;
background: url(http://www.indiacrunch.in/wp-content/uploads/2014/11/Astronaut-in-India.jpg);
background-size: cover;
background-position: center;
}
.container button {
position: absolute;
top: 50%;
left: 50%;
transform: translate(-50%, -50%);
}
条件的建议
更新2:参见评论
这将做我认为你想要实现的目标
<div class="container">
<button>Go</button>
</div>
答案 1 :(得分:1)
您可以遍历工作表,然后使用特殊单元删除空白。 Yoi还可以设置循环,因此它不会删除&#34; Sheet1&#34;中的空白(在此示例中)
Sub DeleteBlnkRows()
Dim sh As Worksheet
For Each sh In Sheets
If sh.Name <> "Sheet1" Then
sh.Columns("A:A").SpecialCells(xlCellTypeBlanks).EntireRow.Delete
End If
Next sh
End Sub