Eu não acho que haja uma maneira de fazer isso no excel.
Usando o vba, uma macro como essa funcionaria. Isso irá trocar todas as séries no gráfico ativo. Nenhuma verificação de erros ou qualquer coisa incluída.
Sub swap()
Dim seriesformula() As String
For Each mySeries In ActiveChart.SeriesCollection
seriesformula() = Split(mySeries.Formula, ",")
mySeries.Formula = seriesformula(0) & "," & seriesformula(2) & "," & seriesformula(1) & "," & seriesformula(3)
Next
End Sub