SQL server 2012网格结果复制/粘贴到excel 2010



所以我才第一次得到这个问题,现在再运行查询已经太晚了。

问题是varchar字段的字符返回实际上是在excel中做一个新的行,所以我的复制/粘贴是大时间。

我想我有一个解决方案,但我想知道其他人是否有另一个解决方案

我的解决方案是创建一个小脚本,将找到"不正确的"行,并将内容移动到适当的位置

有更好的解决方案吗?

我如何修复我的问题(特定于我的问题的代码)

Sub test()

Dim cell As Range
Dim lastGoodRow As Range
For Each cell In Range("a1:a1938")
If IsNumeric(cell.Text) Then
    Set lastGoodRow = Range("v" & cell.Row)
End If
If Not IsNumeric(cell.Text) Then
    lastGoodRow.Value = lastGoodRow.Text & vbCrLf & cell.Text
    If Range("b" & cell.Row).Text <> "" Then
    Range("B" & cell.Row & ":J" & cell.Row).Select
    Selection.Copy
    Range("W" & lastGoodRow.Row).Select
    ActiveSheet.Paste
    End If
End If
Next cell
End Sub

最新更新