Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

incrémenter d'une ligne dans un filtre

ph.vanne

XLDnaute Junior
bonjour,

j'ai réalisé une macro qui me 'génère' une facture a partir d'un tableau données et d un tri sélectif dans ce tableau :

-je sectionne a parti d'un filtre une ligne avec le n° de la facture que je souhaite éditer et je "génère" la facture
correspondante dans un onglet dédié dans un format prêt a imprimer .
déjà ça! ça n'a pas été simple . mais ça marche !

cependant, j'aimerais pouvoir, maintenant , si je me place sur la ligne N° 4 ,par ex, cliquer sur mon bouton de macro exécuter la facture 4 et revenir sur la ligne N° 5 automatiquement ..

ou mieux encore ,( mais peut être que j'abuse ..!) pouvoir sélectionner les factures de 4 a 10 ...) ..
 

ph.vanne

XLDnaute Junior
Re : incrémenter d'une ligne dans un filtre

bonjour ,
je veux bien mais impossible! fichier trop lourd ;. (990Ko )
j'ai essayé de le compresser (.rar) mais fichier refusé ..?

du coup je joins un un modelé "épuré" ,le fichier de base comporte 1250 lignes.

mon dossier se compose de

trois feuilles:
1 "données"
2 "copie selection"
3 "modele recepteur"
 

Pièces jointes

  • facture 2015 simplifié_sans macro .xls
    26.5 KB · Affichages: 48
Dernière édition:

gosselien

XLDnaute Barbatruc
Re : incrémenter d'une ligne dans un filtre

Bonjour,

quand on te demande un fichier, il n'est pas utile de mettre ton code en + ici ...c'est inutile s'il est dans la feuille !
ça prends 5 pages avant de voir le message ET le fichier excel attaché

P.
 

thebenoit59

XLDnaute Accro
Re : incrémenter d'une ligne dans un filtre

Bonjour ph.vanne, le fil, le forum.
Ton code était bien trop long pour ce que tu avais à faire.
J'ai essayé de faire en sorte que le mien te soit facilement compréhensible.
La mise en page de la feuille Modèle est réalisée de sorte à ne plus l'effectuer avec la procédure.
Tu peux sélectionner toutes les factures que tu souhaites, mais ne sélectionne qu'une cellule par ligne.
 

Pièces jointes

  • ph vanne - incrémenter d'une ligne dans un filtre.xls
    57 KB · Affichages: 41

ph.vanne

XLDnaute Junior
Re : incrémenter d'une ligne dans un filtre

nos messages se sont croisés .
je regarde votre macro ..
mais déjà, merci de vous être penché sur mon pb !

!

bonjour ,
ça a marché nickel .. jusque' à ..55 factures crées..


puis ça à planté au delà ?.... trop grand nombre de factures ? :

le pb c'est que j'en ai 1200.. a editer

en rouge ,là ou ça bloque :


'On vérifie que la facture n'existe déjà pas, si c'est le cas l'onglet s'appellera A modifier
If FeuilExiste(nFacture) Then nFacture = "A modifier"

'On copie le modèle dans un nouvel onglet
fFacture.Copy After:=Worksheets(Worksheets.Count)
'On renomme la nouvelle feuille par ton numéro de facture
Worksheets(Worksheets.Count).Name = nFacture
Set fNFacture = Worksheets(nFacture)
 
Dernière édition:

gosselien

XLDnaute Barbatruc
Re : incrémenter d'une ligne dans un filtre

Bonjour ph.nvanne,

peux-tu éditer ton message #3 pour enlever le code qui, je le répète, oblige à descendre de 5 écrans pour lire la suite ,

Merci
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…