如何使用javascript在excel单元格中设置超链接

excel单元格?!excel本身难道没有超级链接吗？O.0

解决方案 »

  1.   

    解决方法应该和页面的思路差不多，在sheet的onload方法中加语句
      

  2.   

    <html xmlns:o="urn:schemas-microsoft-com:office:office"
    xmlns:x="urn:schemas-microsoft-com:office:excel"
    xmlns="http://www.w3.org/TR/REC-html40"><head>
    <meta http-equiv=Content-Type content="text/html; charset=GB2312">
    <script>
    function out(){ try{
    var elTable = document.getElementById("out");
    var oRangeRef = document.body.createTextRange();
    oRangeRef.moveToElementText( elTable );
    oRangeRef.execCommand( "Copy" ); var oXL = new ActiveXObject("Excel.Application")
    var oWB = oXL.Workbooks.Add ;
    var oSheet = oWB.ActiveSheet ;
    oSheet.Paste();
    oSheet.Cells.NumberFormatLocal = "@";

    oSheet.Columns("D:D").Select
    oXL.Selection.ColumnWidth = 20 //oSheet.Columns("A:A").Select
    //oSheet.Columns("A").Width = 1000;

    oSheet.Hyperlinks.Add(oSheet.Range("F14"), "http://www.sina.com.cn", "", "", "sina") oXL.Visible = true;
    oSheet = null;
    oWB = null;
    appExcel = null; }catch(e){alert(e.description)}

    }</script>
    </head><body><table id ='out'>
     <tr>
      <td x:str bgcolor="#FF0000">00001</td>
      <td x:str>0002</td>
     </tr>
     <tr>
      <td height=18 align=right style='height:13.5pt' x:str>00001</td>
      <td align=right x:str>000002</td>
     </tr>
     <tr>
      <td x:str>0003</td>
      <td x:str>00003</td>
     </tr>
    </table>
    <INPUT type="button" value="Button" id=button1 name=button1 onclick="out()">
    </body>
    </html>
      

  3.   

    不知这样可否：直接输入内容“<a href='http://www.163.com/'>内容1</a>”//汗，没试过。