<div class="htmlarea"> <textarea id="runcode64266"> <div id="test"> 使用法: </div>を使用してページのコンテンツ<input type="button" onclick="AllAreaExcel(test)" value="保存为Excel"></textarea>を保存し、ボタンをクリックします。 <br><input onclick="runEx('runcode64266')" type="button" value="运行代码"><input onclick="doCopy('runcode64266')" type="button" value="复制代码"> <input onclick="doSave(runcode64266)" type="button" value="保存代码"> <a href="http://www.jb51.net/article/23421.htm" title="查看具体详情" target="_blank">[Ctrl A すべて選択 注: </a>外部 Js を導入する必要がある場合は、</div> を実行するために更新する必要があります]<script language="javascript"> function AllAreaExcel(ID) { var oXL = new ActiveXObject("Excel.Application"); var oWB = oXL.Workbooks.Add(); var oSheet = oWB.ActiveSheet; var sel=document.body.createTextRange(); sel.moveToElementText(ID); sel.select(); sel.execCommand("Copy"); oSheet.Paste(); oXL.Visible = true; } </script>