Discussion :

[Mistouv]

Bonjour à tous,

Je me trouve souvent confronté à ce "petit" problème :
Lorsqu'on utilise des cellules dans les formules et qu'on supprime (ou insère) des lignes et des colonnes dans la feuille, les cellules sont adaptées à la nouvelle configuration.

Par contre, dans le code VBA les cellules ne sont pas modifiées, bien sûr.
Exemple : Range("F7").Value = 0

Quel code me conseilleriez-vous pour résoudre ce problème ?

Merci d'avance,

Michel

[EngueEngue]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Cells(i,j)
Range("A" & i)

[Invité]

Salut,

J'ai été confronté au même problème que toi. J'ai regardé partout et je n'ai rien trouvé la dessus. C'est étonnant. En tout cas, cette question m'intéresse aussi.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Cells(i,j)
Range("A" & i)

Enfaite, dans Excel, lorsque l'on fait référence à une cellule, ici la formule est en B5 par exemple:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

= A1 * 16

Et que l'on coupe la cellule A1, puis qu'on l'a colle en D3, la formule situé en B5 a changé dynamiquement, et devient devient donc ici:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

= D3 * 16

La formule en cellule B5 est passé dans cette exemple de:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

= A1 * 16

à

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

= D3 * 16

En VBA, la mise à jour des cellules ne se fait pas automatiquement.

*************************************************************************

En attendant de trouver une vrai solution, je propose de faire de plage de cellule dans Excel.
Une 1ère qui peut être dynamique, et une seconde qui est fixe et qui fait référence à la 1ère plage.
En gros, dans le VBA, tu fait référence au cellules de ta 2ème plage Excel. Et cette 2ème plage fait référence à la 1ère plage dans Excel, exemple:

En D1, la cellule représente A1:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

= A1

Si tu déplace A1 en A2, tu as en D1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

= A2

Et en code VBA, tu as donc:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Range("D1")

et non

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Range("A1")

[gFZT82]

Bonjour,

Tu peux obtenir un effet équivalent en définissant un nom pour ta cellule.
Exemple :
tu définis le nom "MaValeur" qui fait référence à =Feuil1!$F$7
Le code VBA continuera à associer la valeur après suppression ou insertion de lignes ou de colonnes.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 Range("MaValeur").Value = 0

Cordialement.

[Invité]

Merci,

C'est effectivement une bonne solution de type "indirecte". Après réflexion, je me dit qu'il ne doit pas exister de solution en VBA. Ca obligerai le VBA a modifier/éditer le texte à notre place lorsqu'une cellule change de place, et je ne pense pas que ça serait appréciable finalement surtout qu'en VBA, il y a plusieurs manière de faire référence à une cellule.

Donc, je pense enfaite qu'il n'ai pas possible de modifier dynamiquement le code VBA qui fait référence à une cellule ou plage de cellule et les références nommées et même structurées sont très certainement les seules vraies solutions en code VBA. C'est une manière indirecte, mais ça semble être la seule solution.

Maintenant, je suis convaincu qu'on ne peut pas avoir de modife VBA dynamique à cause de ce qu'y a été dit plus haut.

[Mistouv]

Bonjour à tous,

J'ai essayé cette solution, qui résout la suppression (ou l'ajout) de colonnes :
[Col_F].Cells(87, 1) = 0 où Col_F est le nom que j'ai donné à toute la colonne F
Par contre, je bugge sur la suppression de lignes, et dans tous les cas, cette solution ne fonctionne pas pour les déplacements de cellules.
La solution consistant à donner un nom à toutes les cellules qui apparaissent dans mon VBA me semble donc être la meilleure.

Je vous remercie tous de m'avoir éclairé sur ce sujet.

Michel