Adaptation du VBA lors d'un décalage de colonne ?

Bonjour ,

J'ai une feuille classique avec , bien sur , des fonctions , des MFC et du coe VBA.

Si j'insère une nouvelle colonne , qui décale mes données (Vers la droite par exemple) , mes fonctions et mes MFC vont s'adapter automatiquement.

Par contre , le VBA , lui ne bougera pas.

Est-ce normal ou y a-t-il un paramètre quelque part ?

Attention , ceci n'est en aucun cas un reproche de ma part , je trouve déjà absolument génial que les fonctions et les MFC s'adaptent automatiquement !

J'ai aussi parfaitement conscience de l'infinie complexité de la chose , mais Excel est tellement puissant ...

Donc je me demande juste si cela est possible (Me si je n'y crois pas)

Merci de vos réponses

Bakounine

Bonjour,

c'est normal selon le niveau de l'auteur du code, s'il n'a pas pensé à travailler avec des plages nommées par exemple
ou encore repérer les colonnes par leurs entêtes …

___________________________________________________________________________________________________________

Je suis Paris, London, Istanbul, Berlin, Nice, Bruxelles, Charlie, …

Bonjour Marc-L ,

Le niveau de l'auteur du code n'est pas bien élevé , puisque c'est moi l'auteur.

J'essaie de me débrouiller tout seul et ce code a été crée avec l'enregistreur de macro ....

Peux-tu m'en dire un peu plus sur les plages nommées ou repérer les colonnes par leurs entêtes ?

Ou un tuto ?

D'avance , merci

Bakounine

Bonjour,

Il faudrait voir le code, mais a mon avis, le code fait référence à des plages de la façon suivante :

Code:

---

Range("A1:A100")

---

Dans ce cas, Excel lit bêtement ce qui est écrit : je travaille sur les cellules A1 à A100. Si tu ajoutes une colonne avant A, la colonne qui était A devient B et Excel travaille sur la nouvelle colonne A.
Si tu as des titres à tes colonnes (en ligne 1, par exemple), tu peux trouver le numéros de colonne grâce au titre, par exemple :

Code:

---

1 2	Dim i As Long i = Application.Match("titre", Range("1:1"), 0)

---

i indiquera le numéro de la colonne où est le titre. Ensuite si tu as besoin de travailler sur cette colonne, tu peux utiliser la syntaxe suivante :

Code:

---

Range(Cells(1, i), Cells(100, i))

---

Voici un tuto pour VBA : http://bidou.developpez.com/article/VBA/

Bonjour Riaolle ,

En voila une superbe réponse , car honnêtement , cela ne se devine pas !

Je vais m'amuser avec çà et potasser le PDF.

Merci beaucoup à toi.

Bakounine

Plus simple : au lieu d'écrire :

Code:

---

Range("E1:E100")

---

Tu donnes à E1:E100 un nom : Ruban Formules > Icone Définir un nom.
Si ce nom est, par exemple, "MaListe", remplace l'expression précédente par :

Code:

---

Range("MaListe")

---

Comme le nom est un élément d'Excel, il corrigera sa position en fonction d'éventuels insertion/suppression ou déplacements.

Perso j'utilise un Enum pour ce genre de chose.

Ensuite la référence a une colonne passe toujours par cette Enum.

S'il y a modification de la structure du tableau seul l'Enum est a modifier.

A lire : VBA: Enumeration