Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel publipostage

publipostage

12 réponses
Avatar
JeanPiotr
bonne année à tous
Bloavez Mad (pour les bretons ;-)
J'ai une question surement très bête.
Je possède un fichier de 54000 lignes d'adresses.
J'en extrait plusieurs grace à la fonction filtre élaboré dans une ptite
macro
et le résultat se crée dans une nouvelle feuille excel.

Mais dans cette nouvelle feuille la fin de fichier est toujours en ligne
54000
et non sur la dernière ligne filtrée. Du coup dans un publipostage il me
propose
d'imprimer les 54000 étiquettes!!!!!(dont la plupart seraient vierges bien
sur)

J'imagine qu'il faut indiquer à Excel une nouvelle fin de fichier? feuille??
mais je n'ai pas trouvé l'instruction...

help!
merci
Jean-Pierre (BZH For Ever)
Signaler un problème avec ce contenu

10 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
1 2
Avatar
anonymousA
Bonjour,

si le nom de la nouvelle feuille est toto

with sheets("toto")
lignefin=.cells.find("*",.range("A1"), xlFormulas, , xlByRows,
xlPrevious).Offset(0,1)Row
rows(lignefin & ":65536").delete
end with

A+


bonne année à tous
Bloavez Mad (pour les bretons ;-)
J'ai une question surement très bête.
Je possède un fichier de 54000 lignes d'adresses.
J'en extrait plusieurs grace à la fonction filtre élaboré dans une ptite
macro
et le résultat se crée dans une nouvelle feuille excel.

Mais dans cette nouvelle feuille la fin de fichier est toujours en ligne
54000
et non sur la dernière ligne filtrée. Du coup dans un publipostage il me
propose
d'imprimer les 54000 étiquettes!!!!!(dont la plupart seraient vierges bien
sur)

J'imagine qu'il faut indiquer à Excel une nouvelle fin de fichier? feuille??
mais je n'ai pas trouvé l'instruction...

help!
merci
Jean-Pierre (BZH For Ever)




Avatar
anonymousA
.Offset(1,0).Row bien sur !!!!

A+

Bonjour,

si le nom de la nouvelle feuille est toto

with sheets("toto")
lignefin=.cells.find("*",.range("A1"), xlFormulas, , xlByRows,
xlPrevious).Offset(0,1)Row
rows(lignefin & ":65536").delete
end with

A+



bonne année à tous
Bloavez Mad (pour les bretons ;-)
J'ai une question surement très bête.
Je possède un fichier de 54000 lignes d'adresses.
J'en extrait plusieurs grace à la fonction filtre élaboré dans une
ptite macro
et le résultat se crée dans une nouvelle feuille excel.

Mais dans cette nouvelle feuille la fin de fichier est toujours en
ligne 54000
et non sur la dernière ligne filtrée. Du coup dans un publipostage il
me propose
d'imprimer les 54000 étiquettes!!!!!(dont la plupart seraient vierges
bien sur)

J'imagine qu'il faut indiquer à Excel une nouvelle fin de fichier?
feuille??
mais je n'ai pas trouvé l'instruction...

help!
merci
Jean-Pierre (BZH For Ever)





Avatar
Jacky
Bonsoir,
Définir une zone d'impression ne fonctionne pas dans ce cas ??

JJ

"anonymousA" a écrit dans le message de news:
43ce9b00$0$29197$
.Offset(1,0).Row bien sur !!!!

A+

Bonjour,

si le nom de la nouvelle feuille est toto

with sheets("toto")
lignefin=.cells.find("*",.range("A1"), xlFormulas, , xlByRows,
xlPrevious).Offset(0,1)Row
rows(lignefin & ":65536").delete
end with

A+



bonne année à tous
Bloavez Mad (pour les bretons ;-)
J'ai une question surement très bête.
Je possède un fichier de 54000 lignes d'adresses.
J'en extrait plusieurs grace à la fonction filtre élaboré dans une ptite
macro
et le résultat se crée dans une nouvelle feuille excel.

Mais dans cette nouvelle feuille la fin de fichier est toujours en ligne
54000
et non sur la dernière ligne filtrée. Du coup dans un publipostage il me
propose
d'imprimer les 54000 étiquettes!!!!!(dont la plupart seraient vierges
bien sur)

J'imagine qu'il faut indiquer à Excel une nouvelle fin de fichier?
feuille??
mais je n'ai pas trouvé l'instruction...

help!
merci
Jean-Pierre (BZH For Ever)







Avatar
Clément Marcotte
Bonjour,

Pourtant quand on fait (facilement) un publipostage à partir de Word, on
peut juste faire une requête sur le fichier original sans devoir affronter
les AMIS (Anti Macros Inutilement Superfétatoires). Mais bon...




"JeanPiotr" a écrit dans le message de news:
43ce76e4$0$19687$
bonne année à tous
Bloavez Mad (pour les bretons ;-)
J'ai une question surement très bête.
Je possède un fichier de 54000 lignes d'adresses.
J'en extrait plusieurs grace à la fonction filtre élaboré dans une ptite
macro
et le résultat se crée dans une nouvelle feuille excel.

Mais dans cette nouvelle feuille la fin de fichier est toujours en ligne
54000
et non sur la dernière ligne filtrée. Du coup dans un publipostage il me
propose
d'imprimer les 54000 étiquettes!!!!!(dont la plupart seraient vierges bien
sur)

J'imagine qu'il faut indiquer à Excel une nouvelle fin de fichier?
feuille??
mais je n'ai pas trouvé l'instruction...

help!
merci
Jean-Pierre (BZH For Ever)



Avatar
anonymousA
Bonjour,

je ne vois pas ce que tu veux me dire avec Zone d'impression qui
d'ailleurs nécéssite d'être définie.

A+

Bonsoir,
Définir une zone d'impression ne fonctionne pas dans ce cas ??

JJ

"anonymousA" a écrit dans le message de news:
43ce9b00$0$29197$

.Offset(1,0).Row bien sur !!!!

A+


Bonjour,

si le nom de la nouvelle feuille est toto

with sheets("toto")
lignefin=.cells.find("*",.range("A1"), xlFormulas, , xlByRows,
xlPrevious).Offset(0,1)Row
rows(lignefin & ":65536").delete
end with

A+




bonne année à tous
Bloavez Mad (pour les bretons ;-)
J'ai une question surement très bête.
Je possède un fichier de 54000 lignes d'adresses.
J'en extrait plusieurs grace à la fonction filtre élaboré dans une ptite
macro
et le résultat se crée dans une nouvelle feuille excel.

Mais dans cette nouvelle feuille la fin de fichier est toujours en ligne
54000
et non sur la dernière ligne filtrée. Du coup dans un publipostage il me
propose
d'imprimer les 54000 étiquettes!!!!!(dont la plupart seraient vierges
bien sur)

J'imagine qu'il faut indiquer à Excel une nouvelle fin de fichier?
feuille??
mais je n'ai pas trouvé l'instruction...

help!
merci
Jean-Pierre (BZH For Ever)












Avatar
Jacky
Re..
Comme Jean, envoie l'extraction sur une nouvelle feuille, n'était-il pas
suffisant de définir sur cette feuille une zone d'impression par:
Fichier/zone d'impression/ définir ??
JJ

"anonymousA" a écrit dans le message de news:
43ce9fbc$0$29197$
Bonjour,

je ne vois pas ce que tu veux me dire avec Zone d'impression qui
d'ailleurs nécéssite d'être définie.

A+

Bonsoir,
Définir une zone d'impression ne fonctionne pas dans ce cas ??

JJ

"anonymousA" a écrit dans le message de news:
43ce9b00$0$29197$

.Offset(1,0).Row bien sur !!!!

A+


Bonjour,

si le nom de la nouvelle feuille est toto

with sheets("toto")
lignefin=.cells.find("*",.range("A1"), xlFormulas, , xlByRows,
xlPrevious).Offset(0,1)Row
rows(lignefin & ":65536").delete
end with

A+




bonne année à tous
Bloavez Mad (pour les bretons ;-)
J'ai une question surement très bête.
Je possède un fichier de 54000 lignes d'adresses.
J'en extrait plusieurs grace à la fonction filtre élaboré dans une
ptite macro
et le résultat se crée dans une nouvelle feuille excel.

Mais dans cette nouvelle feuille la fin de fichier est toujours en
ligne 54000
et non sur la dernière ligne filtrée. Du coup dans un publipostage il
me propose
d'imprimer les 54000 étiquettes!!!!!(dont la plupart seraient vierges
bien sur)

J'imagine qu'il faut indiquer à Excel une nouvelle fin de fichier?
feuille??
mais je n'ai pas trouvé l'instruction...

help!
merci
Jean-Pierre (BZH For Ever)













Avatar
anonymousA
Certes, mais définir une zone d'impression réclame de connaitre les
limites de cette zone , ce qui , d'un point de vue conceptuel, n'est
guère éloigné que de déterminer la dernière ligne remplie puis de
supprimer le trop plein.

A+

Re..
Comme Jean, envoie l'extraction sur une nouvelle feuille, n'était-il pas
suffisant de définir sur cette feuille une zone d'impression par:
Fichier/zone d'impression/ définir ??
JJ

"anonymousA" a écrit dans le message de news:
43ce9fbc$0$29197$

Bonjour,

je ne vois pas ce que tu veux me dire avec Zone d'impression qui
d'ailleurs nécéssite d'être définie.

A+


Bonsoir,
Définir une zone d'impression ne fonctionne pas dans ce cas ??

JJ

"anonymousA" a écrit dans le message de news:
43ce9b00$0$29197$


.Offset(1,0).Row bien sur !!!!

A+



Bonjour,

si le nom de la nouvelle feuille est toto

with sheets("toto")
lignefin=.cells.find("*",.range("A1"), xlFormulas, , xlByRows,
xlPrevious).Offset(0,1)Row
rows(lignefin & ":65536").delete
end with

A+





bonne année à tous
Bloavez Mad (pour les bretons ;-)
J'ai une question surement très bête.
Je possède un fichier de 54000 lignes d'adresses.
J'en extrait plusieurs grace à la fonction filtre élaboré dans une
ptite macro
et le résultat se crée dans une nouvelle feuille excel.

Mais dans cette nouvelle feuille la fin de fichier est toujours en
ligne 54000
et non sur la dernière ligne filtrée. Du coup dans un publipostage il
me propose
d'imprimer les 54000 étiquettes!!!!!(dont la plupart seraient vierges
bien sur)

J'imagine qu'il faut indiquer à Excel une nouvelle fin de fichier?
feuille??
mais je n'ai pas trouvé l'instruction...

help!
merci
Jean-Pierre (BZH For Ever)
















Avatar
JeanPiotr
bonsoir
me revoici
Il n'existerai pas une instruction pour remettre la fin de feuille ou l'on
veut??
parce que mes lignes, même étant vide, quand je fais CTRL+FIN et bien
j'arrive toujours en ligne 54000?
bizarre.. bizarre...
JP

"Jacky" a écrit dans le message de news:
%
Re..
Comme Jean, envoie l'extraction sur une nouvelle feuille, n'était-il pas
suffisant de définir sur cette feuille une zone d'impression par:
Fichier/zone d'impression/ définir ??
JJ

"anonymousA" a écrit dans le message de news:
43ce9fbc$0$29197$
Bonjour,

je ne vois pas ce que tu veux me dire avec Zone d'impression qui
d'ailleurs nécéssite d'être définie.

A+

Bonsoir,
Définir une zone d'impression ne fonctionne pas dans ce cas ??

JJ

"anonymousA" a écrit dans le message de news:
43ce9b00$0$29197$

.Offset(1,0).Row bien sur !!!!

A+


Bonjour,

si le nom de la nouvelle feuille est toto

with sheets("toto")
lignefin=.cells.find("*",.range("A1"), xlFormulas, , xlByRows,
xlPrevious).Offset(0,1)Row
rows(lignefin & ":65536").delete
end with

A+




bonne année à tous
Bloavez Mad (pour les bretons ;-)
J'ai une question surement très bête.
Je possède un fichier de 54000 lignes d'adresses.
J'en extrait plusieurs grace à la fonction filtre élaboré dans une
ptite macro
et le résultat se crée dans une nouvelle feuille excel.

Mais dans cette nouvelle feuille la fin de fichier est toujours en
ligne 54000
et non sur la dernière ligne filtrée. Du coup dans un publipostage il
me propose
d'imprimer les 54000 étiquettes!!!!!(dont la plupart seraient vierges
bien sur)

J'imagine qu'il faut indiquer à Excel une nouvelle fin de fichier?
feuille??
mais je n'ai pas trouvé l'instruction...

help!
merci
Jean-Pierre (BZH For Ever)
















Avatar
Patrick BASTARD
Bonjour, *JeanPiotr*

Je crois me souvenir qu'en enregistrant...

--
Bien amicordialement,
P. Bastard


bonsoir
me revoici
Il n'existerai pas une instruction pour remettre la fin de feuille ou
l'on veut??
parce que mes lignes, même étant vide, quand je fais CTRL+FIN et bien
j'arrive toujours en ligne 54000?
bizarre.. bizarre...
JP

"Jacky" a écrit dans le message de news:
%
Re..
Comme Jean, envoie l'extraction sur une nouvelle feuille, n'était-il
pas suffisant de définir sur cette feuille une zone d'impression par:
Fichier/zone d'impression/ définir ??
JJ

"anonymousA" a écrit dans le message de news:
43ce9fbc$0$29197$
Bonjour,

je ne vois pas ce que tu veux me dire avec Zone d'impression qui
d'ailleurs nécéssite d'être définie.

A+

Bonsoir,
Définir une zone d'impression ne fonctionne pas dans ce cas ??

JJ

"anonymousA" a écrit dans le message de
news: 43ce9b00$0$29197$

.Offset(1,0).Row bien sur !!!!

A+


Bonjour,

si le nom de la nouvelle feuille est toto

with sheets("toto")
lignefin=.cells.find("*",.range("A1"), xlFormulas, , xlByRows,
xlPrevious).Offset(0,1)Row
rows(lignefin & ":65536").delete
end with

A+




bonne année à tous
Bloavez Mad (pour les bretons ;-)
J'ai une question surement très bête.
Je possède un fichier de 54000 lignes d'adresses.
J'en extrait plusieurs grace à la fonction filtre élaboré dans
une ptite macro
et le résultat se crée dans une nouvelle feuille excel.

Mais dans cette nouvelle feuille la fin de fichier est toujours
en ligne 54000
et non sur la dernière ligne filtrée. Du coup dans un
publipostage il me propose
d'imprimer les 54000 étiquettes!!!!!(dont la plupart seraient
vierges bien sur)

J'imagine qu'il faut indiquer à Excel une nouvelle fin de
fichier? feuille??
mais je n'ai pas trouvé l'instruction...

help!
merci
Jean-Pierre (BZH For Ever)














Avatar
JeanPiotr
donc, donc... il semblerait que le mélange de vos réponses fasse que ça
fonctionne.
J'ai appliqué d'abord la macro, qui vide ce qui avait déjà l'air vide, mais
en enregistrant apparemment là Excel redefinit la fameuse fin de feuille qui
m'évite d'avoir 54000 étiquettes en trop.
Donc je mets tout ça au net, j'enchaine les macros et je vous tiens au
courant.
merci à tous
Jean-Pierre

"Patrick BASTARD" a écrit dans le
message de news:
Bonjour, *JeanPiotr*

Je crois me souvenir qu'en enregistrant...

--
Bien amicordialement,
P. Bastard


bonsoir
me revoici
Il n'existerai pas une instruction pour remettre la fin de feuille ou
l'on veut??
parce que mes lignes, même étant vide, quand je fais CTRL+FIN et bien
j'arrive toujours en ligne 54000?
bizarre.. bizarre...
JP

"Jacky" a écrit dans le message de news:
%
Re..
Comme Jean, envoie l'extraction sur une nouvelle feuille, n'était-il
pas suffisant de définir sur cette feuille une zone d'impression par:
Fichier/zone d'impression/ définir ??
JJ

"anonymousA" a écrit dans le message de news:
43ce9fbc$0$29197$
Bonjour,

je ne vois pas ce que tu veux me dire avec Zone d'impression qui
d'ailleurs nécéssite d'être définie.

A+

Bonsoir,
Définir une zone d'impression ne fonctionne pas dans ce cas ??

JJ

"anonymousA" a écrit dans le message de
news: 43ce9b00$0$29197$

.Offset(1,0).Row bien sur !!!!

A+


Bonjour,

si le nom de la nouvelle feuille est toto

with sheets("toto")
lignefin=.cells.find("*",.range("A1"), xlFormulas, , xlByRows,
xlPrevious).Offset(0,1)Row
rows(lignefin & ":65536").delete
end with

A+




bonne année à tous
Bloavez Mad (pour les bretons ;-)
J'ai une question surement très bête.
Je possède un fichier de 54000 lignes d'adresses.
J'en extrait plusieurs grace à la fonction filtre élaboré dans
une ptite macro
et le résultat se crée dans une nouvelle feuille excel.

Mais dans cette nouvelle feuille la fin de fichier est toujours
en ligne 54000
et non sur la dernière ligne filtrée. Du coup dans un
publipostage il me propose
d'imprimer les 54000 étiquettes!!!!!(dont la plupart seraient
vierges bien sur)

J'imagine qu'il faut indiquer à Excel une nouvelle fin de
fichier? feuille??
mais je n'ai pas trouvé l'instruction...

help!
merci
Jean-Pierre (BZH For Ever)


















1 2