在日常工作中,在編輯文檔時,為了方便自己或者Boss能夠?qū)崟r查看到需要的網(wǎng)頁或者文檔時,需要對在Excel中輸入的相關(guān)文字進(jìn)行超鏈接,那么對于一些在Excel中插入的圖片我們該怎么實(shí)現(xiàn)超鏈接呢,下面給大家分享一個方法:
創(chuàng)新互聯(lián)建站-專業(yè)網(wǎng)站定制、快速模板網(wǎng)站建設(shè)、高性價比陽江網(wǎng)站開發(fā)、企業(yè)建站全套包干低至880元,成熟完善的模板庫,直接使用。一站式陽江網(wǎng)站制作公司更省心,省錢,快速模板網(wǎng)站建設(shè)找我們,業(yè)務(wù)覆蓋陽江地區(qū)。費(fèi)用合理售后完善,10余年實(shí)體公司更值得信賴。
首先簡單了解一下一款叫Spire.XLS的組件,這個組件是由E-iceblue公司發(fā)布的一款獨(dú)立的Excel組件,它的最大優(yōu)點(diǎn)在于不依賴Microsoft Excel,可以用在各種 .NET 框架中,包括 ASP.NET 和 Windows Forms 等相關(guān)的 .NET 應(yīng)用程序,功能齊全,而且易于使用。有興趣的朋友可以上E-iceblue官網(wǎng)了解詳細(xì)內(nèi)容,也可以在該網(wǎng)站上下載免費(fèi)版Excel組件。
使用C#為Excel中的圖片進(jìn)行超鏈接,可以參考我下面的操作步驟,這里需要使用到一些代碼,但只需要幾步就可以完成:
步驟一:創(chuàng)建一個工作簿,獲取第一個工作表
Workbook wb = new Workbook(); Worksheet sheet = wb.Worksheets(0);
步驟二:在特定單元格內(nèi)添加文本內(nèi)容
sheet.Range("A1").Text = "Excel圖片超鏈接"; sheet.Range("A1").Style.VerticalAlignment = VerticalAlignType.Top;
步驟三:插入圖片并添加超鏈接
string picPath = "C:\\Users\\Administrator\\Desktop\\tupian.jpg"; ExcelPicture picture = sheet.Pictures.Add(1, 1, picPath); picture.SetHyperLink("https://github.com/", true);
步驟四:設(shè)置第一列寬度和第一行高度
sheet.Columns[0].ColumnWidth = 30; sheet.Rows[0].RowHeight = 150; picture.TopRowOffset = 25;
步驟五:保存文件
wb.SaveToFile("ImageHyperlink.xlsx", ExcelVersion.Version2013);
操作完成后得到以下輸出結(jié)果:
所以,實(shí)現(xiàn)對圖片的超鏈接,只需要完成以上幾個步驟就可以了。
同樣的道理,在VB.NET中,也可以實(shí)現(xiàn)對Excel圖片的超鏈接。
完整的代碼如下,供參考:
C#:
using Spire.Xls; using System.Text; using System.Linq; using System.Collections.Generic; using System; namespace Excel_p_w_picpath_hyperlink { class Program { private static void Main(string[] args) { Workbook wb = new Workbook(); Worksheet sheet = wb.Worksheets(0); sheet.Range("A1").Text = "Excel圖片超鏈接"; sheet.Range("A1").Style.VerticalAlignment = VerticalAlignType.Top; string picPath = "C:\\Users\\Administrator\\Desktop\\tupian.jpg"; ExcelPicture picture = sheet.Pictures.Add(1, 1, picPath); picture.SetHyperLink("https://github.com/", true); sheet.Columns[0].ColumnWidth = 30; sheet.Rows[0].RowHeight = 150; picture.TopRowOffset = 25; wb.SaveToFile("ImageHyperlink.xlsx", ExcelVersion.Version2013); } } }
VB.NET:
Imports System Imports System.Collections.Generic Imports System.Linq Imports System.Text Imports Spire.Xls Namespace Excel_p_w_picpath_hyperlink Class Program Private Shared Sub Main(ByVal args() As String) Dim wb As Workbook = New Workbook Dim sheet As Worksheet = wb.Worksheets(0) sheet.Range("A1").Text = "Excel圖片超鏈接" sheet.Range("A1").Style.VerticalAlignment = VerticalAlignType.Top Dim picPath As String = "C:\Users\Administrator\Desktop\tupian.jpg" Dim picture As ExcelPicture = sheet.Pictures.Add(1, 1, picPath) picture.SetHyperLink("https://github.com/", true) sheet.Columns(0).ColumnWidth = 30 sheet.Rows(0).RowHeight = 150 picture.TopRowOffset = 25 wb.SaveToFile("ImageHyperlink.xlsx", ExcelVersion.Version2013) End Sub End Class End Namespace
希望這個方法對你有所幫助。
感謝閱讀!
文章名稱:C#/VB.NET對EXCEL圖片添加超鏈接
文章來源:http://chinadenli.net/article20/gehijo.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供移動網(wǎng)站建設(shè)、自適應(yīng)網(wǎng)站、用戶體驗(yàn)、微信公眾號、靜態(tài)網(wǎng)站、動態(tài)網(wǎng)站
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)