Code vba : impression automatique via hyperlien


#1

bonjour,

debutant en VBA j’aurai grandement besoin de vos lumières.

je dispose d’un classeur excel contenant plusieurs feuilles (base produits,base clients, base facturation, facture,…)

dans l’onglet base facturation,je recupere les données des autres onglets pour creer une facture càd entrer une quantité de chaque produits et cela me donne le total dû (chaque colone est une nouvelle facture et a un numero qui lui est propre.)

dans l’onglet facture,j’entre le numero de facture que je desire imprimer et plusieurs formules vont trouver les infos correspondantes dans l’onglet base facturation et les affichent dans un tableau pré-établit ( la dite facture) pret a etre imprimer.

ce que je cherche a faire est creer un hyperlien en haut de chaque colone ( facture ) ayant pour nom “imprimer” qui, en cliquant dessus, permet de copier le numero de ladite facture dans l’onglet facture ( ce afin de retouver lesinfo correspondantes) et de lancer une impression sur une imprimante specifique ( code trouvé pour faire cela.).

Sub IMPRIMER()
Application.ActivePrinter = “Canon iP110 series sur Ne07:”
ThisWorkbook.Sheets(“FACTURE”).PrintOut Copies:=1
End Sub

je joint le fichier pour faire plus simple

https://www.cjoint.com/c/HLinOv7htlE

essai impression facture hyperlien.xlsx (1,5 Mo)

Merci par avance a tous ceux qui m’accorderons un peu de leur temps !!

bien a vous.