作者:乔山办公网日期:
返回目录:excel表格制作
选中"某一个单元格”——右键——选择“超链接”——弹出窗口中选择“本文档中的位置”——选择右边框中“单元格引用下的“合同1”或“合同2”——确定
可以百用公式来实现:
=HYPERLINK("#"&A2&"."&B2&"!度A1",B2)或
=HYPERLINK("#"&A2&"."&B2&"!A1","★") 下拉复制公式
如果工作表专名只有姓名属,公式:=HYPERLINK("#"&B2&"!A1",B2)
vba可以实现
Dim oConn As ADODB.Connection
Private Sub ConnectDB()
Set oConn = New ADODB.Connection
Dim str As String
str = "DRIVER={MySQL ODBC 5.2.2 Driver};" & _
"SERVER=sql100.xtreemhost.com;" & _
"PORT=3306" & _
"DATABASE=xth_9595110_MyNotes;" & _
"UID=xth_9595110;" & _
"PWD=myPassword;" & _
"Option=3"
''' error '''
oConn.Open str
End Sub
Private Sub InsertData()
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
ConnectDB
sql = "SELECT * FROM 表名e79fa5e98193e4b893e5b19e333"
rs.Open sql, oConn, adOpenDynamic, adLockOptimistic
Do Until rs.EOF
Range("A1").Select
ActiveCell = rs.Fields("报表")
rs.MoveNext
Loop
rs.Close
oConn.Close
Set oConn = Nothing
Set rs = Nothing
End Sub
让EXCEL自动更新链接的方法如下:
1、打开EXCEL,点击百office按键(左上角标志)。
2、点击后会出现一个菜单,点击菜单右度下角的“excel选项”。
3、再点击菜单左边的“信任中心”问。
4、然后会出现“信任中心设置”,再点击。
5、接着点答击“信任中心”菜单左边的“回外部内容”。
6、此后会出现“数据连接的答安全设置” 和“工作簿连接的安全设置”,选择这两项里的“启用所有",即可完成。