i have 4 columns ,format of cell is text
(10,2, , ,)

Dim dblMin As Double
dblMin = Application.Min(CDbl(Cells(1, 1)), CDbl(Cells(1, 2)), CDbl(Cells(1, 3),CDbl(Cells(1, 4)))

i want to take min of 4 columns , when i take min its shows zero to me i need to eliminate zero and consider 2 as mininum

please guide me regarding this ..with vba code bit urgent