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
Subscribe to:
Post Comments (Atom)
Import data from SQL
Macro to import data from SQL using ADO connection string: Sub Import_data_from_SQL() ' Tools -> References -> Microsoft Active...
-
If you want to add a new pop up button on mouse right click menu and as soon as you click on it . It shows you multiple buttons with macro a...
-
If you have added the shape in the sheet and now you want to change it color , text , font size ,etc using VBA. Snapshot below Code- Su...
No comments:
Post a Comment