I can't seem to work out how to simply swap two items over in a
collection. I need to sort a collection of classes depending on the
value of a class property.

I've tried the following:-
1. First attempt
      For rowCount = 1 To m_rows.Count - 1
        Set currentRow = m_rows(rowCount)
        Set nextRow = m_rows(rowCount + 1)
        if currentRow.value < nextRow.value then
          set tempRow = currentRow
          set currentRow = nextRow
          set nextRow = tempRow
   This fails....

2. Clone method in the row class
   This method is as follows
      Public Sub clone(rowToClone as RowClass)

   When i call this wuth "currentRow.clone(nextRow)"
     This fails with "object does not suport this propety or method"

Any ideas? Or even better a easier way of doing this?

Thanks
Andy

You can't simply reassign values to items in a collection.  If you want
to change an item, you have to remove it and add a new one in its place:

For RowCount = 1 To m_rows.Count - 1
        Set CurrentRow = m_rows(RowCount)
        Set NextRow = m_rows(RowCount + 1)
        If CurrentRow.value < NextRow.value Then
            Call m_rows.Remove(RowCount)
            Call m_rows.Add(NextRow, before:=RowCount)
            Call m_rows.Remove(RowCount + 1)
            If RowCount < m_rows.Count - 1 Then
                Call m_rows.Add(CurrentRow, before:=RowCount + 1)
            Else
                Call m_rows.Add(CurrentRow)
            End If
        End If
        'Debug.Print m_rows(RowCount).value
 Next

Regards,

John.............