excel2010支持html,Excel 2010将范围转换为HTML

我想通了一个办法解决这个问题。我使用公式和一个单独的vba代码替代了使用vba代码将选定范围转换为html的替代路线。

我做的第一件事就是制作一张Sheet5，然后我从表格中提取原始html数据，我试图复制并将代码分成代码，然后输入新的信息。我把每个块都粘贴在A2-K2中。然后，我收到了手动更改的信息，并将其与A4-K4中的图书链接。 (这些是使用链接到与我做的每件物品改变我的登录页上的细胞)

细胞L2，我把公式=CONCATENATE(A2,A4,B2,B4,C2," ",C4,D2," ",D4,E2," ",E4,F2," ",F4,G2," ",G4,H2," ",H4,I2," ",I4,J2," ",J4,K2)

这花了原始的HTML的每个数据块，并从我的日志中的信息和结合它显示完整的HTML代码。在我的日志单元格C11中，我把=Sheet5!$L$2显示在我的主页上的html数据来复制和粘贴值。

在此之后，我注意到excel会将双引号添加到已经引用的所有内容中，并将单引号添加到其他区域。做了一些搜索后，我发现了一个代码，可以复制选定单元格的值，这样我就可以粘贴不带引号的HTML代码。这是我用来做这个的宏。

Sub CopyCellContents()

Range("C11").Select

'create a reference in the VBE to Microsft Forms 2.0 Lib

Dim objData As New DataObject

Dim strTemp As String

strTemp = ActiveCell.Value

objData.SetText (strTemp)

objData.PutInClipboard

End Sub`

我遇到了用户定义数据的问题。为了解决这个问题，我不得不退出代码调试器，重新打开模块中的宏，去工具

我把它分配给单元格C11旁边的一个按钮，现在当我点击它时，代码被复制到我的剪贴板中而不用引号。这不正是我最初的计划，但结果正是我想要的。感谢您的帮助，希望这可以帮助其他人。

下面是我完成的一些屏幕截图。

这是由这些公式创建的成品。我的日志页面上有按钮。点击后，它将框中的代码复制到右侧而不用引号。 http://i.stack.imgur.com/jh34N.png

整个电子表格是一个力作是不断用不同的公式，宏，代码等成长矿...