Zone imprimable variable

Bonjour,
Ce sujet a déjà été traité, mais les propositions faites ici n'ont pas fonctionné chez moi.
Chaque cas peut être différent, certes.
Voici le mien...
J'ai une zone d'impression définie ainsi:
A1:M38
la mise à jour de cette liste au fur et à mesure fait que la liste à imprimer va s'agrandir...
la semaine prochaine ce sera de A1:M45
ensuite de A1:M55 etc...

J'ai essayé plein de choses, je n'y arrive pas.
D'avance, merci pour toute aide

(sachant que, mais vous l'aurez compris, que je ne suis pas expert...)

Bonjour,

Fichier en exemple; ajoutez des lignes et cliquez sur le bouton (pensez à changer le nom de la feuille, en rouge dans le code)
Pour accéder au code, appuyez simultanément sur les touches : ALT et F11
Pièce jointe 497828

le code

Code:

---

1 2 3 4 5 6 7 8

Sub Imprimer() On Error Resume Next ActiveWorkbook.Names("zone_d_impression").Delete DerLig = [A10000].End(xlUp).Row Range(Cells(1, "A"), Cells(DerLig, "M")).Select ActiveWorkbook.Names.Add Name:="zone_d_impression", RefersToR1C1:="=Feuil1!R1C1:R" & DerLig & "C13" ExecuteExcel4Macro "PRINT(1,,,1,,,,,,,,2,,,TRUE,,FALSE)" End Sub

---

Cdlt

Bonjour à tous

Sauf si tu as des données à droite de M que tu ne souhaites pas imprimer, la zone d'impression ne sert à rien. Supprime-la afin qu'elle soit calculée dynamiquement par Excel

Citation:

---

Envoyé par ARTURO83

---

Merci pour votre réponse.:D
C'est exactement ce que je recherchais, je suis donc bien content du résultat.

Comment puis-je modifier ce code en changeant la destination de l'impression...
En fait je ne l'avais pas précisé, mais je souhaite surtout sauvegarder cette feuille en htm...
en utilisant la fonction "Enregistrer sous... type: page web (*.htm)
et donc utiliser cette zone imprimable...

(j'avais un autre code qui fonctionne, mais les boutons de mes macro apparaissent sur la page web
j'ai donc du déplacer ces boutons sur une autre feuille, ce qui n'est pas vraiment pratique).

Bonjour,

Faites un enregistrement au format WEB(html) en utilisant l'enregistreur de macro, il n'y a plus qu'à récupérer le code obtenu et le coller à la place de la ligne d'impression du code fourni précédemment. Ce qui donne quelque chose dans ce genre:

Code:

---

ActiveWorkbook.SaveAs Filename:="C:\Chemin\raivig_Zone imprimable variable.htm", FileFormat:=xlHtml, ReadOnlyRecommended:=False, CreateBackup:=False

---

Cdlt

Bonjo

Citation:

---

Envoyé par raivig

mais les boutons de mes macro apparaissent sur la page web
j'ai donc du déplacer ces boutons sur une autre feuille, ce qui n'est pas vraiment pratique).

---

Pour que tes boutons ne soient pas imprimés, il suffit de décocher "imprimer l'objet" dans les propriétés de tes boutons

Je l'ai bien entendu fait... En page Web ça apparaît quand même...

Mettez le bouton hors de la zone d'impression

Citation:

---

Envoyé par ARTURO83

Bonjour,

Faites un enregistrement au format WEB(html) en utilisant l'enregistreur de macro, il n'y a plus qu'à récupérer le code obtenu et le coller à la place de la ligne d'impression du code fourni précédemment. Ce qui donne quelque chose dans ce genre:

Code:

---

ActiveWorkbook.SaveAs Filename:="C:\Chemin\raivig_Zone imprimable variable.htm", FileFormat:=xlHtml, ReadOnlyRecommended:=False, CreateBackup:=False

---

Cdlt

---

Merci beaucoup, je vis essayer ça dès que possible...
Ca me paraît un peu compliqué mais ça devrait aller