Figer un cellule ciblée par une formule même après insertion

**Thonio64** · 29/01/2018, 16h17

Bonjour,

J'utilise un formulaire VBA pour créer une base de données et insérer les nouvelles donnée en haut de la base de données soit entre la ligne 1 et la ligne 2.

Base de données :

un tableau 13 colonnes
en ligne 1 les étiquettes avec application d'un filtre
en ligne 2 insertion des nouvelles entrées

Dans un autre tableau mes formules reprennent cette base de données pour effectuer leurs calculs.

Mon problème est que à chaque nouvelle insertion faite par mon formulaire en ligne 2, toute mes formules décale leur plage d'une ligne vers le bas alors que je verrouille la cellule ciblée dans ma formule (ex : avant insertion ... $B2:$B$53 ... après insertion $B3:$B$54).

Est-il possible de figer définitivement la cellule B2 dans la formule ou d'obtenir le même résultat avec un autre moyen ?

Cordialement

Anthony

**Menhir** · 29/01/2018, 16h57

Envoyé par Thonio64

Mon problème est que à chaque nouvelle insertion faite par mon formulaire en ligne 2, toute mes formules décale leur plage d'une ligne vers le bas alors que je verrouille la cellule ciblée dans ma formule (ex : avant insertion ... $B2:$B$53 ... après insertion $B3:$B$54).

Le verrouillage par $ verrouille l'adresse si on déplace la cellule dans laquelle se trouve la formule.
En revanche, si on déplace la cellule cible, la référence la suit, qu'il y ait $ ou pas.

Tu pourras faire le test "à la main" dans Excel et constater ce phénomène.

**Supermichou** · 29/01/2018, 17h43

Bonjour,

il y a plusieurs pistes.

Sur Excel, la fonction indirect =indirect("B2") renverra toujours la valeur de B2, quoi que l'on fasse.

Sur VBA, il est possible de passer par range(cells(2,2)) par exemple pour B2.

Cdlt,

SM

**papouclo** · 29/01/2018, 18h09

Bonjour,

... toute mes formules décalent leur plage d'une ligne vers le bas alors que je verrouille la cellule ciblée dans ma formule (ex : avant insertion ... $B2:$B$53 ... après insertion $B3:$B$54).

Une autre piste avec la fonction DECALER et une formule du genre :
= .... DECALER($B$1;1;0;NBVAL($B:$B)-1;1)...
ou
= .... DECALER($B$1;1;0;NB($B:$B);1)... si les données entrées en colonne B sont numériques, l'étiquette en B1 étant du texte.
Cordialement
Claude