Tag: 文本

如何将A1 B1导出到其他的下方

我需要帮助将excel文件导出为文本文件。 我的excel文件有2列,A和B.需要导出这个命令如: A1 B1 A2 B2 A3 B3 An Bn

在Excel中粘贴之前修剪文本

我想使用剪贴板类从VB.NET中的TextBox粘贴一个string到Excel工作表: txtBox.SelectAll() Clipboard.SetText(txtBox.SelectedText) Sheet.Range("B5").Select() Sheet.Paste() 但是,我最终在Excel应用程序中获得的string非常庞大,因为它以多个不必要的空格结束,而我用来粘贴它的列看起来非常难看。 有一种方法来修剪或删除使用VB.NET复制的string中的空白/空格? 提前致谢 编辑:现在我有一个新的问题相关。 如果我有一个DataGridView,并遭受同样的问题,我怎么可以修剪在这种情况下的文字? 这是我的代码: dgv1.SelectAll() dgv1.ClipboardCopyMode = DataGridViewClipboardCopyMode.EnableAlwaysIncludeHeaderText Clipboard.SetDataObject(dgv1.GetClipboardContent())

Excel VBAmacros根据date统计特定单词出现的次数(将被转换为星期编号)

所以我有列A(包含单词)和列C(包含date)如下所示。 这些列偶尔会被新的标题分隔,例如“Word”和“Date”以及一个空格。 Word Date BV 12/06/2017 BV 12/06/2017 BV 13/06/2017 BV 13/06/2017 BR 17/07/2017 BR 17/07/2017 BR 24/07/2017 Word Date BT 30/07/2017 BT 30/07/2017 Word Date BY 05/08/2017 首先将按星期数转换为新的D列,如12/06/2017至第24周。 使用类似于: Sub TimeConverter() Dim I as Long, MaxRow as Long MaxRow = Range("A" & Rows.count).End(xlUp).Row For I = 2 to MaxRow Cells(I, "D").Value = DatePart("ww", Cells(I, […]

如何将Excel范围复制到文本(.txt)文件,无格式,以便所有单元格形成一个单一的string,不是单独的项目? C#

我在Excel工作表的B列中find了一系列“Good”单元格,在“D”列中find相应的单元格,并创build这些单元格的范围。 我想将所有这些单元格转换为一个单一的string,并将其粘贴到我的记事本文件,以便每个单元格的string之间没有空格,它们显示在一行上。 现在我的代码读取每个单元格项目作为自己的实体,并打印在不同的行。 我想能够遍历一个单一的string,所以我想他们都形成一个完整的string。 Microsoft.Office.Interop.Excel.Application excelApp = new Microsoft.Office.Interop.Excel.ApplicationClass(); Microsoft.Office.Interop.Excel.Workbook excelWorkbook = excelApp.Workbooks.Open(comboBox2.Text); Excel.Worksheet xlWorkSheet = (Excel.Worksheet)excelWorkbook.Sheets[sheetSpaces]; excelApp.Visible = false; excelApp.ScreenUpdating = false; excelApp.DisplayAlerts = false; Excel.Range last = xlWorkSheet.Cells.SpecialCells(Excel.XlCellType.xlCellTypeLastCell, Type.Missing); int lastUsedRow = last.Row; string lastCell = "B" + lastUsedRow.ToString(); Excel.Range range = xlWorkSheet.get_Range("B1", lastCell); foreach (Excel.Range item in range.Cells) { string text = […]

如何在公式过滤范围input中包含文本和数字

我需要你的帮助,经过多次尝试和search,我还没有达到我的目标。 这是优秀的公式怀疑。 我的A1 Tags包含以下值作为示例: adm as ad b02 b02_e11 b02_e14 b807-10_e3 b807-10_e4 b807_e1 batch bp … and many more entries. 用下面的公式我能够只收集以b开头的匹配值: {=IFERROR(INDEX(Tags!$A$1:$A$999,SMALL(IF(LEFT(Tags!$A$1:$A$999,1)=$A$7,ROW(Tags!$A$1:$A$999)),ROW(1:1)),1),"")} Summary表中的A7包含字符b 。 上述公式的结果返回给我以下序列: b02 b02_e11 b02_e14 b807-10_e3 b807-10_e4 b807_e1 batch bp 但我不想在序列中的值batch或bp或任何其他值以b开头,没有一个数字之后,我只是想像b0 , b1 ,…, b8 。 为了达到我的目标,我尝试了很多解决方法,如在里面添加下面的公式和数组: =COUNT(FIND({0,1,2,3,4,5,6,7,8,9},A1))>0 在我目前的IF声明之间: {=IFERROR(INDEX(Tags!$A$1:$A$999,SMALL(IF(AND(LEFT(Tags!$A$1:$A$999,1)=$A$7,COUNT(FIND({0,1,2,3,4,5,6,7,8,9},B2))>0),ROW(Tags!$A$1:$A$999)),ROW(1:1)),1),"")} * B2是我想要粘贴公式的地方,因为B1包含标题。 上面的公式返回给我很多0。 我希望我可以给你足够的信息,如果我不能更确切地说,我还没有能够在这里粘贴图像,对不起。 谢谢你,罗德里戈

用Excel公式返回文本内的Wingdings字符

我想返回一个string结尾的Wingdings字符,其公式如下所示: 在这里input图像说明 我可以编写哪个公式来返回单元格中常规string结尾处显示的Wingdings字符? (而不是“?”字符):在真实情况下返回实心圆字符,虚假情况下返回空心圆字符,这两个字符在绿色范围内。

从Excel导出到没有换行符的文本文件

我有一个只有1列的常规Excel电子表格。 我想用分隔符将它导出到一个文本文件。 我没有兴趣分离列,因为我只有一个。 我的担心是导出分隔符而不是换行符,以便我的最终结果是这样一个简单的列表“item1”,“item2”,“item3”…等等。 item1,item2和item3在同一列中,在我的Excel文件的不同行中。 是否可以直接从Excel做到这一点? 我只能用换行符得到最后的文件。 谢谢!

如何在Excel中使用Perl和OLE打开制表符分隔的文本文件?

本来我试图用Excel打开一个XML文件。 但是,由于这需要很长时间,我自己将XMLparsing为制表符分隔的文本文件。 我以为我在互联网上find了正确的语法。 我使用我用Excelmacroslogging的值来尝试下面的代码。 我有一个18列制表符分隔的文件。 调用“工作表”方法时,下面代码的最后一行出现错误。 错误消息: 不能调用方法“Worksheets”没有包或对象引用在./PostProcessingDev.pl行70。 use Win32::OLE; use Win32::OLE::Const 'Microsoft Excel'; Win32::OLE->Option(Warn => 3); use strict; my $Excel; my $Sheet; my $Workbook; $Excel = CreateObject OLE "Excel.Application"; $Workbook = $Excel->Workbooks->OpenText({Filename =>"$inSelf->{'TXT'}", Origin => xlMSDOS, StartRow => 1, DataType => xlDelimited, TextQualifier => xlDoubleQuote, ConsecutiveDelimiter => "False", Tab => "True", Semicolon => "False", […]

在Excel文件和文本文件中读取有什么不同吗?

我有一个Exceltypes的文件,我试图读取它,并创build一个对象与每一行,并将其插入到我的数据结构。 我知道如何用普通的文本文档来完成这一切。 Excel文件是一样的吗? 在那里,我可以只使用第一个垂直行作为第一个variables,第二个作为第二个,就像我在阅读文本文档时一样? 这看起来似乎比它值得更多的麻烦。 有没有办法把excel转换成word,而不需要复制和粘贴? 当我尝试复制和粘贴文件是相当大,冻结单词。

Exceldate时间单元格转换为数字,不能停止它

我有两个工作表,第一个从第二个工作表中调用一个值,在我有第一个工作表 =IFERROR(VLOOKUP(B2,'sheet'!B5:'sheet'!I2500,8,FALSE),"") 这适用于所有全文字段 但是当我有一个date时间04/26/2013 11:27:00 它将其转换为41390.47708 如果我手动编辑单元格,并把撇号它是好的,但如果我尝试使用macros或另一列添加撇号它将其更改为一个数字,然后添加撇号。 有没有办法让公式把单元格当成文本