A La recheche d'une idee

  • Initiateur de la discussion Initiateur de la discussion tchoutchou
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

T

tchoutchou

Guest
Bonjour

Je vouvrais faire une feuille de calcul en VBA sous EXCEL.
VOICI mon pb le nbre de ligne est variable et je voudrais
savoir comment je peux faire pour :

S'il ya plus de 30 lignes de produits inclure un pied de page pour
numeroter les pages
et la fin des pages mettre le pied de page final + logo ... et
le total des différents calculs !

Je ne sais pas si je me fais comprendre mais je cherche à faire une feuille
de facturation avec des lignes variables, Si j'ai 30 lignes tout tiens sur une
page je n'ai aucun pb, mais dans d'autres cas 50, 120 .... la pas facile
MERCI
 
bonsoir,
dans ce cas il faut séparer la saisie de l'impression, par exemple saisir 50 lignes de facture et pour l'impression faire une matrice conforme aux désirs, ensuite par une macro du style :
cpt = 0
lgimp = 0
for lig = 1 to 100
if cells(lig,col) <> "" then 'Col est la colonne ou il y a toujours une saisie
cpt = cpt + 1
lgimp = lgimp + 1
'Autant que de colonnes de lafacture 1,2,3 etc...
sheets("impression").cells(lgimp,1) = sheets("saisie").cells(lig,1)
sheets("impression").cells(lgimp,2) = sheets("saisie").cells(lig,2)
etc...
end if
if cpt > 29 then
printMaPage ' Macro d'impression ded la feuille impression
cpt = 0
lgimp = 0
end if
next
 
Bonjour,

Voici une méthode:

col= colonne du produit

pour récupérer le nombre de ligne

col=3
ligne=1 ' ligne de départ
while cells(ligne,col)<> "" then
ligne=ligne+1
wend

ligne = le nombre de lignes à imprimer

Par l'option nouvelle macro:

fait une mise en page avec le nombre de page (1/8 )et le logo

fait une seconde macro sans foliotage

suivant le nombre de ligne exécute l'une ou l'autre de ces macros
puis lance l'impression
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Retour