我有一个excel工作表,像这样的变体去除细胞:Excel VBA中 - 基于空白另一列
HEADING <--A1 HEADING <-- this is B1
dhg kfdsl
56 fdjgnm
hgf fdkj
tr
465 gdfkj
gdf53
ry 4353
654 djk
354 <-- a12 blah <-- this is B12
我试图把在列A中的单元格范围为变体和除去从该变体中的任何数据,如果在列B中的细胞(用于在列A中的同一行)是空白的。然后我想该变体复制到一个新的列(即山坳C)
所以我预期的结果是:
HEADING <--C1
dhg
56
hgf
465
ry
654
354 <-- C8
这是我的代码至今:
Dim varData As Variant
Dim p As Long
varData = originsheet.Range("B2:B12")
For p = LBound(varData, 1) To UBound(varData, 1)
If IsEmpty(varData(p, 1)) Then
remove somehow
End If
Next p
挑剔的注意事项:aCell和B细胞变异体在上面的声明。应该像_Dim一个量程,b以距离,c作为Range_ – ray 2011-06-14 13:31:45
@ray你是对的 - 我认为它的工作原理一样,在VB(不VBA)。 – Jay 2011-06-14 14:21:36