A voir également:
- Impression feuille Excel grace a VB
- Spouleur d'impression - Guide
- Liste déroulante excel - Guide
- Feuille de pointage excel - Télécharger - Tableur
- Impression livret a5 - Guide
- Word et excel gratuit - Guide
4 réponses
Hello
si je comprend bien tu ne veux pas vraiment Imprimer sur papier, mais plutôt copier des plages définies d'une feuille à une autre.
C'est tout à fait réalisable et assez simple en plus, si tu connais le VBA.
Si c'est le cas tu n'as qu'à me le dire et je t'enverrai le code.
Sinon ça risque d'être un peu plus compliqué mais y'a toujours moyens.
Dis-moi déjà si tu connais le VBA...
si je comprend bien tu ne veux pas vraiment Imprimer sur papier, mais plutôt copier des plages définies d'une feuille à une autre.
C'est tout à fait réalisable et assez simple en plus, si tu connais le VBA.
Si c'est le cas tu n'as qu'à me le dire et je t'enverrai le code.
Sinon ça risque d'être un peu plus compliqué mais y'a toujours moyens.
Dis-moi déjà si tu connais le VBA...
Bonjour,
Tes lignes de produit comporte combien de colonnes ?
Et sont-elles plus large qu'une feuille d'imprimante ?
Ta page imprimé ne comportera qu'une seule ligne ?
Et enfin, pas besoin d'un bouton sur chaque ligne, un seul suffit du moment que l'ont met le curseur sur la ligne à imprimé.
Tu dit... et je verrais pour t'aider.
A+
Tes lignes de produit comporte combien de colonnes ?
Et sont-elles plus large qu'une feuille d'imprimante ?
Ta page imprimé ne comportera qu'une seule ligne ?
Et enfin, pas besoin d'un bouton sur chaque ligne, un seul suffit du moment que l'ont met le curseur sur la ligne à imprimé.
Tu dit... et je verrais pour t'aider.
A+
Mes lignes de produit comportent un petit peu plus de 20 colonnes, et effectivement c'est plus large qu'une feuille A4. ma page a imprimer reprend les donnees de ma feuille de base, mais la presentation n'est pas du tout la meme.
ma feuille de donnees est une feuille de saisie ou toutes les infos sont rentrees simplement et en ligne car je fais aussi une rechercheH sur cette feuille.
ma feuille a imprimer reprend seulement quelques donnees de ma feuille de saisie mais est presentee differement, beaucoup plus proprement et lisiblement.
si je n'ai pas besoin de plusieurs boutons, c'est vraiement top! ca c'est une bonne nouvelle!!
ma feuille de donnees est une feuille de saisie ou toutes les infos sont rentrees simplement et en ligne car je fais aussi une rechercheH sur cette feuille.
ma feuille a imprimer reprend seulement quelques donnees de ma feuille de saisie mais est presentee differement, beaucoup plus proprement et lisiblement.
si je n'ai pas besoin de plusieurs boutons, c'est vraiement top! ca c'est une bonne nouvelle!!
ce que je veux est tres compliquer, j'aurais pas du me lancer la-dedans!
en chaque fois, je considere une seule ligne. sur cette ligne, quelques colonnes m'interessent et effectivement elles ne sont pas placees a la suite les unes des autres.
par exemple, la ligne 3 m'interesse. sur cette ligne 3, je veux que les colonnes 2, 3, 5 et 7 soient reprises dans ma feuille a imprimer mais respectivement aux emplacements D4, G5, G7 et G10.
est-ce que cela est realisable?
tu me parlais de Array, mais n'etant pas un pro de VBA, j'ose te demander : c'est quoi?
en chaque fois, je considere une seule ligne. sur cette ligne, quelques colonnes m'interessent et effectivement elles ne sont pas placees a la suite les unes des autres.
par exemple, la ligne 3 m'interesse. sur cette ligne 3, je veux que les colonnes 2, 3, 5 et 7 soient reprises dans ma feuille a imprimer mais respectivement aux emplacements D4, G5, G7 et G10.
est-ce que cela est realisable?
tu me parlais de Array, mais n'etant pas un pro de VBA, j'ose te demander : c'est quoi?
Mais oui, c'est pas compliqué...
Tu colle le code ci-dessous dans module1
'prend la ligne où est le curseur de la feuille origine et copie
'sur la 1ère ligne vide de la feuille destination
Tu colle un bouton sur la feuille, en mode Création tu double clic sur le bouton tu va avoir...
et au milieu tu colle Call CopieSurAutreFeuille, pour avoir
A+
Tu colle le code ci-dessous dans module1
'prend la ligne où est le curseur de la feuille origine et copie
'sur la 1ère ligne vide de la feuille destination
Sub CopieSurAutreFeuille()
Dim Fl1 As Worksheet, FL2 As Worksheet
Dim Noligne As Long
Dim i As Integer
Dim TBo, TBd
'Remplacer ces chiffres par le n° de colonne à copier.
'ex: A=1,C=3 etc..
TBo = Array(2, 3, 5, 7)
TBd = Array("D4", "G5", "G7", "G10")
Set Fl1 = Sheets("FeuilOrigine") 'remplacer par le vrai nom
Set FL2 = Sheets("FeuilDetination") 'idem
Noligne = ActiveCell.Row
For i = 0 To UBound(TBo)
FL2.Range(TBd(i)) = Fl1.Cells(Noligne, TBo(i))
Next i
End Sub
Tu colle un bouton sur la feuille, en mode Création tu double clic sur le bouton tu va avoir...
Private Sub CommandButton1_Click() End Sub
et au milieu tu colle Call CopieSurAutreFeuille, pour avoir
Private Sub CommandButton1_Click()
Call CopieSurAutreFeuille
End Sub
A+
Salut
J'ai bien suivi tout ce que tu m'as dit mais ça ne fonctionne pas... C'est très certainement car je n'ai pas fait une étape comme il fallait!!
Par exemple, je suis un peu naze, mais comment fais-tu pour créer un bouton et ensuite le placer dans ta feuille Excel?
Aussi, je ne vois pas comment je peux choisir la ligne que je veux imprimer et à quel moment dans le code s'est écrit?
J'espère que tu pourras m'aider car je suis sur la bonne voie, j'ai juste besoin d'un petit coup de main supplémentaire!
Merci!
A+
J'ai bien suivi tout ce que tu m'as dit mais ça ne fonctionne pas... C'est très certainement car je n'ai pas fait une étape comme il fallait!!
Par exemple, je suis un peu naze, mais comment fais-tu pour créer un bouton et ensuite le placer dans ta feuille Excel?
Aussi, je ne vois pas comment je peux choisir la ligne que je veux imprimer et à quel moment dans le code s'est écrit?
J'espère que tu pourras m'aider car je suis sur la bonne voie, j'ai juste besoin d'un petit coup de main supplémentaire!
Merci!
A+
Créer un bouton
Clic droit sur une barre d'outil >> Dans la fenêtre >> Commande >> Macro >> tu prend le bouton jaune et tu le fait glisser dans une barre d'outils,à l'endroit où tu veux le mettre.
Tu ne ferme pas cette fenêtre>> Tu clic droit sur ton nouveau bouton
Tu peu changer l'image
Tu peu changer le nom, c'est le texte que tu verras dans la bulle du bouton.
Tu sélectionne Affecter une macro
dans nouvelle fenêtre sélectionner le nom de la macro.
Pour sélectionner une ligne, simplement mettre le curseur dans une cellule de la ligne que tu veux traiter.
c'est la fonction ActiveCells qui sait où tu a cliqué.
Si pas assez claire repose une question
A+
Clic droit sur une barre d'outil >> Dans la fenêtre >> Commande >> Macro >> tu prend le bouton jaune et tu le fait glisser dans une barre d'outils,à l'endroit où tu veux le mettre.
Tu ne ferme pas cette fenêtre>> Tu clic droit sur ton nouveau bouton
Tu peu changer l'image
Tu peu changer le nom, c'est le texte que tu verras dans la bulle du bouton.
Tu sélectionne Affecter une macro
dans nouvelle fenêtre sélectionner le nom de la macro.
Pour sélectionner une ligne, simplement mettre le curseur dans une cellule de la ligne que tu veux traiter.
c'est la fonction ActiveCells qui sait où tu a cliqué.
Si pas assez claire repose une question
A+
Salut lermite222 !
je suis desole mais je n'y arrive pas... je ne comprends pas la demarche et comment je peux imprimer la ligne qui m'interesse avec le code que tu m'as donne et en selectionnant une cellule. d'ailleurs, a quel moment ce ActiveCell apparait-il et comment intervient-il?
je suis surement pas tres doue, mais j'ai comme excuse (si ca n'est une) que je suis en ce moment a l'etranger et que tout le Excel est en anglais!!
a+
je suis desole mais je n'y arrive pas... je ne comprends pas la demarche et comment je peux imprimer la ligne qui m'interesse avec le code que tu m'as donne et en selectionnant une cellule. d'ailleurs, a quel moment ce ActiveCell apparait-il et comment intervient-il?
je suis surement pas tres doue, mais j'ai comme excuse (si ca n'est une) que je suis en ce moment a l'etranger et que tout le Excel est en anglais!!
a+
Set Fl1 = Sheets("FeuilOrigine") 'remplacer par le vrai nom
Set FL2 = Sheets("FeuilDetination") 'idem
Noligne = ActiveCell.Row
Pour le bouton, tu l'a fait ?
Si oui, Quand tu clic dessus que se passe-t-il ?
EDIT:
J'ai fait une erreur dans la création de bouton, j'ai expliqué pour une barre d'outil, mais ce serra éventuellement pour plus tard.
Tu sélectionne > Affichage >> Barre d'outils >> boite à outils contrôles.
tu clic sur Mode Création pour que le bouton soit enfoncé...
tu clic sur l'icone >Bouton de commande >> Tu fait un rectangle sur la feuille, tu le dimentionne et le place où tu veux.
Ensuite tu relache le bouton Mode Création
Set FL2 = Sheets("FeuilDetination") 'idem
Noligne = ActiveCell.Row
Pour le bouton, tu l'a fait ?
Si oui, Quand tu clic dessus que se passe-t-il ?
EDIT:
J'ai fait une erreur dans la création de bouton, j'ai expliqué pour une barre d'outil, mais ce serra éventuellement pour plus tard.
Tu sélectionne > Affichage >> Barre d'outils >> boite à outils contrôles.
tu clic sur Mode Création pour que le bouton soit enfoncé...
tu clic sur l'icone >Bouton de commande >> Tu fait un rectangle sur la feuille, tu le dimentionne et le place où tu veux.
Ensuite tu relache le bouton Mode Création
j'espere que tu me comprends, c'est pas facile a expliquer comme cela.
pour ce qui est de VBA, j'en ai fait un tout petit peu, mais les trucs de base, c'est vraiment la le plus gros chantier que j'ai jamais realise. je pense que si tu m'expliques assez bien comment faire ;) je devrais pouvoir y arriver!