[VB - Excel] Insertion ligne qui n'incrémente pas formules [résolu]

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [VB - Excel] Insertion ligne qui n'incrémente pas formules [résolu]

pekbull

Bonjour,

Dans Excel 2003, à l'aide d'un bouton dans une UserForm, j'insère une ligne dans une sheet de la manière suivante:

Code :

Range("A6","G6" ).Insert Shift:=xlDown

Ensuite, j'insère une formule dans cette nouvelle ligne:

Code :

Range("G6" ).Formula = "=$F$6"

Lorsque je clique sur mon bouton pour insérer un première ligne: tout se passe bien
Lorsque je clique sur mon bouton pour insérer une nouvelle ligne: la ligne précédente descend d'un cran (ok), la nouvelle ligne se complète avec la formule (ok), mais la formule de la ligne décalée devient =$F$7 !

Malgré les '$' la formule s'incrémente. Comment puis-je faire pour éviter ceci?

Merci d'avance pour votre aide :jap:

Message édité par pekbull le 02-06-2010 à 13:29:21

Publicité

pekbull

J'ai remarqué quelque chose,

Si je fais ça, la formule ne s'incrémente pas:

Code :

Cells(6, 7).Select
Selection.Insert Shift:=xlDown
Cells(6, 7).Formula = "=$F$6"

Si je fais ça, elle s'incrémente:

Code :

Cells(6, 6).Select
Selection.Insert Shift:=xlDown
Cells(6, 7).Select
Selection.Insert Shift:=xlDown
Cells(6, 7).Formula = "=$F$6"

:pt1cable:

pekbull

Ok j'ai compris

Lors de la création de la nouvelle ligne, la valeur en F6 utile à la formule passe en F7. C'est pourquoi la formule s'incrémente.

Solution:
1. Insérer une ligne en dessous de la première
2. Copier les valeurs de cette première ligne
3. Coller ces valeurs dans la ligne en dessous
4. Remplir les nouveaux champs pour la première ligne

Message édité par pekbull le 02-06-2010 à 13:28:19

FORUM HardWare.fr

Programmation

VB/VBA/VBS

[VB - Excel] Insertion ligne qui n'incrémente pas formules [résolu]

Sujets relatifs
Indiquer numéro de ligne VBA excel	[resolu] compilation release Visual Studio 2008
[Résolu] Pb de résolution de type dans un template	[Résolu] Arrière-plan+Boites -> effet différent suivant navigateur
[RESOLU] question con mais utile image en html	[resolu] simuler un resultset vide
Macro Excel: Pivottables: Argument ou Appel de procédure incorrect	Macro Excel VBA IE
Matrice vba excel
Plus de sujets relatifs à : [VB - Excel] Insertion ligne qui n'incrémente pas formules [résolu]

Page générée en 0.042 secondes