在Excel中调用Web服务

在Excel 2007中的VBA模块中,是否可以调用Web服务? 如果是这样,任何代码片段? 我将如何添加Web引用?

如果Excel中有单元格引用,如何在Excel中sorting表格?

我在表1的Excel中有一个Excel表中的数据表,其中引用了许多其他表中的各种不同的单元格。 当我尝试sorting或过滤工作表时,引用会在单元格移动时改变。 但是,我不想手动进入每个单元格,并在任何地方插入$符号,因为一些引用是连续的,我可能想要稍后自动填充。 例如,我的一个数据列使用工作表2,B列23:28,工作表2,列C 1:15等等。 使用工作表2的列B的列的部分在sorting之前都在相同的位置,每个其他部分也是如此。 如果我插入$符号,我将不能再插入空行,并使用自动填充新的数据。 总之,我想一个方法来保持我的单元格引用静态,而不使用$符号,但仅用于sorting/过滤的目的。 我目前的解决方法涉及复制表的值,粘贴在一个空的表,然后sorting。 我希望有一个更好的方法来做到这一点。

如何使用VBA将图片插入指定单元格位置的Excel中

我用下面的代码将“.jpg”文件添加到我的Excel工作表中: 'Add picture to excel xlApp.Cells(i, 20).Select xlApp.ActiveSheet.Pictures.Insert(picPath).Select 'Calgulate new picture size With xlApp.Selection.ShapeRange .LockAspectRatio = msoTrue .Width = 75 .Height = 100 End With 'Resize and make printable With xlApp.Selection .Placement = 1 'xlMoveAndSize '.Placement = 2 'xlMove '.Placement = 3 'xlFreeFloating .PrintObject = True End With 我不知道我在做什么错,但它没有插入到正确的单元格,所以我应该怎么做,把这张图片放入Excel中的指定单元格?

excel vba调用具有variables的子程序

我定义了下面的子例程: Sub EnterCellValueMonthNumber(cells As range, number As Integer) range(cells).Select ActiveCell.FormulaR1C1 = number End Sub 当我像这样调用子程序时: EnterCellValueMonthNumber ("N23:Q23",1) 我收到以下错误信息: Compile error Expected: = 我不知道为什么我得到这个消息。 有谁知道我错过了什么?

通过引用当前工作表的名称来引用另一个工作表中的单元格?

我计划有24张工作簿。 表格名称为:1月,1月,2月,2月等。 基本上这是预算编制,月份名称表具有摘要信息,名称中的“项目”具有更详细的信息。 现在,如果我想让“Jan”电子表格在“Jan item”电子表格中引用单元格J3的单元格,我可以执行以下操作: ='Jan item'!J3 然而,我不希望每个汇总表(1月,2月等)重新input这样的公式,我想有这样的东西: =(reference-to-this-sheet's-name + " item")!J3 这样,我可以复制1月到2月的公式,它会自动查看正确的Xxx item表,而不必显式键入Feb item 。 我问这个的原因是因为,对于每个汇总表,在相应的分项表单中会有几十个这样的对单元格的引用。 我问的是可以做的吗?

声明早期绑定的MSXML对象在VBA中引发错误

我正在尝试导入XML数据到Excel中。所以代码的第一行是 Dim XMLDOC As MSXML2.DOMDocument 这给出了一个错误“用户定义的types没有定义”

使用C#为Excel创build加载项

我想在Excel中使用C#类的方法。 有人可以指导我怎么做吗? C#组件将是excel插件。 如何创build这个插件的设置,以便我只需要给用户安装插件在客户端的机器设置。 用户不需要执行任何其他步骤,如注册C#DLL。

删除vba中的写入语句的双引号

这段代码会将日志文件写入LogFilePath,并如下生成输出。 StarRange和EndRange是一个variables,其值将从其他函数中填充。 "Start postion",A1 "End position",B100 —Code—————– Sub WriteLogFile() Dim FilePath As String LogFilePath = WriteTextBox.Text LogFilePath = LogFilePath & ".log" Open LogFilePath For Output As #2 Write #2, "Start postion"; StarRange Write #2, "End position"; EndRange Close #2 MsgBox FinalFileName End Sub 我的问题是如何从输出中删除双引号,并产生如下输出。 谢谢 Start position = A1 End position = B100

导出HTML表格到Excel – 不在Office 2010中打开

我正在使用下面的JavaScript代码生成一个即时转换,将HTML表格转换为电子表格的Excel。 excel文件在Office 2010中不打开,显示为空白。 Openoffice将打开相同的电子表格。 可能是什么问题? 这是有关encoding function ExcelReport() { var tab_text = '<html xmlns:x="urn:schemas-microsoft-com:office:excel">'; tab_text = tab_text + '<head><xml><x:ExcelWorkbook><x:ExcelWorksheets><x:ExcelWorksheet>'; tab_text = tab_text + '<x:Name>Test Sheet</x:Name>'; tab_text = tab_text + '<x:WorksheetOptions><x:Panes></x:Panes></x:WorksheetOptions></x:ExcelWorksheet>'; tab_text = tab_text + '</x:ExcelWorksheets></x:ExcelWorkbook></xml></head><body>'; tab_text = tab_text + "<table>"; var headingTable = $('#h_tbl').clone(); tab_text = tab_text + headingTable.html(); tab_text = tab_text + '</table>'; $('.c_tbl').each(function( […]

从Outlook下载附件并在Excel中打开

我试图下载并使用Excel中的VBA在Outlook电子邮件中打开Excel电子表格附件。 我怎么能够: 从我的Outlook收件箱中的第一封电子邮件(最新电子邮件) 下载唯一的附件 将附件保存在具有指定path的文件中(例如:“C:…”) 使用: 当前date + 以前的文件名重命名附件名称 将电子邮件保存到不同的文件夹,path如“C:…” 在Outlook中将电子邮件标记为“已读” 在Excel中打开 Excel的附件 我也希望能够将以下内容保存为分配给各个variables的单个string: 发件人电子邮件地址 接收date 发送date 学科 电子邮件的消息 虽然这可能会更好地问一个单独的问题/自己看看。 我目前所做的代码来自其他在线论坛,可能不是很有帮助。 不过,这里有一些我一直在努力的东西: Sub SaveAttachments() Dim olFolder As Outlook.MAPIFolder Dim att As Outlook.Attachment Dim strFilePath As String Dim fsSaveFolder As String fsSaveFolder = "C:\test\" strFilePath = "C:\temp\" Set olFolder = Application.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox) For Each msg In olFolder.Items […]