Tag: 图像

获取图片作为http GET响应并插入电子表格而不保存图片

我使用以下代码从bing地图网站获取图片并将其插入电子表格: Public Sub Test() Dim FileNum As Long Dim myURL As String Dim FileData() As Byte Dim winHttpReq As Object Set winHttpReq = CreateObject("WinHttp.WinHttpRequest.5.1") myURL = "…" winHttpReq.Open "GET", myURL, False winHttpReq.Send FileData = winHttpReq.ResponseBody FileNum = FreeFile Open "C:\Downloads\map.JPG" For Binary Access Write As #FileNum Put #FileNum, 1, FileData Close #FileNum InsertPic End Sub […]

导出图片Excel VBA

尝试从工作簿中select和导出所有图片时遇到问题。 我只想要照片。 我需要在工作簿的同一个文件夹中select并保存所有的“照片1”,“照片2”,“照片3”等等。 我已经试过这个代码: Sub ExportPictures() Dim n As Long, shCount As Long shCount = ActiveSheet.Shapes.Count If Not shCount > 1 Then Exit Sub For n = 1 To shCount – 1 With ActiveSheet.Shapes(n) If InStr(.Name, "Picture") > 0 Then Call ActiveSheet.Shapes(n).CopyPicture(xlScreen, xlPicture) Call SavePicture(ActiveSheet.Shapes(n), "C:\Users\DYNASTEST-01\Desktop\TEST.jpg") End If End With Next End Sub

从Excel文档中提取图像

我正在做一个.xls Excel文档的数据映射,我正在尝试编写一个快速的脚本来将图像拖出excel文档。 以编程方式执行此操作最快,最简单的方法是什么? 我正在运行Ubuntu 10.10,如果可能的话,我宁愿用户python。

删除行时如何自动删除图片?

我想请求帮助。 我手上有很多excel表单,每行都有一张图片。 当我复制和粘贴行时,图片也被复制到粘贴的行中。 但是,当我想要删除行时,图片不会被删除。 相反,它隐藏在下一行图片的后面。 此外,当我sorting/过滤列表,图片似乎并没有遵循。 图片保持在相同的位置,但所有其他值都被sorting/过滤。 我的工作是删除和随机化一些条目,所以你可以想象我的苦恼与所有顽固的图片,只是拒绝属于自己的行。 目前,我可以筛选,突出显示要删除的单元格,不过滤(使图片与行匹配),删除图片,然后手动删除行。 至于随机化,我坚持使用Excel中的“RAND()”函数需要sorting行,这将弄乱图片。 如果有人能提供解决这个问题的办法,我将不胜感激。 这个论坛主题http://www.ozgrid.com/forum/showthread.php?t=85597也描述了我所经历的。 但是,当我尝试VBA代码,它说“运行时错误13”,我不知道这是什么意思。 尝试这个代码是我第一次尝试使用VBAs和macros,但我非常有信心,我遵循指示如何正确地添加和运行它们。 它For Each sh In Shapes被debugging。 一些更多的细节:我的图片属性设置为“移动和单元格的大小”。 每行只有一张图片,不包括标题。 如果你们要求我发送excel文件,我不能这样做,因为它包含私人信息。 但是,我可以更改数据。 希望能工作!

使用ColdFusion 8将图像添加到Excel文档中的行

使用Coldfusion 8,任何人都可以将图像embedded到Excel电子表格(xlsx)中,或通过img src链接它们? 一些背景信息:cf服务器将获取产品行的Excel文档。 基于产品ID和风格等,我可以find或创build一个图像,作为第一列添加到现有的Excel文档。 我知道coldfusion 9有一个名为SpreadsheetAddImage的函数,不幸的是我在cf 8上没有机会升级。

LoadImage PNG在excel vba中形成image1.picture控件,黑色背景

我有加载PNG图像到图片控制的代码 Option Explicit Option Private Module Private Type GUID Data1 As Long Data2 As Integer Data3 As Integer Data4(0 To 7) As Byte End Type Private Type PICTDESC Size As Long Type As Long hPic As Long hPal As Long End Type Private Type GdiplusStartupInput GdiplusVersion As Long DebugEventCallback As Long SuppressBackgroundThread As Long SuppressExternalCodecs […]

VBA只能在debugging模式下运行

我想要做的是从一张纸上复制一堆作为图片的单元格,并将其粘贴到另一张纸张的图表对象中。 下面是使用的代码,它在debugging模式下运行良好,但是当我正常运行它时,我没有看到图表被粘贴到图表中。 Sub copy_paste_KDT() ' ' copy_paste_KDT Macro ' ' Worksheets("KDT").Range("J12:AB37").CopyPicture Appearance:=xlScreen, Format:=xlPicture Dim wb_path As String wb_path = Application.ThisWorkbook.Path 'Dim objCht As ChartObject 'Set objCht = ActiveSheet.ChartObjects("KDT Rectangle") 'If Not objCht Is Nothing Then If ActiveSheet.ChartObjects.Count > 0 Then ActiveSheet.ChartObjects("KDT Rectangle").Delete End If With Worksheets("profile") 'Creating the Chart .ChartObjects.Add(690, 125, 550, 245).Name = "KDT […]

Excel 2010 vba图像标志交换开关

将多个徽标图像(大小相似)插入到资源表中。 需要一种让用户轻松select他们想要的公司的方法,并将该标识replace为几张纸的左上angular的默认标识。 想要使用下拉菜单,以前dynamic使用过,效果很好。 下拉菜单可以放在用户窗体中,也可以放在仪表板上。 我已经看过堆叠的标志,并尝试一个Z轴开关,但Excel似乎并不支持这一点。 我也试过了.Replace和.Copy。 此外,徽标已经粘贴到隐藏的资源表中,因此我不希望用户search图像目录,也不需要依赖互联网连接来获取图像(它们有时会脱机工作)。 一个默认的图像已经放置在左上angular,只需要一种方法来匹配他们(文本)的公司select到相应的标志图像/名称,然后切换旧的标志与新指定的几个页面,在相同的左上angular。 编辑: 这是我迄今为止所尝试过的一个混杂模式,在不同的时间里,各种各样的线条都没有注释,而在这一点上,一些线条的方式真的没有意义。 只有张贴街道的信誉,我猜。 我只是试图找出一个小小的function,而不是要求任何人为我写程序(这是一个很大的差别): Private Sub CompanySelectComboBox_Change() If CompanySelectComboBox.Value <> "Select a company" Then ' select logo here Sheets(Sheets("TaskNew").Index + TaskSheetsComboBox.ListIndex + 1).Activate 'Private Sub TaskSheetsComboBox_Click() 'If TaskSheetsComboBox.Value <> "Go directly to a yellow task sheet" Then ' Sheets(Sheets("TaskNew").Index + TaskSheetsComboBox.ListIndex + 1).Activate 'End If 'End Sub […]

unoconv导出.xlsx文件到像PNG图像

我已经在我的Ubuntu 14.04 64位成功安装了unoconv 。 我想将.xlsx文件的第一张导出为像PNG或JPG格式的图像。 我试过了 unoconv -l & 9998 ## this is to start the python listener unoconv -f png abc.xlsx 我得到以下内容: unoconv: UnoException during export phase: Unable to store document to file:///var/virtual/abc.png (ErrCode 3088) Properties: ((com.sun.star.beans.PropertyValue){ Name = (string)"FilterName", Handle = (long)0x0, Value = (any){ (string)"draw_png_Export" }, State = (com.sun.star.beans.PropertyState)DIRECT_VALUE }, (com.sun.star.beans.PropertyValue){ Name […]

使用OLEDB从Excel文件中检索图片

我有一个Excel表,有两列,一个是数字,第二列有一个图片。 我想从oledb连接的C#中读取这些数据,我可以很容易地读取数字,但图片不包含在第二列,所以在C#中我只是得到第一列。 现在,我怎样才能读取图像? 我想从这个Excel表格中提取数字和相关图像。