小编use*_*844的帖子

我想隐藏的所有行的值在列A的细胞是空白(即空).我试图使用以下代码:

Range("A7:A117").SpecialCells(xlCellTypeBlanks).EntireRow.Hidden = True

但是,A列中的每个单元都有一个VLOOKUP公式,并且xlCellTypeBlanks考虑具有公式的单元格,但没有值,不能为空.

所以我尝试使用以下代码,但它非常慢.

For i = 17 To 117
  If ActiveSheet.Cells(i, 1) = "" Then
    ActiveSheet.Cells(i, 1).EntireRow.Hidden = True
End If

我该如何加快速度？

我有以下数组:

Array ( [2010-10-30] => 1 [2010-11-11] => 1 [2010-11-13] => 11 )

我试图用第一个和最后一个元素之间的所有缺少日期填充数组.我试图使用以下但无处可去:

foreach($users_by_date as $key => $value){
    $real_next_day = date($key, time()+86400);
    $array_next_day = key(next($users_by_date));
    if($real_next_day != $array_next_day){
      $users_by_date[$real_next_day] = $value;
    }
}