Tag: 插入

插入一个图像Excel表格不工作: 我试图插入一个图像像下面的Excel表格。 Image img = Image.FromFile("test.jpg"); sheet.get_Range("A1").set_Item(1,1,img); 但是当excel在A1单元格打开时没有任何图片，但只有这个结果： System.Drawing.Bitmap 那么问题是怎么解决的。而第二个问题是：如果我的图片位于数据库中，如何插入excel。我不想将它们保存到计算机插入到Excel中？ [WinForm的]

根据单元格值插入复制的行: 下面的vba代码（从这里修改）将在E列中具有值“0”的任何行上面插入一个空白行。而不是插入一个空白行，有没有办法用“0”复制行并插入它在上面呢？可以修改这个VBA代码来做到这一点？ Sub BlankLine() Dim Col As Variant Dim BlankRows As Long Dim LastRow As Long Dim R As Long Dim StartRow As Long Col = "E" StartRow = 1 BlankRows = 1 LastRow = Cells(Rows.Count, Col).End(xlUp).Row Application.ScreenUpdating = False With ActiveSheet For R = LastRow To StartRow + 1 Step -1 If .Cells(R, Col) […]

从一个列表中自动创build多个对象和名称: 我目前正试图自动创build和命名引用列表中的多个对象，而不是只有在脚本中陈述的对象文本。即时通讯使用下面的脚本，最好的方式来安排代码，以促进许多对象被添加和不被放置在同一位置的对象。设置位置的代码是_ Set shp = ActiveSheet.Shapes.AddShape（msoShapeRectangle，50，50，100，50）设置对象的位置，我怎样才能改变代码有多个项目重复，命名和排队彼此相邻。 Sub Sample() Dim shp As Shape Set shp = ActiveSheet.Shapes.AddShape(msoShapeRectangle, 50, 50, 100, 50) With shp.OLEFormat.Object .Formula = "" .ShapeRange.ShapeStyle = msoShapeStylePreset40 .ShapeRange(1).TextFrame2.TextRange.Characters.Text = _ ThisWorkbook.Sheets("Process Steps").Range("C7").Value End With End Sub

从范围插入复制的单元格到另一个范围的空白单元格: 描绘数据和底层excel文件的图像范围的例子底层的excel文件问题和我所尝试的我在这里有一个名为范围2的表，我希望将它插入名为范围1的表中的空白区域，使得它在总体上看起来像范围3。我试图复制范围，然后select范围1，使用标记空白区域：首页 – >查找＆select – >去特殊 – >select空白，然后插入复制的单元格。这失败了，我得到的消息“这不能在多个范围select。 select一个范围，然后重试“”。我进一步尝试使用loggingmacros工具来尝试VBA，但没有成功。注：我有一个更大的设置类似于范围1与完全相同的结构与空白单元格需要填充，否则，我会当然这样做手动

如何使用AddOLEObject将Excel图表插入到Word中: 我正在尝试使用VB.Net在Word文档中创build链接的OLE对象。现有的代码使用InlineShapes.AddOLEObject（FileName：=“abc.xlsx”，LinkToFile：= True，范围：=某些Word范围）插入工作表到Word文档。我需要比这更多的控制。要select一个单元格范围，我发现文件名后的额外信息是有用的，例如：FileName：=“abc.xlsx！sheet1！R1C1：R20C5” 有没有办法在工作表中指定特定的图表？那么我可以在工作表上指定第二个图表作为要链接的对象吗？谢谢。

打开XML SDK – dynamic创build行: 我需要使用XML SDK来创build一个Excel文件。我以前用XML SDK做过，但不知道如何根据数据dynamic创build行。因此，我有静态的页眉和页脚。对于正文，不知道如何dynamic添加行。有没有人有一个链接，我可以进一步了解这个或一些示例代码。顺便说一句，我用这个与C＃。先谢谢你。

通过VBA将数据从Excel添加到Mysql: 更新的问题…见下文我有一个Excel表格访问MySQL数据库作为后端…. 我按照以下方式将新logging插入到MySql中，但是我不确定这是否是最好的方法。 For rowline = 1 To 50 strSQL = myquerystring (INSERT 5 columns per excel row) rs.Open strSQL, oConn, adOpenDynamic, adLockOptimistic Next rowline 基本上，查询string遍历Excel表中的每一行（从1到50），并将某些单元格上的数据添加到SQL查询中，然后用rs.Open …插入（每行有5列插入作为logging）一切运行良好，但是我只想知道是否有一个更快的方法（只需一个INSERT查询），从第1行到第50行全部插入全部50个（和5个列）。目前它正在做50个单独的INSERT查询，所以我试图把它减less到1，但我不知道是否有可能。新的信息：嗨，遵循您的build议和链接（谢谢！）和一些谷歌search，我结束了以下代码…它工作正常，但插入100行大约需要15秒….这是太多了。我希望我能得到一些代码/想法如何执行查询一次，（一个命中插入所有100行）。请注意，我是一个初学者，所以如果你可以搅动我一些样本，应该怎么做，将不胜感激。 Public Sub INSERT_to_MySQL() Dim conn As ADODB.Connection Dim cmd As ADODB.Command Dim strSQL As String app_enable_false On Error GoTo no_DB_connection_error resume_after_connecting: Set […]

Excel VBA – 如何只插入值？: 我正在寻找一种方法来从另一个工作簿中复制一个范围（从11列和各种行存在的复制范围），并只在我的主工作簿，已经存在的数据下面插入/粘贴值。只是粘贴是没有问题的，但是因为我不希望它覆盖最后一个（SUM-）行我想要插入的值。据我所知，没有什么像InsertSpecial xlInsertValues。那么如何根据复制范围的计数行插入整个空行，然后只将这些值粘贴到列“E”到“O”中？一些先决条件是：复制范围从11列和各种行存在我试图避免在两个文件之间切换两次。因此，我只想打开外部工作簿，复制值，打开我的主要工作簿，并将范围内的空白单元格左侧和右侧的复制数据插入。这是我到目前为止。它在插入部分都是错误的，因为它不会粘贴/插入值。请注意，这只是更大代码的一部分。 Rng31是extern工作簿中的复制范围。 Dim Rng31 As Range Set Rng31 = Rng21.Resize(Rng21.Rows.Count, Rng21.Columns.Count + 10) Dim regels As Integer regels = Rng31.Rows.Count Rng31.Copy Wbbase.Activate Sheets(2).Activate Dim onderste As Range Set onderste = Range("E65536").End(xlUp).Offset(1, 0) onderste.Insert shift:=xlDown Selection.PasteSpecial xlPasteValues

插入SQL 2005更新列: 我需要一些帮助来创build一个存储过程/查询（只要它工作并不重要），在插入新行时发生以下情况。这是一个非常简单的表，其中有4列与其他表相关 CREATE TABLE [#loginid_name]( [Login_ID] [int] NOT NULL, [Login_ID_Name] [varchar](30) COLLATE Latin1_General_CI_AI NOT NULL, [Date_Begin] [datetime] NOT NULL, [Date_Finish] [datetime] NULL) 当我插入一个新的行时：查询检查是否有更高的begin_date的那个ID的其他logging（如果有多个更高的begin_date行，我只需要更接近插入的一个）如果有，则将新行的date_finish设置为现有行的date_begin 如果没有，则将新插入的date_finish设置为NULL 检查该ID是否有其他logging的date_begin较低，但较高（或NULL ）date_finish 如果有，则将该logging的date_finish更新为新插入的date_begin值。那有意义吗？我可以将这些部分放在一起，但似乎无法将其编码到SQL中的单个查询/存储过程中。我将使用VBA从Excel中插入这些行，这样我就可以将这些代码硬编码到VBA上的插入查询中。顺便说一句，我想避免触发器，因为我已经尝试过他们，他们给我很多麻烦。我在这个SQL的东西很新。你可以帮我吗？谢谢！

在Excel中使用CONCATENATE: 我目前正在合并两个数据库的工作过程中，我正在通过使用Excel生成我的INSERT语句。我使用Excel的原因是因为我有超过1500多条logging，我不想写这么多的INSERT语句。我会给你一些关于我的设置的背景：正如你所看到的，我在上面的屏幕截图中设置了我的INSERT语句。一旦完成，它会看起来像这样： INSERT INTO "database name"("columns") VALUES("values") 在我上面的屏幕截图所描述的行下方，我有大约1500+行，有50列以上的地方。正如你所看到的，我除了INSERT语句的值部分外，都已经设置好了。为了设置这个，我使用CONCATENATE从我的第一行抓取所有的值来完成我的第一个插入语句。这是我遇到一些麻烦的地方。为了使我的INSERT语句正常工作，我需要使用以下格式的单元格值： “00064”，“PPMeetME”，“testing”，“testing”等。但是，如果你看上面的红色圈出来的截图，我不能把数据限制在这种格式。我尝试了各种不同的angular色位置，我不确定它是否能够完成，但有什么方法可以设置我的CONCATENATE声明，使其看起来像我刚刚提到的？（例如：“00064”，“PPMeetMe”，“00001”，“testing”而不是“00064，PPMeetMe，00001，testing”）请让我知道，如果有什么不清楚，我会尝试进一步澄清。任何帮助是极大的赞赏。谢谢！戴夫