SWAP
SWAP ExpressionA , ExpressionB
Troca o conteúdo de duas expressões.
As duas expressões devem ser capazes de agir como a parte esquerda de
uma atribuição.
Este é um equivalente mais rápido de executar o seguinte código:
Dim Temp As Variant
Temp = ExpressionA
ExpressionA = ExpressionB
ExpressionB = Temp
ExpressionA e ExpressionB são avaliadas duas vezes: uma como a esquerda e uma com o lado direito de uma atribuição, como mostrado acima. Cuidado com os efeitos colaterais em suas expressões!
Veja também