print

Question

Bonjours,

dans une application vb6, j'ai cr&#233;er un boutton imprimer (il me permet
d'imprimer un fichier Excel). Celui-ci fonctionne tr&#232;s bien, mais reste
un tout petit probl&#232;me que je ne sais comment regler. 

En fait, lorsque je lance l'impression, il va m'imprimer 178 pages, et
je voudrais savoir si c'est possible de faire en sort d'imprimer
uniquement les cellules ou j'ai des donn&#233;es.

Merci d'avance pour votre aide.



code: Private Sub Print_Click()

                Dim appExcel As Excel.Application 'Application Excel

                Dim wbExcel As Excel.Workbook 'Classeur Excel

                Dim wsExcel As Excel.Worksheet 'Feuille Excel

'Ouverture de l'application

     Set appExcel = CreateObject("Excel.Application")

'Ouverture d'un fichier Excel

     Set wbExcel =appExcel.Workbooks.Open("C:\Analyseur_PC\relever_polluants.xls")

'wsExcel correspond &#224; la premi&#232;re feuille du fichier

    Set wsExcel = wbExcel.Worksheets(1)

    ActiveWindow.SelectedSheets.PrintOut Copies:=1

    wbExcel.Close

    Set wbExcel = Nothing

    appExcel.Quit

End Sub

xcxl · Answer

Je ne pense pas que ce soit possible mais tu peux, grace a une boucle, mettre dans un tablo ttes les cellule contenant quelquechose et apres, tu imprime une feuille avec juste les donn&#233;e de ton tablo.

Jespere avoir &#233;t&#233; utile pour repondre a ta question

S4ngo · Answer

oui, mais si je fait sa, a chaque fois que mon fichier excel se rempli,
je vais devoir modifier les cellules qui contiennent quelques choses.

Parce que le probleme c'est que une fois fini, je n'aurais plus acc&#232;s au programme, c'est un projet pour une entreprise.

ISABELLE6558 · Answer

Bonsoir,

Tu peux peut-&#234;tre s&#233;lectionner les cellules &#224; imprimer &#224; l'aide d'une boucle et imprimer uniquement la s&#233;lection par



    Range("A1:F27").Select

    Selection.PrintOut Copies:=1, Preview:=False, Collate:=True



o&#249; A1:F27 est la plage de cellules que tu as s&#233;lectionn&#233;e



Slt

Print

3 réponses

Discussions similaires