Excel超级链接中引用该单元格的值

我想在Excel某单元格中加上超级链接,并且链接地址中需加入此单元格的值,如A1单元格值为“林峰”,那么链接的地址为“ http://baike.baidu.com/searchword/?word=A1单元格值&pic=1”(即 http://baike.baidu.com/searchword/?word=林峰&pic=1 ),怎么样才能实现。我知道可以一个一个的手工加上去,可是太麻烦了谁知道简单的方法。

可以用VBA实现
在该文件夹下新建一个excel文件,打开该文件后按住ALT,依次按F11,I,M
粘贴下面的代码后按F5,即可在该文件中获得该目录下所有*.xls文件的sheet2的A1,B2,C3的内容。
具体单元格坐标根据需要修改。


Sub test()
    Application.ScreenUpdating = False
    p = ThisWorkbook.Path & "\"
    f = Dir(p & "*.xls")
    m = ThisWorkbook.Name
    R = 1
    Do
        If f <> m Then
            Workbooks.Open (p & f)
            R = R + 1
            With Workbooks(m).Sheets(1)
                .Cells(R, 1) = Sheets("sheet2").[A1]'将A1值放在新表的第1列
                .Cells(R, 2) = Sheets("sheet2").[B2]'将B2值放在新表的第2列
                .Cells(R, 3) = Sheets("sheet2").[C3]
                '依次添加其他要读取的单元格
            End With
            ActiveWorkbook.Saved = True
            ActiveWorkbook.Close
        End If
        f = Dir
    Loop Until f = ""
    Application.ScreenUpdating = True
End Sub 


对补充问题的回复:
将代码中所有"sheet2"改为"评估数据"

以上是提取同一文件夹不同excel文件同一工作表中同一单元格的数值,比如能不能将Cells(R, 1) = Sheets("sheet2").[A1]'将A1值放在新表的第1列
提取的A1数值放到第一列后,第一列带超链接,点击第一列时可以连接到原始数据那个xls文件。



引用单元格位置可以利用=INDIRECT("A1")公式,这里假设要引用A1的值

 =INDIRECT("A1")-加引号,文本引用A1的值 ,如下例上 


  =INDIRECT(A1)—不加引号,地址引用,引用的是对应值  

温馨提示:答案为网友推荐,仅供参考
第1个回答  2013-07-08
EXCEL中单元格引用的相对地址和绝对地址的区别是: 1,相对地址在公式复制中会根据公式单元格的改变而改变。例:B1中相对引用A1,当将B1单元格复制到D1时引用的就不是A1了,而是C1了. 2,绝对地址在公式复制中不会根据公式单元格的改变而改变。例:B1中绝对引用A1,当将B1单元格复制到D1时引用的还是A1. 3,相对引用时不用有特定控制,绝对引用时要在引用中添加$符号。即$A$1。快捷键F4。有4种引用格式循环切换。 默认为相对引用,相对引用是指函数计算的单元格和引用数据的单元格中的相对位置。如:A1 绝对引用,就是特定位置的单元格的引用。即单元格的精确地址。如:$A$1
第2个回答  2013-07-08
在B1输入
=HYPERLINK(" http://baike.baidu.com/searchword/?word="&A1&"&pic=1")
就是超链接。公式向下复制。本回答被网友采纳
第3个回答  2015-10-23
超链接是指点击此处跳转至链接的位置。
要引用该单元格的值,是用公式进行处理。
例如:sheet1的B2单元格,想引用sheet2的A3值)在sheet1B2单元格输入公式:=sheet2!A3
第4个回答  2018-04-24
'sheet1'!A1 为显示在sheet2 A1单元格的超级链接。
复制超级链接->在Sheet2中,右键点击Sheet2 B1 单元格->选择性粘贴->数值,
在sheet2 C1 单元格输入公式 ="="&"'"&B1,
复制Sheet2 C1,右键点击Sheet2 C1选择性粘贴->数值,
将Sheet2 C1的空格去掉,此时超级链接变成了单元格引用。
相似回答