Discussion :

[n0vocaine]

Bonjour. J'ai un soucis de code niveau low--


Description:
Je réalise une petite base de données avec des macros qui effectues des calculs sur des cellules d'une même ligne. Pour faire appel aux dites cellules j'utilise ce type de déclaration.

Code :

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

WorkSheets("Toto").Range("A1")

ou

Code :

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

WorkSheets("Toto").Cells(1,1)

Le probléme est que lors d'un ajout de colonne mes calcul son faux car les colonnes son décalées de

Code :

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

Numéro de colonne + n nouvelles colonnes

Question:
Qu'elle est la déclaration pour faire appel , non plus aux numéros mais au nom de la colonne? Pour éviter d'avoir un décalage de colonne lors d'un ajout.

Exemple
Dans la colonne "Expédition" à la ligne 12 ajouter + 19,8

Mon code

Code :

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

WorkSheets("Toto").Cells(12,4)=WorkSheets("Toto").Cells(12,4) + 19,8

[larryj]

Bonjour,

Une solution possible serait d'utiliser les plages nommées.

Pour cela, nommer les cellules correspondant aux titres des colonnes. Ensuite, dans le code, faire référence à ces titres.

Exemple :

Code :

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

1
2
3
4
5
6
 
dim col_MonTitre as Integer
with WorkSheets("Toto")
    col_MonTitre = .Range("MonTitre").Column
    .Cells(12, col_MonTitre)=.Cells(12, col_MonTitre) + 19,8 
End With