[VBA] Saut de page...

Bonjour,

Dans mon application, j'ai une page avec des saut de page.
A certains moment, j'ai une suppression "automatique" de lignes, ce qui fait evidemment monter le contenu qui se trouve dessous... Seulement, les saut des pages ne bougent pas avec le reste, ce qui fait tout décaler.

Y'a-t-il un moyen de gérer ca ? :?

J'espère avoir été clair, merci.

Bonjour,

Non... C'est pas clair :lol:
Je suppose que ton "Application" est un document Word...
Il serait bon de le préciser.
Ensuite, quelle est la procédure de suppression automatique en question ?
On peut voir ?

A toi...

Argy

Citation:

---

Envoyé par argyronet

Non... C'est pas clair :lol:
Je suppose que ton "Application" est un document Word...
Il serait bon de le préciser.

---

Non c'est un document Excel...

Citation:

---

Envoyé par argyronet

Ensuite, quelle est la procédure de suppression automatique en question ?

---

Au changement de certaines cellules, j'ai un évenement qui supprime des des lignes si certaines conditions sont remplies. Et j'aimerais que tout ce qu'il y a dessous se déplace, les saut de page y compris...

Re,

Eh bien en supposant que ta procédure examine le contenu de la plage A1:A20 par exemple et qu'il y ait des sauts dedans, si tu écris le code suivant, tes sauts se déplacent comme tu le souhaites:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Sub TestRemoveRows() Dim nbRows As Long Dim currentValue As String Dim myExpectedvalue As String   myExpectedvalue = 1250 nbRows = 20 For I = 1 To nbRows Cells(I, 1).Select currentValue = Cells(I, 1).Value If currentValue = myExpectedvalue Then Selection.EntireRow.Delete End If Next End Sub

---

Cela répond t-il à ta question ?

Argy

Citation:

---

Cela répond t-il à ta question ?

---

Apparemment oui ! :)

Je viens d'essayer et ca a l'air d'aller. En fait j'utilisais ce code :

Code:

---

Worksheets("Affichage").Range("A" & ligne & ":M" & ligne).Delete

---

Ca ne marchait pas pour déplacer en même temps les sauts de pages. Avec ta solution ca a l'air d'aller. Un grand merci à toi donc ! :wink:

Eh, oui, si tu effaces la ligne, tu ne la supprimes pas...

Cependant attention, cette procédure est à même de supprimer un saut de page si toutefois la valeur analysée est située au dessous ce saut de page !!!

Bien à toi, (PSSST, marque le dossier comme résolu !!!)

Argy