CONNEXION
  • RetourJeux
    • Sorties
    • Hit Parade
    • Les + populaires
    • Les + attendus
    • Soluces
    • Tous les Jeux
    • Gaming
  • RetourActu Gaming
    • News
    • Astuces
    • Tests
    • Previews
    • Toute l'actu gaming
  • RetourBons plans
    • Bons plans
    • Bons plans Smartphone
    • Bons plans Hardware
    • Bons plans Image et Son
    • Bons plans Amazon
    • Bons plans Cdiscount
    • Bons plans Decathlon
    • Bons plans Fnac
    • Tous les Bons plans
  • RetourJVTech
    • Actus High-Tech
    • Intelligence Artificielle
    • Smartphones
    • Mobilité urbaine
    • Hardware
    • Image et son
    • Tutoriels
    • Tests produits High-Tech
    • Guides d'achat High-Tech
    • JVTech
  • RetourCulture
    • Actus Culture
    • Culture
  • RetourVidéos
    • A la une
    • Gaming Live
    • Vidéos Tests
    • Vidéos Previews
    • Gameplay
    • Trailers
    • Chroniques
    • Replay Web TV
    • Toutes les vidéos
  • RetourForums
    • Hardware PC
    • PS5
    • Switch 2
    • Xbox Series
    • Switch
    • Pokemon pocket
    • FC 25 Ultimate Team
    • League of Legends
    • Tous les Forums
  • PC
  • PS5
  • Xbox Series
  • Switch 2
  • PS4
  • One
  • Switch
  • iOS
  • Android
  • MMO
  • RPG
  • FPS
En ce moment Genshin Impact Valhalla Breath of the wild Animal Crossing GTA 5 Red dead 2
Liste des sujets

[Macro Excel] Échanger deux colonnes

[G]unXi3
[G]unXi3
Niveau 6
29 mai 2014 à 12:15:43

Yop,

Je débute sur VB et j'ai une macro à faire ou je dois supprimer et changer l'ordre de colonnes.
J'ai réussi un peu à avancer mais je suis maintenant bloqué.

Voici une partie de mon code pour exemple :

Columns(1).Clear
Columns(9).Clear

Columns(3).Select
Selection.Copy
Columns(1).Select
Selection.Insert Shift:=xlToRight
Columns(3).Clear

Le problème que j'ai c'est que la colonne C est ajouté en A alors que je veux juste qu'il la remplace. Du coup ça me décale tout mon tableau, l'ancien A devient B, l'ancien B devient C ...

Comment faire pour juste copier la colonne C dans A sans que ça me décale tout ? :3

Merci d'avance :)

[Flipside]
[Flipside]
Niveau 4
03 juin 2014 à 22:58:43

Bonjour,

Je pense que le problème vient de la ligne Selection.InsertShift
Si tu veux que A = C si j'ai bien compris, tu peux essayer un code comme ceci :

Columns(1).Value = Columns(3).Value

PS: j'ai pas testé le code, je ne sais pas si l'objet Columns a une propriété Value mais sinon il te suffit de passer par l'objet range (Range("A:A") pour columns(1) et Range("C:C") pour la 3)

Sous forums
  • Aide à l'achat Mac
  • Création de sites web
  • Création de Jeux
  • Linux
  • Programmation
  • Internet
  • Steam Deck
  • Macintosh
  • Hardware
La vidéo du moment