Tag: 剪贴板

VBA复制和粘贴方法不起作用

我正在试图写一个简单的复制和粘贴macros,它的工作,直到最后一行。 当它碰到最后一行时,它说粘贴function将不起作用。 我真的很困惑,为什么发生这种情况,任何帮助将不胜感激。 Sheet2.Columns("A:B").Insert Shift:=xlToRight Sheet2.Columns("F:G").Cut Sheet2.Activate Columns("A:B").Select ActiveSheet.Paste Sheets("SourceData").Columns("A:B").Insert Shift:=xlToRight Sheets("SourceData").Activate Columns("A:B").Select ActiveSheet.Paste <-LINE THAT THROWS ERROR 我的错误消息是Paste Method of Worksheet Class failed

在VBA中parsing选项卡分隔值

我正在尝试从Excel中复制剪贴板数据(即制表符分隔的文本),并将其parsing为词典的集合。 这个想法是,每一行将由一个字典表示,从头到单元格值映射。 复制数据中的第一行将包含标题。 从剪贴板中获取文本非常简单: Dim dataObj As DataObject Dim clipString As String Set dataObj = New DataObject dataObj.GetFromClipboard clipString = dataObj.GetText 然后我把input分成几行: Dim strRows As Variant strRows = Split(clipString, vbNewLine) 接下来我尝试提取标题: Dim headers As New Collection Dim strCols As Variant strCols = Split(strRows(0), vbTab) For col = LBound(strCols) To UBound(strCols) – 1 headers.Add strCols(col) Next […]

将excel数字复制到剪贴板时的十进制精度

我在windows 7 x64下编写了一个MatLab程序,该程序使用剪贴板,从Microsoft Excel中复制混合数据,然后直接将它导入到MatLab中。 当我在MatLab中使用str = clipboard('paste')时,从excel复制的所有文本数据都很好,但数字数据复制时会丢失一些小数位。 例如,如果单元格A1包含数字2113.12389881239,但由于单元格格式仅显示值2113.123899,则将2113.123899从excel复制到MatLab,而不是实际单元格值21​​13.12389881239。 我想知道如何复制存储在Excel中的确切单元格值而不是显示的值。 提前致谢。

C#将剪贴板内容粘贴到Excel工作表中

正如标题所说,我尝试将我的剪贴板中的内容粘贴到Excel中。 我有以下代码: Clipboard.SetText(html); sheet.Range("A1").Value = Clipboard.GetText(); 其实,可变的HTML包含一个HTML代码文件,当我这样做时,我实际上只粘贴的HTML内容到范围,但是,如果我打开Excel,手工做,select性粘贴…我可以粘贴HTML代码,但它将代码转换为真正的表格而不是HTML代码,这是我想要的真实结果,而无需手动完成。 Excel.Range.Copy()粘贴Clipboard.GetText() 另一种方法是: foreach (Excel.Worksheet sheet in workbook.Sheets) { foreach (Excel.Shape shape in sheet.Shapes) { Clipboard.SetText(html); //doesn't work: sheet.Range("A1").Value = sheet.PasteSpecial(Clipboard.GetText()); sheet.PasteSpecial(Clipboard.GetText()); //throws error } } 但是这种方式也行不通。 我可以用html – >图像来粘贴图像,但真正的值应该是可访问的,而不是图片。 希望有人能澄清如何解决它。 谢谢。

从Excel复制后剪贴板中奇怪的内容

我试图让我的应用程序中的剪贴板的内容,以确保excel兼容性,使用: Clipboard clipboard = new Clipboard(Display.getDefault()); String contents = (String) clipboard.getContents(TextTransfer.getInstance()); 问题是,如果我有一列[1,2,3],select单元格[1]和[3],那么在剪贴板内容中find 1 \ r \ N 2 \ r \ N3 \ r \ n 而不仅仅是1和3.换句话说,剪贴板似乎不处理脱节的单元格。 有人知道发生了什么吗?

Excel复制到剪贴板截断数据

我已经构build了一个Web应用程序,它具有用于填充表格的粘贴button。 数据最初是从Excel电子表格复制并粘贴到我的表单上。 问题是我只看到显示的数据,而不是底层的值。 例如,如果单元格的值是12.223,单元格的格式只显示12.2,则12.2会进入剪贴板。 我在这里错过了一个诡计吗? 有谁知道如何从剪贴板中提取完整的数据? 编辑:看来,Excel使剪贴板上有25种不同的格式,包括“XML Spreadsheet”,它看起来像包含我需要的实际信息。 但是,似乎只有Text版本在浏览器中可用。 是否有一个ActiveX控件或类似的东西,我可以用来抓住这些数据?

当我closures工作簿时,如何禁用excel vba中的剪贴板提示?

所以我正在使用多个工作簿,从Sheet1中将所有数据复制到主工作簿的相应工作表中。 我这样做后,我有多个工作簿编码closures。 然而,一个令人讨厌的提示,询问我是否想将复制的数据保存在剪贴板上,并且要么popup或者popup时,我要“自动”select“否”。 我知道有一个类似的问题已经被问到,但它没有为我工作,我想这是因为我有一个矩形区域的数据,而不是一个列? 我真的是新的vba,但我试图在Excel VBA工作簿closures禁用剪贴板提示中的代码搞乱,但我没有运气。 这是我的原始代码: Sub CFM56copydata() Dim wbk As Workbook 'The workbook is opened using the text from a textbox in a userform ie: strFirstFile = Userform1.dog.Text Set wbk = Workbooks.Open(strFirstFile) With wbk.Sheets("Sheet1") Range("A1").Select Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection.End(xlToRight)).Select Selection.Copy End With Set wbk2 = ThisWorkbook wbk2.Sheets("dog").Range("A1").Insert wbk.Close End Sub 这里是我试图调整它,所以我避免使用剪辑。 (没有工作,在第12行给我一个debugging错误) Sub […]

C#添加excel文本格式的数据到剪贴板

在C#中我需要将数据网格行复制到Excel。 由于一行中的某些值是双精度值,所以“ -Infinity ”值是可能的。 我试图复制行作为DataFormats.UnicodeText或DataFormats.Text但这给了我的输出“ #NAME? ”,我应该看到“ -Infinity ”(因为Excel自动插入“ = ”之前减号“ -Infinity “由于标准单元格式)。 在粘贴之前将单元格格式化为“ Text ”时,excel不会在“ -Infinity ”之前自动插入“ = ”。 顺便说一下,我不需要用excel中的double值进行任何计算,所以文本格式对我来说可以。 所以我的问题是如何将数据复制到剪贴板并将其粘贴到Excel中,同时将单元格格式设置为“文本”。

如何将RTF文本复制到剪贴板以便在Excel中使用

是否有可能复制一个rtfstring到Excel的剪贴板。 格式化应尽可能保留(例如文本颜色)。 以下.Net代码用于填充剪贴板 var dataObject = new DataObject(); dataObject.SetData(DataFormats.Rtf, rtf); Clipboard.SetDataObject(data_object); Excel拒绝rtf剪贴板内容 MS Word接受rtf内容。 当我粘贴到MSWord并从MSWord复制到Excel它的作品。 将rtf转换为excel接受的格式的最佳方法是什么? 备注:正如@KreepN所build议的,可以使用System.Windows.Documents.TextRange将RTF转换为HTML,反之亦然。 HTML被Excel识别。

访问剪贴板的第N个项目

有没有办法从剪贴板中检索几个项目? 我正在使用这样的东西: Dim clipboard As MSForms.DataObject Dim str1 As String Dim str2 As String Set clipboard = New MSForms.DataObject clipboard.GetFromClipboard str1 = clipboard.GetText(1) str2 = clipboard.GetText(2) 但是,我得到一个错误,我给第二个variables分配一个值说: Run-time error '-2147221404 (800040064)': DataObject:GetText Invalid FORMATETC Structure 帮助非常感谢!