I want find the lowest price at the row and all other

values at this row. This should be written at the
first
row, and the other higher price should be listen up
down!

Option Explicit


'I will find at a Excel-Sheet the lowest price at the
row level
' all other values should be deleted
'like:
'Column: A B C D E F G H
' row 5: x x x 43€ x x x x

Sub calculate_lowest_price()
Dim ColumnCount As Integer
Dim RowCount As Integer
For RowCount = 1 To Selection.Rows.Count
For ColumnCount = 1 To Selection.Columns.Count

Next RowCount
Next ColumnCount
'Worksheets(1).Calculate



End Sub