Comment convertir une seule feuille XLS au format PDF en utilisant VB.NET

J'ai le travail de code qui permettra de convertir xls en pdf, cependant, le code convertit la totalité du classeur et j'ai vraiment juste besoin de sélectionner une seule feuille du classeur, mais je ne peux pas comprendre comment le faire.

Le code que j'utilise actuellement est:

Dim fileName As String = "filepath\filename"
Dim xlsApp = New Microsoft.Office.Interop.Excel.Application
xlsApp.ScreenUpdating = False
Dim xlsBook As Microsoft.Office.Interop.Excel.Workbook
Dim paramExportFormat As XlFixedFormatType = XlFixedFormatType.xlTypePDF
Dim paramExportQuality As XlFixedFormatQuality = XlFixedFormatQuality.xlQualityStandard
Dim paramOpenAfterPublish As Boolean = False
Dim paramIncludeDocProps As Boolean = True
Dim paramIgnorePrintAreas As Boolean = True
Dim paramFromPage As Object = Type.Missing
Dim paramToPage As Object = Type.Missing
xlsBook = xlsApp.Workbooks.Open(fileName & ".xls", UpdateLinks:=False, ReadOnly:=False)
xlsBook.ExportAsFixedFormat(paramExportFormat, fileName & ".pdf", paramExportQuality, paramIncludeDocProps, paramIgnorePrintAreas, paramFromPage, paramToPage, paramOpenAfterPublish)
xlsBook.Close(SaveChanges:=False)
xlsApp.Quit()

Où dans le code dois-je besoin de spécifier la feuille dans le classeur? Note que j'ai besoin de faire en sorte que, selon l'option de la fed dans l'application de la feuille de changer, mais je ne pense pas que devrait faire une différence, mais j'ai pensé que je le mentionne dans les deux cas.

  • Pouvez-vous utiliser le paramFromPage, paramToPage paramètres?
  • Je ne sais pas, mais je vais certainement l'essayer, vous ne savez pas qui affecte la feuille dans un classeur bien.
  • Si c'est toujours l'impression de l'ensemble du classeur et de la feuille que vous voulez, c'est sur une page en particulier, et le classeur taille ne change jamais, vous devriez être en mesure d'indiquer seulement la page que vous souhaitez imprimer (beaucoup d'hypothèses, je sais).
  • Cela fait un travail, je viens de changer leur Entier et spécifié à la fois pour la page 1 et il ne converti de la première feuille de calcul (première page).
  • Je sais que c'est une vieille question, mais vous ne n'arrive pas à se rappeler comment vous avez spécifié la feuille pensez-vous?
InformationsquelleAutor MaQleod | 2011-07-06
  1. 3

    Essayez d'utiliser ExportAsFixedFormat méthode

    Private Sub SaveWorksheetAsPDF()
    Dim mySheet As Microsoft.Office.Tools.Excel.Worksheet = xlsBook(0)

    mySheet.ExportAsFixedFormat( _
        Excel.XlFixedFormatType.xlTypePDF, _
        "c:\myWorksheet", _
        Excel.XlFixedFormatQuality.xlQualityStandard, _
        True, _
        True, _
        1, _
        10, _
        False)
End Sub
    • Si vous regardez le code que j'ai posté, je suis déjà en utilisant cette méthode, mais j'ai créé un classeur et essayé d'exporter une seule feuille, pas un objet de feuille de calcul pour juste la feuille qui m'intéressait.
    • Je ne vois pas dans votre code que vous exportez une feuille. Si vous regardez mon code j'ai xlsBook(0) - qui est la première feuille. Dans votre code, il pourrait être le deuxième ou le troisième. Essayez d'utiliser xlsBook(x) à la place.
    InformationsquelleAutor Vlad Bezden