KB0156：我无法将数据粘贴到 thinkcell 数据表中，或格式丢失

问题

当您在 Excel 工作簿 (.xlsx) 中复制数据并将数据粘贴到 thinkcell 元素的数据表中时，会遇到以下问题之一：

• 您收到一条消息：Microsoft Excel cannot paste the data。
• 只粘贴了空单元格。
• 日期或数字格式丢失——例如，1/1/2012 变为 40909，或 $3.5 变为 3.5。
• 粘贴后，百分比值显示不正确。在 100% 图表中，图表布局可能会改变。
• 虽然您选择了 Use Datasheet Fill on Top，但单元格颜色未显示在元素中。

使用 thinkcell 的 Excel 数据链接时，也可能出现这些问题。

解决方案

如果 .xlsx 工作簿包含超过约 65,490 个单元格样式，则可能出现上述任何问题。要检查单元格样式数量，请在 VBA 编辑器的 Immediate 窗口中使用命令 print Activeworkbook.Styles.Count。 阅读更多

要清理受影响工作簿中的单元格样式数量，请尝试以下任一方法：

• 将工作表复制到新工作簿中。 阅读更多

  在 Excel 2013 及更高版本中，您可以将受影响的工作表复制到新工作簿中，以防止未使用的单元格样式累积。

  1. 选择工作簿中的所有工作表：选择第一张工作表，按住 Shift，然后选择最后一张工作表。
  2. 右键单击所选内容，然后选择 Move or Copy。
  3. 在 Move or Copy 对话框中，在 To book 下拉菜单上，选择 (new book)。
  4. 选择 Create a copy，然后选择 OK。
  5. 用新名称保存新工作簿。
• 使用 XLStyles Tool 清理工作簿。 阅读更多
  1. 打开 XLStyles Tool。
  2. 选择 Get File。
  3. 选择所需文件，然后选择 Scan Selected File。
  4. 在 Used Styles 中，选择 Force all Styles to "Normal"。
  5. 选择 Process File。
• 使用 VBA 宏从工作簿中删除自定义单元格样式。 阅读更多

  使用 DeleteCustomStyles() 宏从工作簿中删除所有自定义单元格样式。

  1. 打开 VBA 编辑器（Alt+F11）。
  2. 选择您的工作簿，然后选择 Insert > Module。
  3. 输入以下宏，然后运行它（F5）。

  复制

  Sub DeleteCustomStyles()
  Dim st As Style
  Dim i, i_cust As Long
  i_cust = 0
  For i = (ActiveWorkbook.Styles.Count) To 1 Step -1
  	With ActiveWorkbook.Styles(i)
  		If .BuiltIn = False Then
  			On Error Resume Next
  			.Locked = False
  			On Error GoTo 0
  			If Not .Locked Then
  				.Delete
  				i_cust = i_cust + 1
  			End If
  		End If
  	End With
  	If (i Mod 100) = 0 Then Debug.Print i
  Next
  MsgBox "Styles deleted: " & i_cust & " styles" & Chr(13) & "Styles left: " & ActiveWorkbook.Styles.Count
  End Sub

  已复制到剪贴板

最佳解决方案是防止用户将未使用的单元格样式粘贴到其他工作簿中，但这需要 Microsoft 修复 Excel 2007 及更高版本中的一个错误。到目前为止，Microsoft 认为其业务影响尚不足以提供此修复。如果您的公司拥有 Microsoft Office 支持合同，并希望向 Microsoft 请求修复，可以引用 Microsoft 案例编号 113012810172527 和 114021711190574 (Excel 2013)。

说明

当您复制并粘贴 Excel 数据，或通过 Excel 数据链接传输数据时，数据会以 BIFF12/.xlsb 格式存储。此文件格式支持约 65,490 种单元格样式。如果您从单元格样式数量超过该格式支持上限的 .xlsx 工作簿复制数据，可能无法将数据粘贴到 thinkcell 数据表中，或者粘贴后的数据会丢失格式信息。 阅读更多