Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Swap de cellules

Swap de cellules

7 réponses
Avatar
PhC
Si j'ai une valeur x dans cellule A1 et une autre valeur Y dans celulle A2,
comment faire pour inverser les deux valeurs ?

Actuellement je fais copier A1 sur une autre celulle ensuite copier A2 sur
A1 et ensuite copier l'autre celulle sur A2.

Existe-il un moyen plus simple ,

Merci
Signaler un problème avec ce contenu

7 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Jacky
Bonjour

Peut-être que

En A2==> clique droit couper
En A1==>Clique droit insérer les cellules coupées

Salutations
JJ

"PhC" a écrit dans le message de
news:
Si j'ai une valeur x dans cellule A1 et une autre valeur Y dans celulle
A2,

comment faire pour inverser les deux valeurs ?

Actuellement je fais copier A1 sur une autre celulle ensuite copier A2 sur
A1 et ensuite copier l'autre celulle sur A2.

Existe-il un moyen plus simple ,

Merci



Avatar
Jacky
Si c'était en VBA

[A2].Cut
[A1].Insert Shift:=xlDown

JJ

"PhC" a écrit dans le message de
news:
Si j'ai une valeur x dans cellule A1 et une autre valeur Y dans celulle
A2,

comment faire pour inverser les deux valeurs ?

Actuellement je fais copier A1 sur une autre celulle ensuite copier A2 sur
A1 et ensuite copier l'autre celulle sur A2.

Existe-il un moyen plus simple ,

Merci



Avatar
PhC
Ok d'accord. Merci.
Mais si les celulles ne sont pas contigües ? Et qu'ily a des données au
miliu qui ne doivent pas être modifiées ?

A1 et A2 était un exemple, mal choisit peut être, mais ma demande concerne
une commande qui permettrait d'échanger deux ceulles, ou deux groupes de
celulles.

Merci.

"Jacky" wrote:

Bonjour

Peut-être quen

En A2==> clique droit couper
En A1==>Clique droit insérer les cellules coupées

Salutations
JJ

"PhC" a écrit dans le message de
news:
Si j'ai une valeur x dans cellule A1 et une autre valeur Y dans celulle
A2,

comment faire pour inverser les deux valeurs ?

Actuellement je fais copier A1 sur une autre celulle ensuite copier A2 sur
A1 et ensuite copier l'autre celulle sur A2.

Existe-il un moyen plus simple ,

Merci








Avatar
gilbert
bonjour

si A3 est vide
dans un module standard

Sub Macro1()
Selection.Cut Destination:¬tiveCell.Offset(2, 0)
ActiveCell.Offset(1, 0).Select
Selection.Cut Destination:¬tiveCell.Offset(-1#)
ActiveCell.Offset(1, 0).Select
Selection.Cut Destination:¬tiveCell.Offset(-1, 0)
ActiveCell.Offset(-1, 0).Select
End Sub

ensuite se positionner sur A1 et lancer la macro

voilà

salutations

Gilbert

"PhC" a écrit dans le message de
news:
Si j'ai une valeur x dans cellule A1 et une autre valeur Y dans celulle
A2,

comment faire pour inverser les deux valeurs ?

Actuellement je fais copier A1 sur une autre celulle ensuite copier A2 sur
A1 et ensuite copier l'autre celulle sur A2.

Existe-il un moyen plus simple ,

Merci



Avatar
Misange
Bonjour
http://www.excelabo.net/xl/fonctions.php#swap
Une petite sub de Pascal pour pallier une fonction manquante...

Sub Swap(ByRef t1, ByRef t2)
Dim t
t = t1
t1 = t2
t2 = t:
End Sub

Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta

on 05/11/2004 14:11:
Si j'ai une valeur x dans cellule A1 et une autre valeur Y dans celulle A2,
comment faire pour inverser les deux valeurs ?

Actuellement je fais copier A1 sur une autre celulle ensuite copier A2 sur
A1 et ensuite copier l'autre celulle sur A2.

Existe-il un moyen plus simple ,

Merci



Avatar
PhC
Merci.

Je voulais être certain que cette fonction pratique n'existait pas comme tel
dans les fonctions excel.

Maintenant je sais.

Merci


"Misange" wrote:

Bonjour
http://www.excelabo.net/xl/fonctions.php#swap
Une petite sub de Pascal pour pallier une fonction manquante...

Sub Swap(ByRef t1, ByRef t2)
Dim t
t = t1
t1 = t2
t2 = t:
End Sub

Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta

on 05/11/2004 14:11:
Si j'ai une valeur x dans cellule A1 et une autre valeur Y dans celulle A2,
comment faire pour inverser les deux valeurs ?

Actuellement je fais copier A1 sur une autre celulle ensuite copier A2 sur
A1 et ensuite copier l'autre celulle sur A2.

Existe-il un moyen plus simple ,

Merci






Avatar
AV
Je voulais être certain que cette fonction pratique n'existait pas comme tel


Une fonction (intégrée) ne peut que renvoyer un résultat et non (comme dans ce
cas) modifier quoique ce soit

AV