1. IT宝库
  2. 编程技术问答
  3. excel-2013
以下是关于 excel-2013 的编程技术问答
数据表的数据列ColumnName没有显示出来
我是VSTO的新手，并且正在遇到一个我似乎无法弄清楚的问题.我正在尝试在Excel 2013中显示一个简单的表，除了列显示名称为" Column1，Column2，Column3". 这是我的代码: var worksheet = Globals.Sheet1; worksheet.Cells.Clear(); var table = new DataTable("Users"); // Set Columns var columns = new List { new DataColumn("Staged") { ColumnName = "Staged", Caption = "Staged"}, new DataColumn("FirstName") { ColumnName = "First Name"
2 2023-11-25
编程技术问答社区
如何在VSTO C# Excel 2013插件中把Publisher从无更新为XYZ？
我使用vs2012 VSTO创建了一个Excel 2013加载项项目. 我已经将发布者名称设置为xxxxxxx-xxxxxx-xxxx inc..我还添加了我公司的数字签名，其中具有相同发行器名称的数字签名到xxxxxxxx-xxxxxxxxxx inc. 在安装时，我总是会得到发布者名称xxxxxxx-xxxxxx-xxxx inc..但是在安装后，如果我是Open Excel的选项 所以，请指导我如何更新/添加发布者名称.我还更新了发布选项，但在Excels选项中没有得到. 解决方案 我相信VSTO addins是不可能的.请参阅: Saurabh 2014年1月15日上午11:36 不幸的是，仍然不支持在VSTO解决方案的"加载项"对话框中显示发布者名称.发布者名称仅显示com add-ins. 极不可能改变.由于VSTO具有自己的安全/签名，这与传统的COM Addins不同，因此com Addins对话框中的发布者名称没有填充.当您安装加
0 2023-11-25
编程技术问答社区
Excel自定义任务窗格不显示
我正在在Excel VSTO加载项中显示自定义任务窗格，我正在构建并显示出来: : var ctrl = new CellTaskPane(); var pane = CustomTaskPanes.Add(ctrl, "Custom Sheet"); pane.DockPosition = Office.MsoCTPDockPosition.msoCTPDockPositionRight; pane.DockPositionRestrict = Office.MsoCTPDockPositionRestrict.msoCTPDockPositionRestrictNoChange; pane.Visible = true; 这是在ThisAddin.cs文件中完成的，在我的计算会话下以及通过Click-once安装程序安装的加载项下，它在我的计算机上正常工作. 但是，在同事的计算机上安装加载项很麻烦. 加载项正在运行，上下文菜单/功能区正常工作，但是窗格只是拒绝
4 2023-11-25
编程技术问答社区
Excel中的CustomTaskPane不会出现在新工作簿中
我已经在Excel 2013中添加了一个CustomTaskPane，该公司可以快速搜索照片.如果用户仅打开/创建一个工作簿，它可以很好地工作.问题是，如果他们打开另一个工作簿或创建一个新工作簿，那么任务窗格就不会出现在出现的新窗口中.它只是放在原始窗口中.我知道这种行为是由于我只是在打开Excel时才初始化小组的事实引起的.我在ActiveWindow事件中添加了一个事件处理程序，以便在开设另一个工作簿时初始化一个新面板. 问题是我无法弄清楚如何判断窗口中是否已经存在fastertaskpane.如果是这样，它简单地创建了另一个CustomTaskPane，因此现在该窗口中有两个.我编写了以下代码来处理原始代码并创建一个新代码，但是它引入了一些滞后(1-5秒)，这些滞后会使用户每次更改工作簿窗口时都疯狂.是否有一种方法可以查看窗口中是否已经存在常规范围，以避免处置和重新创建新的窗口以避免堆叠重复的任务窗格? Microsoft.Office.Tools.CustomTask
4 2023-11-25
编程技术问答社区
从符合查找条件的行中查找每列的第一个非空白单元格，以合并重复的匹配。
我有一个电子表格，该电子表格是来自多个来源的联合联系人列表，具有不同程度的完整性.一些联系人多次提供了他们的信息，但每次都会使不同的字段空白.我希望通过组合行填充空白值，至少要删除一些重复项. 这是我的数据的简化示例 id email phone company job title 01 johnsmith@example.com 5550123 acme inc 01 johnsmith@example.com acme inc CEO 02 janedoe@gmail.com XYZ Co 02 5555555 03 frank@school.edu 03 frank@school.edu school 03 frank
0 2023-11-25
编程技术问答社区
在Excel VBA中使用索引和匹配的VLookup函数
我有一个经常使用VLookup的Excel公式.它具有嵌入式Index/Match，在" M"列中给出了最后一个数字值. 工作表公式是: =VLOOKUP(INDEX($M$10:$M75,MATCH(9.99999999999999E+307,$M$10:$M75)),Data,4) cell $M75是该公式所在的行的单元格.列中有数字，非数字和空白单元格，但我想要的ID始终是数字. 所以我试图编写一个自定义功能，让我简单地写=current() 这是我拥有的: Function Current() Dim LookupRange As Variant Dim indexVar As Variant LookupRange = Range("$M$1:M" & ActiveCell.Row) indexVar = Application.Index(Range(LookupRange), Application.Match(9.99999
0 2023-11-25
编程技术问答社区
C#-Excel-如何在自动过滤后删除可见行？
我正在使用一个小命令行工具来从Excel表中提取一些数据. 我想删除应用自动滤波器后可见的所有行. 不幸的是，我只是不知道如何继续. 搜索后，我找不到工作答案. 这是我到目前为止的: oXL = new Excel.Application(); oXL.Visible = false; oWB = oXL.Workbooks.Open(source); oXS = (Excel.Worksheet)oWB.Sheets[1]; Excel.Range filter = oXS.UsedRange; filter.AutoFilter(8, "text to filter"); 如何删除过滤后显示的所有行? 谢谢. Crowland 解决方案 Excel.Range filter = XlSheet_1.UsedRange; filter.A
0 2023-11-24
编程技术问答社区
搜索列中的连续值并将三个不同的值返回给其他单元格
我有一系列列.一个包含一个数据点的时间戳，下一个是数据点，以下是该数据点从十进制到二进制的转换，其余的列是二进制字符串分为每个位.每一列都有一个标题:"无引擎速度"，"发动机重量"，依此类推. 这是我想做的，但没有VBA/Excel的技能.我正在尝试获取所有这些信息，并将其放入对读者更友好的东西中. 所以，例如: 会给我这个: 描述来自列标题，时间范围启动/结束将来自第一列.错误代码我会根据描述列的内容使用Excel IF函数或某种vl​​ookup函数.我需要的是VBA代码或一组Excel功能，它将根据这些位列的内容为我填充这些描述和时间戳列. 我如何设想它的工作方式如下:搜索每个位列，如果找到一个1，并且在其下方的四个单元格中也是第一个1和Final 1的日期邮票，则是1S.在我创建的更可读的报告中开始/结束时间.除此之外，将列标题复制到描述字段. 我只想连续五个或更多1次获得时间戳记的原因是，我想在状态被认为是"事件"之前通过一些时间通过.我想遇到的第二个条
0 2023-11-17
编程技术问答社区
添加数字直到达到数值
我想在一个单元格中具有一个阈值(A1)，并将其作为添加单元格的参考. 假设我有 a1- 10 A2-4 A3-2 A4-3 A5-4 A6-6 我想基于A1(阈值)添加单元格. 由于A1为10，应添加来自A6:A5的细胞 - 结果:10 如果A1为6，则应返回单元格 - 结果:6 如果A1为16，则应添加来自A6的单元格 - 结果:19 没有VBA，这是否可以?我可以与总和吗? 解决方案 我添加了一些进度SUM使用ROW和OFFSET的操作.请注意，我已修改并添加到您的示例数据中以获得更彻底的结果. c2中的SUM公式为=SUM(OFFSET($A$2,0,0,MAX(INDEX((SUBTOTAL(9,OFFSET($A$2, 0,0,ROW(1:99),1))
0 2023-11-17
编程技术问答社区
使用Excel-VBA在多行中分割单元格值，并在下一列中串联这些值，且格式不变的更好方法
这是我的Excel表的视图: 文档概述: 它的多个列可能会根据需求而有所不同.文件ID和文档版本始终在每个表中可用，但是列的名称(ex; doc ID或ID/id/doc版本或DOC#)和列( ex;列G&H/列J&K)可能会有所不同. 在这种情况下，文档ID-列C和文档版本-D列D可能包含每个单元格中的多个值. 文档ID始终具有9位数字(如果ID没有足够的数字，则填充了尾随的零).前任; 000 987094，123456100，234567899， 0 23456789等. 文档版本的固定格式始终为" 0.0"或" 00.0"，ex; 1.0、23.0、2.1等 到目前为止我所做的事情的描述: i使用vba宏将包含多个值(ID和相关版本，在上传图像中突出显示)的单元格分为它们下方的行.之后，我通过手动插入新的列，然后使用另一个宏来连接将拆分值串联到下一列中. 这是我运行宏之后的输出: 宏: Sub SplitCellValue
0 2023-11-17
编程技术问答社区
如何在另一列中重复每一行的所有列值
我有一个具有两个列的表: Height Width 400 200 500 300 600 400 700 800 ... 并需要在其旁边创建第二个表，以重复宽度列中每个值的整个列高，同时复制，以基本上获取所有可能的组合: Height Width 400 200 500 200 600 200 700 200 800 200 400 300 500 300 600 300 700 300 800 300 解决方案 我想到的最简单的方法是运行嵌套循环.您可能需要根据表的结构来修改以下代码，但这应该使您前进. Sub loops() Dim n_height, n_width, c As Integer With ThisWorkbook.Sheets("Sheet1") n_height = .Cells(Rows.Count, 1).End(xlUp).Row 'Assumi
4 2023-11-17
编程技术问答社区
循环浏览excel工作簿中的特定工作表并将数据复制到不同的工作表中
我正在尝试从工作簿中的几张特定表中复制信息，而无需将信息从无关的床单复制到一个名为Merge的表格.我想从中复制信息的床单的名称是:摘要，摘要(1)...摘要(n+1). 此外，我希望在最后一行之后粘贴复制的信息，而不会删除标题线. 我正在使用的代码是来自不同Excel-VBA论坛中各种答案的混音和匹配，因此它不是优雅的，并且可能是由于我对VBA和整体编码的有限理解而引起的很多错误. 这是我当前拥有的代码: Sub Copy_1() Dim SourceRange As Range, DestRange As Range Dim DestSheet As Worksheet, Lr As Long With Application .ScreenUpdating = False .EnableEvents = False .Calculation = xlCalculationManual End With 'Deleting the inf
2 2023-11-17
编程技术问答社区
你能在自动填表功能中使用单元格而不是范围吗？
如果我有这个，例如: Sub ExampleThing() Counter = 13 For i = 1 To Counter Range("A" & i) = Rnd Next Range("B1").Formula = "=(PI()*A1)" Range("B1").Select Selection.AutoFill Destination:=Range("B1:B" & Counter), Type:=xlFillDefault End Sub 如果我不在目标下使用range()，我想使用单元格()?例如，与其在范围函数中具有单元格引用，而是用单元格替换为: : Selection.AutoFill Destination:=Range("Cells(1,2):Cells(Counter,2)"), Type:=xlFillDefault 我一直在玩它，似乎无法使它起作用. 解决方案
0 2023-11-16
编程技术问答社区
建立一个宏程序将网站上的数据下载到Excel中
我想在Excel中使用VBA构建一个宏，以在以下网站上下载历史数据: 我首先像往常一样创建一个命令按钮.然后，我认为这可以使用宏记录器轻松解决.但是，当我选择数据 - >从Web获取外部数据 - 然后在上面的地址中输入，我将无法整体选择该表. 所以，我不确定如何执行此任务，但我觉得某处可能有一些标准代码，我无法找到该任务，以完成任务. 我觉得这项任务对许多人很有用，因为可以在各个地方使用网站下载数据的脚本. 解决方案 使用VBA从网站获取数据有很多方法.您可以使用Internet Explorer对象导航到它，并在那里后解析HTML.您也可以使用MSXML2.XMLHTTP制作HTTP请求.特别是excel有许多可以执行此操作的数据链接选项. 但是，在这里，我将使用UDSA为您提供的工具，并以一行进行操作: Workbooks.Open ("http://quickstats.nass.usda.gov/data/spreadsheet/4C4303
6 2023-11-16
编程技术问答社区
如何使用Excel VBA点击一个href
我是VBA的新手，并且有一个有关如何在Internet Explorer中单击HREF链接的问题.源页面上有多个HREF.我从未遇到过这个，它给了我一个困难！我已经在这个网站上查找了寻找答案，但决定在这里询问. 下面我列出了我所拥有的代码，直到遇到问题的地步以及Internet Explorer上的源代码. 我评论了我尝试的内容并列出了我收到的错误. 代码下面: Sub () Dim i As Long Dim URL As String Dim IE As Object Dim objElement As Object Dim objCollection As Object User = "User" Pwd = "Pwd" Set IE = CreateObject("InternetExplorer.Application") IE.Visible = True URL = "URL.com" IE.Navigate URL Do While
2 2023-11-16
编程技术问答社区
Excel 2013中的分层、非数字数据透视法
我有这样的分层数据 Country Region Category ProgramName USA North SchoolName A USA North SchoolName B USA South SchoolName C Brasil East SchoolName D Brasil East CollegeName E Brasil West CollegeName F 我想将其转向用户可读格式. 我能够构建枢轴表，但是我想将非数字数据用作枢轴. 此答案中的VBA代码似乎很有希望，但它只能旋转单个非等级列.我该如何实现目标? 解决方案 我找不到躺在'网上的代码来完成您想要的事情.通过某些Get&Transformers巫术可能是可能的，但这不是我的专业领域.因为这是一个有趣的问题，因为我可以想到自己的项目的用例，所以这是我的看法.
2 2023-11-16
编程技术问答社区
用VBA分组
我有一个具有标题行的工作表，我想使用VBA对行进行分组.我尝试了这个语法 Sub GroupItTogether() Dim rLastCell As Range Set rLastCell = ActiveSheet.Cells.Find(What:="*", After:=.Cells(1, 1), _ LookIn:=xlFormulas, LookAt:= _ xlPart, SearchOrder:=xlByRows, SearchDirection:=xlPrevious, MatchCase:=False) Range("A2" & rLastCell).Select Selection.Rows.Group ActiveSheet.Outline.ShowLevels RowLevels:=1 End Sub 但是，这将产生一个错误: 无效或不合格的参考 突出显示代码线:After:=.Cells(1, 1
2 2023-11-16
编程技术问答社区
Excel VBA 循环公式改变范围
我已经编写了一个代码来操纵L9 : DC9中的数据，但是现在我需要重复此操作，以L10 : DC10，L11 : DC11等.范围为Li:DCi，并指定(i)为9至30，但我遇到了错误.如何为此功能制作循环? 我当前的Excel版本是2013 解决方案 您要寻找的是这样的语法 Sub LoopRows() Dim i As Integer For i = 9 To 30 ActiveSheet.Range("L" & i & ":DC" & i).Interior.Color = RGB(100, 100, 100) Next i End Sub 此示例仅格式化每行中的单元格的颜色.请注意我如何使用For-loop创建循环范围选择. 其他解决方案 我建议在一个语句中使用Range("L9").Resize(21,50).Interior.Color = ..进行.
4 2023-11-16
编程技术问答社区
取消保存取消激活链接
我将脚本放在一起，从给定路径中提取文件夹和子文件夹的文件列表. 在B列中，为每个文件创建了一个唯一的增量ID.此ID格式为超链接. 当用户单击超链接时，它将打开一个对话框，允许用户选择从服务器保存到本地存储的驱动器的文件. 有了在此帖子中，这是我使用的代码允许用户选择超链接并保存文件. Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink) Dim FSO Dim sFile As String Dim sDFolder As String Dim thiswb As Workbook ', wb As Workbook 'Disable events so the user doesn't see the codes selection Application.EnableEvents = False 'Define workbooks so we
0 2023-11-16
编程技术问答社区
ActiveX按钮重命名
首先，我知道ActiveX控件和2014年12月Excel更新几乎普遍存在的问题.这似乎与常见症状不同，但可能是相关的. 症状: 打开一个包含ActiveX控件的现有Excel表. 单击按钮，什么也不会发生(宏不启动) 调查表明，按钮名称已从" btnmacrolaunch"更改为" commandbutton3" 我在其他用户机器上打开文件，并且该按钮尚未重命名，并且可以正常工作. 环境: 最后一次保存在另一台用户机器而不是我的床单上.当我使用ActiveX保存新的电子表格时，这不会发生. 如果另一个用户打开并执行我创建的表格，然后保存该表，当我再次打开时，该按钮会重命名 自2014年12月中旬以来，这一直是一个问题(大约). - 这就是为什么我认为它与Common ActiveX问题有关. 我的大多数办公室同事(我认为除了我以外的所有人)在12月进行了DEC更新.我们的IT部门无意中关闭了我的更新.我所有的同事还进行了删除"
2 2023-11-16
编程技术问答社区
热门专题
redhat安装 grafana 将工作空间中的变量x,y,z保存为data.m文件 vue在eclipse中注释快捷键 无法打开输入文件“libcrypto.lib” python发get请求 jdk-6u45-linux-x64.bin下载 mac book 安装git centos8 ping 未知的名称或服务 facebook怎么添加应用 transformer.transformXLS单元格样式 dxf导入板框无法更改特性 springMVC中怎么配置过滤器 ubuntu1804安装教程详细 django 城市枚举类型 turtlebot旋转90度指令 dnSpy-x86,如果在即时窗口里面更改变量值 iphone投屏到电脑屏幕且不会被录制 vscode 开启eslint提示 dell poweredge R630服务器 u盘启动 CPUawake好不好