excel-2013相关内容
我有从SQL Server 2008 DB获得的“清单A"和“清单B"(及其对应的卷)列. A有一个近端. 1000行和B(以及C卷)大约为800,因此几乎不可能手动比较它们. 列"Manifesto C"必须具有A> B匹配和配对的结果,并在没有匹配项的地方添加空白单元格,例如 我已经尝试过 此 , 有人可以帮我解决这个问题吗? 提前谢谢! =) 解决方案 如果我正确理解它,那么您已
..
我有一个使用Excel 2013的应用程序.我需要一种禁用所有宏的方法.我无法在打开工作簿时执行此操作,因为我无法访问打开方法,该工作簿由另一个COM应用程序打开,然后传递给我.它需要在打开文档之前发生.我最终想要做的是设置下图中的设置. 解决方案 我发现的最佳解决方案是编辑注册表.向蒂姆·威廉姆斯大喊,向我指出正确的方向 需要编辑的密钥是 HKEY_CURRENT_USER \ S
..
我在Excel中有一个函数可以计算两个字符串之间的Levenshtein距离(将一个字符串转换为另一个字符串所需的插入,删除和/或替换的数量).我将此作为我正在研究的项目的一部分,该项目涉及“模糊字符串匹配". 在下面,您将看到LevenshteinDistance函数和valuePhrase函数的代码.后者的存在是为了在我的电子表格中执行该功能.我是根据我在此线程中阅读的内容得出的.
..
我有一个Excel电子表格来跟踪项目活动. 在A列中,我有一个项目名称,它重复了几次,因为同一个项目有多个活动. 在B列中,我有与该项目相关的活动. 在C列中,我具有每个活动的完成百分比. 我想完成的是:在D列中返回不是100%的项目的 first 活动. 这是我要完成的事情的图片: 我没有运气就尝试过这个公式: =INDEX($B$2:$B$19,MAT
..
我正在尝试使用vba刷新数据透视表. 我有修改底层表查询并刷新查询的代码. 完成此操作后,它将刷新数据透视表,这又将刷新摘要表.由于某些原因,最终的数据透视表未刷新.它会正常刷新. 尝试的方法: 1. Dim PC As PivotCache For Each PC In ThisWorkbook.PivotCaches While DateDiff("s", PC.
..
我想进行自动摘要编号.我们唯一可以做的就是给A(标题)编号,但是字幕应该自动编号.如果标题= 1,副标题1.1,则低于1.1.1,依此类推. 比方说标题是A,B和C都是字幕. 图案应该是这样 1.A 1.1 B 1.2 B 2.A 2.1 B 2.1.1 C 所以我尝试了这个: https://stackoverflow.com/a/32321
..
我正在尝试从单元格中的超链接中检索工作表引用位置 以下内容似乎不起作用,因为test不返回任何内容,即使G8指向工作表: KO 在单元格A19 中 test = Range("G8").Hyperlinks(3).Address 现在,如果我运行以下命令: For Each hl In Sheets("LIST").Hyperlinks MsgBox "Range "
..
是否有一种方法可以通过将鼠标悬停在某个单元格上来激活该单元格上的评论?我有一系列的单元格,当悬停在每个单元格上方时,我想从另一张工作表中提取相应的注释.悬停事件会将评论从另一张工作表中的相应单元格中拉出. 注释具有字符串值.基本上,我在工作表1中有一个单元格区域,假设是A1:A5,当我将它们悬停在工作表2并从工作表2范围B1:B5中拉出时,需要弹出注释.我之所以不手动进行操作,是因为工作表2
..
我有以下VBA代码,该数据表从工作表"Tabled data"中提取一行,复制数据,然后将数据粘贴到工作表"Running list"中的下一个可用行中.但是,原始行具有公式,我需要粘贴值,而不是公式.我已经看到了许多使用Range.PasteSpecial的方法,但是此代码未使用Range,而且我不确定如何将其合并. 注意:我从这里修改了此代码:有关如何添加PasteValues属性而不使
..
(替代标题:适用于Excel的ReadAllLines Analogue ::加载和处理Excel数据的最佳方法是什么?) 我想快速打开一个Excel工作表并执行文本操作.我希望该操作像ReadAllLines( https: //msdn.microsoft.com/zh-CN/library/s2tte0y1(v=vs.110).aspx ),但适用于Excel. 我发现以下问题是
..
如果我输入例如Sqr(a ^ 2 + b ^ 2),则没有错误.但是,当我键入Sqr(a ^ 2 + b^ 2)时,会产生我不理解的编译错误: 在VBA7中,^的功能与表示幂的_^(下划线表示空格)相反? 解决方案 这是64位 ^可能会使编译器在是否使用运算符与操作数值(如LongLong)之间产生混淆. 之所以会出现此问题,是因为在这种情况下,抑扬符(^)是不明确的.对于VB
..
我想知道是否有人可以帮助我. 我想使用您将在解决方案中看到打开的文件类型是Excel,并且确实将其保存为Excel.但是我要打开和保存的文件是.docx和.dat(Dragon软件使用的)文件的混合物. 请问有人可以告诉我,有什么方法可以修改代码,以便它打开并以Excel工作簿以外的文件类型保存文件. 此问题背后的原因,因为我当前正在使用一个脚本,该脚本从给定文件夹在Excel电
..
我已经搜索了excel函数文档和常规的MSDN搜索,但是无法找到一种在没有VBA的情况下返回工作表名称的方法. 是否有一种方法可以在Excel公式中获取工作表名称而无需诉诸VBA? 解决方案 对excel不太好,但是我发现了这些=MID(CELL("filename",A1),FIND("]",CELL("filename",A1))+1,256) 和A1可以是工作表中的任何非
..
好吧,我的问题是我创建了一个VBA Sub,它接收一个excel单元格引用和2个文本值以及一个Variant作为参数. Sub CreateButton(oCell, sLabel, sOnClickMacro, oParameters) 此Sub成功在oCell上创建了一个按钮,但是我必须将参数发送给Macro,什么是实现该目标的最佳方法? 如果已经发现了一些行不通的方法,还有一
..
是否有非VBA方式检查Col B和Col C以查看它们是否包含非Alpha字符?只是要通过非Alpha进行澄清,我的意思是不属于字母的任何内容(不区分大小写). Col B和Col C是名字和姓氏的列表.其中一些名称会因输入错误的数据而在其中包含符号或数字.我正在尝试查找所有需要修复的问题.因此,我需要找到包含 任何 而不是字母的内容. 解决方案 有一个“怪异"但简单而通用的答案.
..
例如,如果我有这个 Sub ExampleThing() Counter = 13 For i = 1 To Counter Range("A" & i) = Rnd Next Range("B1").Formula = "=(PI()*A1)" Range("B1").Select Selection.AutoFill D
..
我在Excel 2010 VBA中制作了一个程序,其中包含诸如čč...... p这样的字母. Msgbox("Čiča gliša")有效. 像Excel 2013一样,它们在单元格和公式中支持这些字母,但在VBA中不支持. VBA用甚至在键盘上都没有的符号代替它们. 执行代码时出现错误. 我相信这与语言设置有关. 解决方案 正如BambiLongGone所说,
..
我在粘贴列时遇到问题 Set SourceWBsht = Thisworkbook.Worksheets("Source") Set DestinationWBsht= Thisworkbook.Worksheets("Destination") SourceWBsht.Range("A1:Z40").EntireColumn.Copy Destination
..
我具有以下功能来检查列L是否包含单词"completed",并且我使用INDIRECT能够使用条件格式为整个行着色: =INDIRECT("l"&ROW())="completed" 此功能有效.但是,我需要扩展它,我也想基于一个额外的单元格使用条件格式,所以我尝试了这个: =AND(INDIRECT("l"&ROW())="completed";INDIRECT("m"&ROW
..
我希望在VBA脚本开始修改内容之前提示用户保存工作簿.当“另存为"对话框出现时,如果用户单击“取消",则会引发一个自定义错误并停止脚本.如果他们单击“保存"并且文件名已经存在,我希望询问他们是否覆盖. 这是我的代码: Function SaveCurrentWorkbook(wkbSource As Workbook, strNewFileName As String) As Vari
..