extraction de données avec une macro pour impression multiple

  • Initiateur de la discussion Initiateur de la discussion doudou080
  • 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 !

doudou080

XLDnaute Nouveau
Bonjour a tous

je cherche le moyen de récolter des données d'une feuille pour les faire apparaître dans un masque avec un n° de chrono qui change a chaque fois.
une ligne par bon a la date du jour ou on ouvre le fichier.
pouvoir imprimer tous les bon les un apres les autres en double exemplaire si posible

je ne sais pas si je suis claire dans mes explications
 

Pièces jointes

je re formule ma demande

ce que je voudrais

copier mes données souhaitées dans un masque.
chaque ligne = un masque
incrémenter un n°de chrono pour chaque masque
imprimer 2 exemplaires par masque avec le même n° de chrono.
et pour finir lancer l'impression de tout les masques

c'est pas simple !!!
 
Bonjour,

Poster sur plusieurs forums, sans en informer personne, est un manque de respect envers tous les bénévoles qui te consacrent de leur temps pour résoudre ton problème !
N'étant pas au courant, ils perdent leur temps sans connaître les réponses, souvent très interressantes, des autres forums.
Pendant ce temps là, ils pourraient répondre à d'autres personnes qui eux aussi ont besoin d'aide.

http://www.commentcamarche.net/foru...-donnees-pour-remplir-un-formulaire#newanswer
http://codes-sources.commentcamarche.net/forum/affich-10077031-extraction-de-donnees
https://forum.excel-pratique.com/excel/extraction-de-donnees-t94350.html

Patrice
 
Bonjour doudou80, Patrice,🙁
bonsoir
je ne veux en aucun cas manquer de respect a qui que ce soi.
je suis juste dans la merde et je cherche une solution a mon probleme.
plusieurs solutions peuvent etre utile

Initialement, sur ton fichier les dates n'étaient pas des dates au sens propre du mot.
Ensuite, tu n'expliques pas vraiment ton problème, à la limites tu aurais pu mettre sur une feuille le résultat escompté. L'effort, toi tu ne me fais pas résoudre ton problème. Tu voudrais qu'on fasse cet effort à ta place.

Et comme le dit Patrice, tu ouvres la même discussion sur plusieurs Forums. Tiens, il te manques Developpez.com.

Je te dis franchement, j'ai ouvert ton fichier. Mais j'ai constaté que tu ne t'étais pas cassé la tête. Je ne vais pas le faire à ta place.

Fais au moins l'effort de nous expliquer qu'est-ce qui va dans quoi?

J'espère que tu résoudras ton problème. Généralement, quand il n'y a pas foule dans une discussion c'est que le sujet est tordu.

Cordialement,

Cp4
 
bonjour
tout d'abord merci de me répondre.
le problème pour aller plus loin c'est que je suis une quiche,J'arrive a enregistrer une macro simple mais je ne connais pas du tout le langage .mes compétences s’arrête au seul fichier que j'ai mis en pièce jointe.
cordialement
 
Re,
Loin de moi l'idée de te diminuer ou de te saper le moral.
Je ne suis pas meilleur que toi, j'ai juste eu la chance d'avoir reçu quelques notions de VBA.
Il ne faut lâcher le morceau et montre-nous ce que tu veux obtenir.
J'espère pouvoir t'aider avec mes maigres connaissances.
 
Petite précision.
Si je comprends bien, tu veux seulement récupérer l'entête pour chaque ligne de la feuille 'plan chargement'.
c-à-d que ton compteur au final sera le n° de la dernière ligne de la feuille.

Pourquoi as-tu des lignes cachées et pourquoi pour celles-ci la date n'est pas au bon format?
edit:ta macro allégée
VB:
Sub Macro2()
' Touche de raccourci du clavier: Ctrl+a
        Sheets("plan chargement").Range("A5").Copy Sheets("gestion des supports").Range("F4:G4")
    Sheets("plan chargement").Range("L5").Copy Sheets("gestion des supports").Range("F7:G7")
    Sheets("plan chargement").Range("I5").Copy Sheets("gestion des supports").Range("D20")
    Sheets("plan chargement").Range("J5").Copy Sheets("gestion des supports").Range("E20:F20")
End Sub
@+
 
pour le premier bon j'ai besoin de récupérer sur le plan de chargement :a la date du jour (aujourd'hui)A2/L2/i2/J2
avec un n° de chrono en :G1
le compteur doit incrémenter un chrono pour le premier bon = 1 ( pour le deuxième bon = 2 )
pour le format je galère aussi le fichier plan de chargement provient d'une extraction faite d'un autre système que je reçois par mail avec une extension .gsv
merci a toi
 
Pas tout compris, mais voici une proposition à tester avec touche F8.
VB:
Sub Macro2()
' Touche de raccourci du clavier: Ctrl+a
    Dim DerLig As Long, i As Long
    DerLig = Range("A" & Rows.Count).End(xlUp).Row

    With Sheets("gestion des supports")
        For i = 2 To DerLig
            .Range("G1") = i - 1
            .Range("F4:G4") = Sheets("plan chargement").Range("A" & i)
            .Range("F7:G7") = Sheets("plan chargement").Range("L" & i)
            .Range("D20") = Sheets("plan chargement").Range("I" & i)
            .Range("E20:F20") = Sheets("plan chargement").Range("J" & i)
        Next i
    End With
End Sub
 
- 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

Discussions similaires

Retour