Autres Immobiliser des cellules malgrès l'insertion de lignes

Dimitry

XLDnaute Nouveau
Bonjour tout le monde,

Je suis sur excel 2007, et je travaille sur une feuille de devis classique type "désignation, quantité, Prix unitaire, Total"
J'ai alors tout en bas de mon tableau mon récapitulatif "total HT", "TVA", "total TTC" + 4 autres lignes" soit 7 lignes au total
Je souhaiterais que ces 7 dernières lignes restent toujours en bas de ma DERNIERE page,
C'est à dire que, si on insère des lignes en haut ou en bas, ce tableau ne bouge pas.

J'ai tenté avec "figer les volets" mais je pense pas que ce soit la bonne solution,
Si ce sujet à déjà été traité, merci de me renvoyer vers le lien (pas trouvé de mon côté),

En vous remerciant par avance,
Dimitry
 

chris

XLDnaute Barbatruc
Bonjour

Si tu insères, les nouvelles lignes vont forcément pousser les autres...

Au lieu d'insérer copie dans l'existant...

Les volets c'est juste un affichage, cela n'agit pas sur la feuille
 

Dimitry

XLDnaute Nouveau
Admettons j'ai quasiment terminé mon devis, hors j'ai oublié un texte qui doit se trouver entre deux lignes existantes,
Je dois alors faire "insérer une ligne", je ne comprend pas quand tu me dit "copier"

Oui je débute dans excel..
 

chris

XLDnaute Barbatruc
RE

Et bien si tu insères tu enlèves une vide ailleurs

Sinon tu copies dans une vide puis couper, et insérer ligne coupée au bon endroit
 

job75

XLDnaute Barbatruc
Bonjour Dimitry, chris,

Voyez le fichier joint et cette macro dans le code de la feuille (clic droit sur l'onglet et Visualiser le code) :
VB:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim ligTotal&, c As Range
ligTotal = 50 'ligne fixe à adapter
Set c = Cells.Find("total HT", , xlValues)
If c Is Nothing Then MsgBox "'total HT' introuvable ...": Exit Sub
If c.Row < ligTotal Then
    c.EntireRow.Resize(ligTotal - c.Row).Insert
ElseIf c.Row > ligTotal Then
    Rows(ligTotal).Resize(c.Row - ligTotal).Delete
End If
End Sub
Testez en insérant ou supprimant des lignes dans la zone en jaune.

A+
 

Fichiers joints

Dernière édition:

Dranreb

XLDnaute Barbatruc
Bonjour.
Il devrait être plus simple d'avoir toujours une ligne vide devant la zone des totaux, et de rectifier sa hauteur tel que le dessus de la ligne qui suit soit inchangé.
 

Dimitry

XLDnaute Nouveau
OK, merci à tous pour vos réponses,
Je m'y penche ce soir ;)
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas