Tag: 大数据

在Excel中用图像名称replace图像

我有一个电子表格与其中一列的图像。 当我点击图片时,我可以看到左上angular的图片名称。 我希望它的名字出现在列中,而不是图片。 我不能手动这样做,因为有超过10000行。 有没有办法在列中获取图像名称?

在Excel VBA的原始表中的每行之间添加10行

我有一个数据表,我想在原始表的每一行之间插入正好20行。 我已经尝试运行嵌套的for循环来添加每个循环的每一行,并跳到我的表上下一个“原始”行上添加另外20行以下。 但是,这是永久的,因为我的电子表格中有超过2000行。 有没有其他方法可以做到这一点? 任何VBA代码,我可以用这个?

如何使用Excel高效地查询大数据?

多年来,我用Excel来处理数据,并以一种整洁的forms呈现结果。 然而,最近,我开始了一个新的工作,并发现了一些梭子鱼大小的电子表格,其中有多个工作表,许多查询,查找,等等。这个工作簿的复杂性和速度是可怕的,让我做噩梦! 经过几个小时寻找互联网,希望find办法让我的Excel工作更有效率,我决定在这里发布。 我的问题:是否有任何方法将Excel与某些脚本技术相结合,以使我的工作更简单? 例如,我发现PowerShell可以和Excel以及查询数据库交互。 有没有可能利用Excel的应用程序将被限制在较小的数据操作和显示结果在一个不错的表格。 即使所有的数据操作都是在Excel之外完成的,而且只有这些值被粘贴到特定的Excel单元格中,这样才能消除vlookup,所以我会很高兴。

Excel VBA删除行,如果在其他工作表的列中找不到单元格值

我是VBA新手,在这里处理一个庞大的数据集。 我试图摆脱不符合一个标准的观察。 我需要通过Sheet1中的Column1的每个单元格(大约200,000行),并检查单元格值是否在Sheet2的Column1中列出的可接受值之间(这里有3000多行)。 如果它继续向前移动,如果不是,则需要删除Sheet1中单元格的整行。 下面的代码似乎不能正常工作,例如它不会一次删除所有行,但必须运行多次,并且需要很长时间。 我不确定Find方法是否也做了正确的工作。 任何帮助将不胜感激! (Sheet1的Column1中的多个单元格具有相同的值,并且它们按照值sorting,是否也可以通过一次性删除所有这些单元来加速整个过程?) Sub DeleteRows 'Deletes rows where one cell does not meet criteria Dim ws1 As Worksheet: Set ws1 = ActiveWorkbook.Sheets("Sheet1") Dim ws2 As Worksheet: Set ws2 = ActiveWorkbook.Sheets("Sheet2") Dim criteria As String Dim found As Range Dim i As Long Application.ScreenUpdating = False For i = 2 To […]

如何优化具有非常大的数据的COUNTIFS

我想创build一个如下图所示的报告。 我的数据有大约500,000个单元格(它将继续增长) 现在,我使用excel中的countifs函数,但计算需要很长时间。 (不能closures自动计算) 主要价值是收集date和date的范围约3年,所以我必须把很多公式,以涵盖所有范围的价值。 结果 下面的图片是最重要的一个不能改变的数据源。 ,而底部是我自己创造的(可以改变)。 我使用weeknum将date更改为星期数。 数据 有没有更好的公式或任何方式来使这个文件更快? 欢迎各种build议! 我正在考虑使用数据透视表,但是我不知道如何从这种数据源创build数据透视表。 PS。 VBA是最后的select。 你可以在这里下载示例文件: https : //www.mediafire.com/?t21s8ngn9mlme2d

在2010年的32367行中,macros不起作用

我有90,000多行数据进行整合。 我的代码工作正常,高达25K行左右。 但是,当有更多的数据,它停在32267线,并说对象错误。 我在同一个模型上提到了几个Stackoverflow评论。 但他们的答案并没有帮助我的关注。 我的代码 Sub macro_consolidator() Dim spendSheet As Worksheet Dim outputSheet As Worksheet Dim i As Long Dim spendLastRow As Long Dim outputLastRow As Long Dim spendID As String Dim outputIDRow As Variant Dim ctSheet As Worksheet Dim sh As Worksheet, flg As Boolean Application.ScreenUpdating = False Set spendSheet = ThisWorkbook.Sheets("Sheet1") For […]

在Excel中创build网格最简单的方法是什么?

我有2列。 一个x值在x1,x2,x3 … xm y值为y1,y2,y4 … yn 两组值都是相等的,并且是根据电子表格由用户填写的方式生成的。 根据情况,m和n可以是几千。 理想情况下,我希望能够绘制散点图上的每个点: (x1,y1)到(xm,y1)和(xm,y1)到(xm,yn)之间。 我意识到这可能不是真正的工作,所以价值的网格也将是好的。 因此,为每个x值创build一条垂直线,为每个y值创build一条水平线。 有没有在Excel中做这个简单的方法?

Excel / VBA中的大型数据集的多条件统计(平均值,标准差,z值)

我正在计算Excel上的大数据集的统计信息,并且由于数据集大小而遇到一些问题。 看来VBA可能是要走的路,因为在数据上复制AVERAGEIF和STDDEV数组函数这个大小造成了很长的计算时间。 欣赏可能在这里使用的解决scheme或代码。 目标: 要计算2个标识符(例如01/01/10的所有高度的平均值)的统计数据(avg,std dev,z-scores) 能够处理大数据集(100k +数据点) 样本数据: Date | User ID | Indicator | Data Point 01/01/10| 1 | Height | 150 01/01/10| 1 | Weight | 123 01/01/10| 2 | Height | 146 01/01/10| 2 | Weight | 123 01/02/10| 1 | Height | 156 01/02/10| 1 | Weight | 160 01/02/10| […]

查找重复消息框VBAmacros

我现在有下面的代码是快速和有效的find列“A”重复。 我正在处理一个40-50,000行的非常大的数据集。 虽然这个代码是好的,但如果没有find重复的代码,它会抛出一个错误代码。 我可以通过删除“On error go to 0”行来绕过这个问题,但是它会复制粘贴整个数据集。 有没有办法修改这个代码来显示一个信息框,如果没有重复被发现? 如果不是一个单独的子将调用这个子如果重复被发现,如果不显示一个消息框? 虽然很多数据集不够高效。 Sub filtersort() Dim wsData As Worksheet, wsOutput As Worksheet Dim Rng As Range Dim LastRow As Long, LastCol As Long, i As Long, j As Long, n As Long Dim arr(), x, dict, arrOut() With Application .Calculation = xlCalculationManual .EnableEvents = False .ScreenUpdating = […]

读取非常大的ex​​cel文件

我正在使用这篇文章来读取一个非常大的Excel文件,使用SAX方法。 https://msdn.microsoft.com/en-us/library/office/gg575571.aspx 由于客户端计算机内存不足,无法将值存储在DataTable或内存中。 尝试阅读并立即将商店价值读取到数据库中: // The SAX approach. static void ReadExcelFileSAX(string fileName) { using (SpreadsheetDocument spreadsheetDocument = SpreadsheetDocument.Open(fileName, false)) { WorkbookPart workbookPart = spreadsheetDocument.WorkbookPart; WorksheetPart worksheetPart = workbookPart.WorksheetParts.First(); OpenXmlReader reader = OpenXmlReader.Create(worksheetPart); string text; while (reader.Read()) { if (reader.ElementType == typeof(CellValue)) { text = reader.GetText(); Console.Write(text + " "); } } Console.WriteLine(); Console.ReadKey(); } } […]