Showing posts with label Fill Blank Cells with Zero. Show all posts
Showing posts with label Fill Blank Cells with Zero. Show all posts

Thursday, September 1, 2011

Fill Blank Cells in a Range with Zero Using VBA

If you want to fill blank cells in a range with zero value.-


Here is the code-


Sub fill_zero_in_blank_cells()
Dim rngfil As Range, cell As Range
' change the range as per ur requirement
Set rngfil = Range("a1:b65")
For Each cell In rngfil
If cell.Value = vbNullString Then
cell.Value = 0
End If
Next cell
End Sub


Non VBA Solution-


step 1

Select the whole Range.Press f5. click On special. -> choose blanks and click on ok




Step 2 type Zero "0" and press CTRL+ENTER





Import data from SQL

Macro to import data from SQL using ADO connection string: Sub Import_data_from_SQL() ' Tools -> References -> Microsoft Active...