× Aidez la recherche contre le COVID-19 avec votre ordi ! Rejoignez l'équipe PC Astuces Folding@home
 > Tous les forums > Forum Bureautique
 Imprimer dossier avec souris
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
charmi
  Posté le 23/01/2008 @ 18:28 
Aller en bas de la page 
Petit astucien

Bonjour,

Je veux faire imprimer le dossier avec la souris , clic droit,

Voici le message:

La commance ne peut être exécutée, car boite dialogue est ouverte, cliquée sur ok,puis fermer les boîtes de dialogues ouvertes pour continuer.

Y-a-t-il un moyen d'imprimer sans avoir toujours ouvrir le dossier et ctrl+p, car je dois souvent imprimer des dossiers, car avec le Word Perfect, je pouvais imprimer avec

la souris avec clic droit

Comme j'ai changé pour le Word, y-a-t-il un moyen de le faire avec souris et clic droit ou autres suggestions.

J'attends avec impatience vos réponses

Merci

Belle journée

Publicité
sourisdeservice
 Posté le 24/01/2008 à 01:18 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Grande Maîtresse astucienne

Bonjour,

Il ne faut pas confondre Dossier et Fichier

On n'imprime pas un dossier (représenté par une icône jaune)

On imprime des fichiers, ceux dont l'icone de Word est avec un W bleu : Sur ceux là tu as la commande imprimer quand tu es dans l'explorateur

gilbert_rgi
 Posté le 24/01/2008 à 13:58 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Bonjour

il est possible également de mettre cette petite macro de le normal.dot

VBA
  1. Const NOMBARRE As String = "Imprimer"
  2. Private Sub Document_Open()
  3. Dim mBar As CommandBarControl
  4. On Error Resume Next
  5. Set mBar = Application.CommandBars("Text").Controls(NOMBARRE)
  6. On Error GoTo 0
  7. If mBar Is Nothing Then
  8. With Application.CommandBars("Text")
  9. With .Controls.Add(msoControlButton)
  10. .Caption = NOMBARRE
  11. .OnAction = "imprime"
  12. .FaceId = 5
  13. End With
  14. End With
  15. End If
  16. End Sub
  17. Private Sub Document_Close()
  18. On Error Resume Next
  19. Application.CommandBars("Text").Controls(NOMBARRE).Delete
  20. End Sub

avec cela au click droit de la souris il y a la commande "Imprimer"

ce qui donne

mcword

Cdlt

RGI



Modifié par gilbert_rgi le 24/01/2008 14:10
usularrakis
 Posté le 24/01/2008 à 17:43 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

salut Gilbert

intéressante ta macro je la copie/colle merci EDIT : je n'arrive pas à la faire fonctionner (Word 2000)

par contre elle ne correspond pas à la demande de charmi il me semble alors que celle de SdS est tout à fait en rapport avec ce que souhaite charmi :imprimer un fichier sans l'ouvrir ce qui à mon avis est plus une commande windows qu'une commande de Word

gilbert_rgi
 Posté le 24/01/2008 à 17:50 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Bonjour

le decryptage n'est pas toujours facile

je suis sur 2003 ????

voilà l'essaioriginal

Cdlt

RGI



Modifié par gilbert_rgi le 24/01/2008 17:51
usularrakis
 Posté le 25/01/2008 à 12:20 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

bien d'accord pour le décryptage

pour le reste j'ai répondu à ton MP

au niveau de mon Normal.dot : où dois-je coller ta macro pour que ça fonctionne ?

car ton fichier "essaioriginal" fonctionne bien avec Word2000

gilbert_rgi
 Posté le 27/01/2008 à 11:56 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Bonjour usularrakis

remplacer sub document_open() par Sub AutoExec()

et ça fonctionne dans le thisdocument du normal.dot

Cdlt

RGI

usularrakis
 Posté le 28/01/2008 à 10:31 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

ça marche

merci

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour poster des messages. Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !


Les bons plans du moment PC Astuces

Tous les Bons Plans
129,99 €Disque dur externe USB 3.0 Seagate 8 To à 129,99 €
Valable jusqu'au 29 Novembre

Fnac propose actuellement le disque dur Seagate Expansion Desktop Drive 8 To à 129,99 € livré gratuitement alors qu'on le trouve ailleurs à partir de 200 €. Le disque est non soudé et vous pourrez le récupérer pour l'utiliser dans un ordinateur, un NAS, etc. Connexion USB 3.0.


> Voir l'offre
89,79 €SSD Western Digital Blue 1 To à 89,79 € livré
Valable jusqu'au 29 Novembre

Amazon Allemagne fait une promotion sur le SSD Western Digital Blue 1 To qui passe à 85,21 € (avec la TVA ajustée). Comptez 4,58 € pour la livraison en France soit un total de 89,79 € livré. On le trouve ailleurs à partir de 120 €. Ce SSD à mémoire TLC offre des vitesses de 545 Mo/s en lecture et 525 Mo/s en écriture. 

Vous pouvez utiliser votre compte Amazon France sur Amazon Allemagne et qu'il n'y a pas de douane. Si vous êtes perdu en allemand, vous pouvez traduire le site en anglais.


> Voir l'offre
14,70 €Ensemble clavier + souris Logitech MK120 à 14,70 €
Valable jusqu'au 28 Novembre

Amazon fait une promotion sur l'ensemble clavier + souris sans fil Logitech MK120 qui passe à 14,70 € alors qu'on le trouve habituellement autour de 25 €. Ce duo combine simplicité, confort, et prix attractif. Le clavier, silencieux, présente des touches à l'écriture particulièrement lisible et au design ultra-plat, couplées à une barre espace suffisamment incurvée pour améliorer la position de vos mains pendant que vous l'utiliserez. Résistant aux éclaboussures, il saura se protéger des accidents éventuels. Quant à la souris 3 boutons, nécessitant elle aussi un port USB pour fonctionner, elle se présente sous une forme ambidextre qui satisfera le plus grand nombre.


> Voir l'offre

Sujets relatifs
imprimer avec cartaweb
comment marque les $ avec la souris
Imprimer une liste de videos d'un dossier.
ouvrir un dossier avec extension CMI
imprimer avec open office
Impossible d'imprimer avec Foxit PDF.
Imprimer avec thunderbird
imprimer ou enregistrer une page web avec surface rt
imprimer un PDF avec Firefox
Imprimer à l"échelle avec OPEN DRAW
Plus de sujets relatifs à Imprimer dossier avec souris
 > Tous les forums > Forum Bureautique