I am trying to find out if the information in cell location is blank and if it is its fill the blank values with zeros. However with the logic I am using right now I never enter the inner part of the if check because its never blank.

However I know the values in those cells are blank is there any other way to check to see the value in the cell locations.

VB Code:
  1. 'Using Excel Reference determine how many columns are in the sheet.
  2.         For nCol = 1 To sheet.Cells.SpecialCells(Excel.XlCellType.xlCellTypeLastCell).Column
  3.             'If the row 6 and current column cell is blank
  4.             If sheet.Cells.Item(6, nCol).Equals("") Then
  5.                 If Not (sheet.Cells.Item(4, nCol).Equals("")) Then
  6.                     With Progress
  7.                         For nRow = 0 To Me._accPeriod
  8.                             'Displaying values from data into excel sheet.
  9.                             sheet.Cells.Item(nRow + 6, nCol) = 0
  10.                             sheet.Cells.Item(nRow + 6, 1 + nCol) = 0
  11.                             .ProgressBar.Value += 1
  12.                         Next nRow   'row increment
  13.                     End With
  14.                 End If  'None blank cell
  15.             End If  'Blank cell
  16.         Next nCol 'Total number of columns increment