彩票走势图

Aspose.Cells中添加PDF标签

原创|其它|编辑:郝浩|2012-09-03 16:39:23.000|阅读 259 次

概述:大家知道吗,在运行Aspose.Cells的时候, 我们可以根据自己的需求添加相应的书签哦!这样一来,当我们想要查看文章的某一部分时,就不用在再苦苦寻觅,浪费时间了。Aspose.Cells可以按照我们自己的需求对页面视图进行精确定位,然后在文件中创建书签小号。

# 慧都年终大促·界面/图表报表/文档/IDE等千款热门软控件火热促销中 >>

大家知道吗,在运行Aspose.Cells的时候, 我们可以根据自己的需求添加相应的书签哦!这样一来,当我们想要查看文章的某一部分时,就不用在再苦苦寻觅,浪费时间了。Aspose.Cells可以按照我们自己的需求对页面视图进行精确定位,然后在文件中创建书签小号。

下面就由慧都小编和大家分享一下在Excel文件转换为PDF文件的时候,如何添加PDF书签:

[C#]

 //Instantiate a new workbook
Workbook workbook = new Workbook();
//Get the cells in the first(default) worksheet
Cells cells = workbook.Worksheets[0].Cells;
//Get the A1 cell
Aspose.Cells.Cell p = cells["A1"];
//Enter a value
p.PutValue("Preface");
//Get the A10 cell
Aspose.Cells.Cell A = cells["A10"];
//Enter a value.
A.PutValue("page1");
//Get the H15 cell
Aspose.Cells.Cell D = cells["H15"];
//Enter a value
D.PutValue("page1(H15)");
//Add a new worksheet to the workbook
workbook.Worksheets.Add();
//Get the cells in the second sheet
cells = workbook.Worksheets[1].Cells;
//Get the B10 cell in the second sheet
Aspose.Cells.Cell B = cells["B10"];
//Enter a value
B.PutValue("page2");
//Add a new worksheet to the workbook
workbook.Worksheets.Add();
//Get the cells in the third sheet
cells = workbook.Worksheets[2].Cells;
//Get the C10 cell in the third sheet
Aspose.Cells.Cell C = cells["C10"];
//Enter a value
C.PutValue("page3");

//Create a main PDF Bookmark entry object
Aspose.Cells.Rendering.PdfBookmarkEntry pbeRoot = new

Aspose.Cells.Rendering.PdfBookmarkEntry();
//Specify its text
pbeRoot.Text = "Sections";
//Set the destination cell/location
pbeRoot.Destination = p;

//Set its sub entry array list
pbeRoot.SubEntry = new ArrayList();

//Create a sub PDF Bookmark entry object
Aspose.Cells.Rendering.PdfBookmarkEntry subPbe1 = new

Aspose.Cells.Rendering.PdfBookmarkEntry();
//Specify its text
subPbe1.Text = "Section 1";
//Set its destination cell
subPbe1.Destination = A;
//Define/Create a sub Bookmark entry object of "Section A"
Aspose.Cells.Rendering.PdfBookmarkEntry ssubPbe = new

Aspose.Cells.Rendering.PdfBookmarkEntry();
//Specify its text
ssubPbe.Text = "Section 1.1";
//Set its destination
ssubPbe.Destination = D;
//Create/Set its sub entry array list object
subPbe1.SubEntry = new ArrayList();
//Add the object to "Section 1"
subPbe1.SubEntry.Add(ssubPbe);
//Add the object to the main PDF root object
pbeRoot.SubEntry.Add(subPbe1);

//Create a sub PDF Bookmark entry object
Aspose.Cells.Rendering.PdfBookmarkEntry subPbe2 = new

Aspose.Cells.Rendering.PdfBookmarkEntry();
//Specify its text
subPbe2.Text = "Section 2";
//Set its destination
subPbe2.Destination = B;
//Add the object to the main PDF root object
pbeRoot.SubEntry.Add(subPbe2);

//Create a sub PDF Bookmark entry object
Aspose.Cells.Rendering.PdfBookmarkEntry subPbe3 = new

Aspose.Cells.Rendering.PdfBookmarkEntry();
//Specify its text
subPbe3.Text = "Section 3";
//Set its destination
subPbe3.Destination = C;
//Add the object to the main PDF root object
pbeRoot.SubEntry.Add(subPbe3);

//Set the PDF Bookmark root object
workbook.SaveOptions.PdfBookmark = pbeRoot;

//Save the pdf file
workbook.Save("f:\\test\\PDFBookmarks_test.pdf");
 

[VB]

 'Instantiate a new workbook
Dim workbook As New Workbook()
'Get the cells in the first(default) worksheet
Dim cells As Cells = workbook.Worksheets(0).Cells
'Get the A1 cell
Dim p As Aspose.Cells.Cell = cells("A1")
'Enter a value
p.PutValue("Preface")
'Get the A10 cell
Dim A As Aspose.Cells.Cell = cells("A10")
'Enter a value.
A.PutValue("page1")
'Get the H15 cell
Dim D As Aspose.Cells.Cell = cells("H15")
'Enter a value
D.PutValue("page1(H15)")
'Add a new worksheet to the workbook
workbook.Worksheets.Add()
'Get the cells in the second sheet
cells = workbook.Worksheets(1).Cells
'Get the B10 cell in the second sheet
Dim B As Aspose.Cells.Cell = cells("B10")
'Enter a value
B.PutValue("page2")
'Add a new worksheet to the workbook
workbook.Worksheets.Add()
'Get the cells in the third sheet
cells = workbook.Worksheets(2).Cells
'Get the C10 cell in the third sheet
Dim C As Aspose.Cells.Cell = cells("C10")
'Enter a value
C.PutValue("page3")

'Create a main PDF Bookmark entry object
Dim pbeRoot As New Aspose.Cells.Rendering.PdfBookmarkEntry()
'Specify its text
pbeRoot.Text = "Sections"
'Set the destination cell/location
pbeRoot.Destination = p

'Set its sub entry array list
pbeRoot.SubEntry = New ArrayList()

'Create a sub PDF Bookmark entry object
Dim subPbe1 As New Aspose.Cells.Rendering.PdfBookmarkEntry()
'Specify its text
subPbe1.Text = "Section 1"
'Set its destination cell
subPbe1.Destination = A
'Define/Create a sub Bookmark entry object of "Section A"
Dim ssubPbe As New Aspose.Cells.Rendering.PdfBookmarkEntry()
'Specify its text
ssubPbe.Text = "Section 1.1"
'Set its destination
ssubPbe.Destination = D
'Create/Set its sub entry array list object
subPbe1.SubEntry = New ArrayList()
'Add the object to "Section 1"
subPbe1.SubEntry.Add(ssubPbe)
'Add the object to the main PDF root object
pbeRoot.SubEntry.Add(subPbe1)

'Create a sub PDF Bookmark entry object
Dim subPbe2 As New Aspose.Cells.Rendering.PdfBookmarkEntry()
'Specify its text
subPbe2.Text = "Section 2"
'Set its destination
subPbe2.Destination = B
'Add the object to the main PDF root object
pbeRoot.SubEntry.Add(subPbe2)

'Create a sub PDF Bookmark entry object
Dim subPbe3 As New Aspose.Cells.Rendering.PdfBookmarkEntry()
'Specify its text
subPbe3.Text = "Section 3"
'Set its destination
subPbe3.Destination = C
'Add the object to the main PDF root object
pbeRoot.SubEntry.Add(subPbe3)

'Set the PDF Bookmark root object
workbook.SaveOptions.PdfBookmark = pbeRoot

'Save the pdf file
workbook.Save("f:\test\PDFBookmarks_test.pdf")


标签:

本站文章除注明转载外,均为本站原创或翻译。欢迎任何形式的转载,但请务必注明出处、不得修改原文相关链接,如果存在内容上的异议请邮件反馈至chenjj@cahobeh.cn

文章转载自:本站原创

为你推荐

  • 推荐视频
  • 推荐活动
  • 推荐产品
  • 推荐文章
  • 慧都慧问
扫码咨询


添加微信 立即咨询

电话咨询

客服热线
023-68661681

TOP