我收到了以下错误.
Compile error: The code in this project must be updated for use on 64-bit systems.
Run Code Online (Sandbox Code Playgroud)
VBA代码
Option Explicit
Private Declare Function URLDownloadToFile Lib "urlmon" _
Alias "URLDownloadToFileA" (ByVal pCaller As Long, _
ByVal szURL As String, ByVal szFileName As String, _
ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
Dim Ret As Long
'~~> This is where the images will be saved. Change as applicable
Const FolderName As String = "C:\Temp\"
Run Code Online (Sandbox Code Playgroud)
它在Excel 2010中工作正常.
谢谢.
编辑
我得到的错误是Ret …
我试图CSV在Excel 2013中打开一个文件,但没有真正发生.Excel只是在没有任何可见的情况下打开(只是灰色背景,因为您刚刚关闭了工作簿).
CSV文件为2.7GB.我不知道可以有多少行,列是30.
我看到类似的问题,文件相当小,仍然无法打开.目前尚无解决方案......
谢谢 :)
首先,我不认为VLOOKUP对我有用,因为我在每个表中有几十列.
假设我有表1:
Serial# Value1 Value2 Value3 Value4
1 4 34 65 23
2 123 43 54 46
3 87 98 85 34
4 654 8 645 3
表2:
SF
1
3
4
我想根据SF中的序列号过滤表1.
Serial# Value1 Value2 Value3 Value4
1 4 34 65 23
3 87 98 85 34
4 654 8 645 3
使用a VLOOKUP意味着我必须为每个要填充的列编写公式.我想避免这种情况.
谢谢
我有一个包含两列的数据集.一个标签和一个数字.使用sumif和countif,我设法计算组中每个标签的平均值.现在,我试图用标准偏差做同样的事情,但我有一个问题:
=STDEV.P(IF($A$2:$A$625129=F4,$B$2:$B$625129))
这是我使用的公式,其中A列是带有标签的列,B带有数字,F4是标签组之一.结果是0.我为每个标签组做同样的事情,所有标签组都是0.任何想法公式中有什么问题?
编辑:在评论之后,我尝试将公式应用为数组,它几乎起作用.现在,唯一的问题是单元格F4是静态的,而我希望它对于数组公式中的每个单元格都是动态的(F5,F6,F7等).
我不确定这是否是问这个问题的正确地方,但我面临安装 MySQL 无法识别 Office 2013 并安装 MySQL for Excel 的问题。
基本上 MySQL https://dev.mysql.com/downloads/
有一个 excel 插件,允许您自动连接到数据库并进行更改。在 MySQL 安装期间,它会检查要求,其中之一是 Excel 2007 或更高版本。而这个要求对我来说是不符合的。我正在运行 Office 2013 Pro Plus(64 位)并安装 MySQL(64 位)
有人可以帮忙吗?你有其他推荐的应用程序吗?我不想手动导入和导出数据或文件。我需要一个应用程序,可以在单独的工作表中打开所有表,我可以手动更改并自动保存到数据库中。
任何建议表示赞赏。
好吧,我的问题是我创建了一个VBA Sub,它接收一个excel Cell引用和2个文本值以及一个Variant作为参数.
Sub CreateButton(oCell, sLabel, sOnClickMacro, oParameters)
Run Code Online (Sandbox Code Playgroud)
这个Sub成功地在oCell上创建了一个按钮但是我必须向Macro发送一个参数,实现它的最佳方法是什么?
如果已经挖掘了一些不起作用的方法,而另一些方法也很脏,这些都不会让我填饱肚子
在我帮助解决问题的帮助下,我在这里提出了一个更简单的工作解决方案
Sub Button_Click(sText)
MsgBox "Message: " & sText
End Sub
Sub Test_Initiallize()
Dim oCell
Dim oSheet
Dim oShape
Set oCell = Range("A1")
Set oSheet = ThisWorkbook.Sheets(1)
For Each oShape In oSheet.Shapes
oShape.Delete
Next
Set oShape = oSheet.Shapes.AddShape(msoShapeRectangle, oCell.Left, oCell.Top, oCell.Width, oCell.Height)
oShape.TextFrame.Characters.Text = "Click Me"
oShape.OnAction = "'Button_Click ""Hello World""'"
End Sub
Run Code Online (Sandbox Code Playgroud) 快速概述我有一个Excel AddIn目标Excel 2013.AddIn有一个自定义RibbonUI,其中包含几个包含工作簿特定值的只读EditBox.使用MDI接口,Excel 2007和2010中的相同AddIn工作正常,但使用2013及其SDI接口.
使用简单的VSTO AddIn,我添加了一个带有EditBox的简单RibbonUI.出于测试目的,我只是想让EditBox反映它出现的窗口的Workbook.Fullname.就像我能够找到的那样,RibbonUI是一个单例,并且没有明显的方法来控制每个工作簿/窗口上的任何编辑控件的值.如果我打开2个Excel工作簿并来回切换(更新Excel.Application的ActiveWorkbookChanged属性上的值),则两个工作簿始终反映最新值.更糟糕的是,只有一个事件会触发,但两个窗口都会更新.
问题的关键在于我无法找到一种方法来控制每个窗口/工作簿中编辑控件的值.我在Excel 2013中找到了单文档界面的编程,除了它没有提到,或提供有关如何执行它的任何参考,只需要你.
我稍后会尝试使用一些示例进行更新,但我想知道是否有人在Excel 2013下使用SDI解决了这个问题?很明显,2013年内置的Ribbon控件可以执行此操作(例如,字体设置),但是文档在如何从用户AddIn完成类似操作方面似乎非常稀疏.
我一直在网上和Excel帮助中搜索,但无法找到这是否可行.
给定一个数字,值和搜索项列表,我需要找到值大于或等于搜索项的值.看例子:

Excel返回红色但它应返回橙色,因为15大于10.
其他所需的结果示例如下:
我意识到如果我按降序对列表进行排序并-1用于MATCH [match_type]参数,那么它的工作正常,但是,列表超过1,000行,并且更容易按升序读取.
我有很多产品待办事项要加载到 TFS 中。我们已经在 Excel 电子表格中定义了其中的大部分内容,因此我认为此处所述的从 Excel 批量导入到 TFS将是最好的方法。
如果我只是想要一个平面列表,我会很好。Excel 2013 与那篇文章中的屏幕截图略有不同,但工作原理几乎相同。我转到 TEAM 菜单选项并选择一个新列表,然后根据我选择的查询构建列表。我的屏幕上显示了我现有的工作项,如下所示:

根据我上面链接的文章,如果我想能够添加子任务,我需要将平面列表转换为树列表。我应该“通过添加树级别”来做到这一点。然而,这里有一个问题:

我试过单击各种单元格,以防需要选择某些内容来“启用”此选项,但是我的盲目单击没有成功。我只是不擅长遵循说明,还是 Excel 2013 有一些我需要解决的怪癖?
我需要做什么来启用它以便我可以批量导入子任务?
我正在 Excel 中寻找一种简单的方法来计算不同值的单位。我有几个值的列表KB,MB和GB我想在一个计算的输出GB。
这是列表的一部分:
66.0 MB
570 KB
1.10 GB
2.21 KB
Run Code Online (Sandbox Code Playgroud)
输出: ???GB。
所有值都在同一行 (C) 中,值后面有 B/KB/MB/GB。