Discussion :

[kulty]

Bonjour,

J'ai eu beau chercher dans les anciens posts je n'ai pas reussi a trouver exactement la solution a mon probleme :

Je cherche comment lier une formule en vba a des cellules bien precises ; je m'explique

par exemple j'ai cette petite macro basique

Code :

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

1
2
Range("A8:A10").Select
Selection.ClearContents

elle efface les cellules a8 a9 a10...si j'insere 3 lignes entre la ligne 2 et la ligne 3, ma macro va toujours effacer a8 a9 a10...hors mes donnees seront desormais en a11 a12 a13...comment faire suivre les insertions et suppressions de lignes dans le vba ??

Je sais qu'il existe une solution c de nommer la plage que l'on veut fixer (par exemple en la nommant test et de remplacer ma macro par

Code :

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

1
2
Range("test").Select
Selection.ClearContents

Mon souci c'est que ma macro est sur l'onglet 1 et que mon fichier est destiné a une personne qui va ajouter chaque mois une nouvelle page en dupliquant mon onglet 1...le nom de ma selection de cellule doit etre unique et je ne vais pas pouvoir avoir une selection appelee test sur onglet 1 et test sur onglet 2...je suis un peu perdu la ...

[oOVaveOo]

Bonjour,
Tu peux mettre dans une cellule, par exemple en IV65000 :

Code :

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

=A8

Si tu insères une ligne, avant A8, ta formule deviendra :

Code :

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

=A9

En récupérant la formule, tu sauras où est ta cellule.

[kulty]

ohoh en effet je n'avais pas pensé a ca...

maintenant ca me pose un autre probleme n'etant pas un pro du vba...comment je recupere le contenu de ma cellule tampon a savoir dans ton exemple le a9 ?

quelque chose du genre

Code :

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

1
2
 
range("iv65000").formula=a

??

[oOVaveOo]

Code :

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

toto = Replace(Range("iv65000").Formula, "=", "")