Tag: 更新

Excel VBA访问数据库：十进制数字问题: 我正在一个小型的Access数据库，我从Excel文件添加行值为1.1,2.1,3.1。当我更新时，这在Access数据库中被更新为1.0999999999, 2.0999999999,3.1000000000000001 。如果我想要Excel中的值1.1 ，由于十进制数的变化，它不会从Access数据库中提取。我使用“文本”作为Access数据库中的数据types。是因为文本数据types还是我应该select什么来使更新只有1.1, 2.1等

更新Word文档中的所有Excelembedded式链接: 感谢尼克我试过，但我要指定的Excel应用程序，因为这是在词VBA工作。我也削减了代码，只改变了链接，但仍然很慢。我不能理解，因为当我只更新使用的链接 Activedocument.fields.update 它立即完成。我知道这只是更新和不改变源，但仍然是时间差太大。我的完整代码是： Private Sub CommandButton1_Click() Dim OldFile As String Dim xlsobj As Object Dim xlsfile_chart As Object Dim dlgSelectFile As FileDialog 'FileDialog object ' Dim thisField As Field Dim selectedFile As Variant 'must be Variant to contain filepath of selected item Dim newFile As Variant Dim fieldCount As Integer ' […]

INNER JOIN OPENROWSET VBA编程？: 在SQL编程中，有一个代码：INNER JOIN OPENROWSET在excel工作表中用MSSQL数据库连接表。我的问题是VBA编程中的代码与MSSQL中的INNER JOIN OPENROWSET具有相同的function，但function是将AS400数据库连接到Excel工作表中。

更新基于不同文件的单元格的单元格值: 我正在写我的第一个代码（必须从某些东西开始:)），我真的很挣扎着，因为在互联网上找不到任何类似的例子，至less给我一个方向。我会努力尽可能清楚地解释它。我有两个部门的.xlsx文件，都包含很多地区。 FILE 1 – DATAS DEPENDING ON DISTRICT FILE 2 – DISTRICT UNIQUE VALUES columnA+B columnC columnE columnA columnE DATA DEPARTMENT DISTRICT DEPARTMENT DISTRICT " LIMA BARRANCA LIMA BARRANCA " LORETO BARRANCA LORETO BARRANCA1 " LORETO BARRANCA SAN MARTIN BARRANQUITA " SAN MARTIN BARRANQUITA LORETO BELEN " SAN MARTIN BARRANQUITA CAJAMARCA BELLAVISTA " […]

Excel VBA：检查.txt文件是否打开/locking/空闲: 我用Excel vba编写了一个小应用程序来更新一个.txt文件，当用户提交一个提交文件时，一个计数器会更新.txt文件，这样我们就可以知道当前的运行号码，并且跟踪每日提交。 .txt文件只存储当前的数字。（即每次提交+1的当前号码）。但是，我注意到，当2个用户同时提交提交时，它会导致错误。我可以知道我怎么做一个检查，看看.txt文件是否打开，并locking只为用户？或者一次只允许一次更新，其余的将被阻止。请指教，非常感谢！下面是用于更新.txt文件的代码 Sub TextFile_FindReplace(ByRef FileCount As Long) Dim TextFile As Integer Dim FilePath As String Dim fileDate As String, todDate As String Dim text As String, textline As String FilePath = "c:\fileNoCount.txt" todDate = Format(Now(), "dd/mm/yyyy") TextFile = FreeFile Open FilePath For Input As TextFile Line Input #TextFile, […]

总结前5个数字中第二个和第三个最大的数字: 我正在寻找一个解决scheme来更新（计算SET值）一个现有的表格与前面5的第二和第三个最大的数字的总和。 ID | Price | Sum | | | (2nd + 3rd largest of the previous 5)| ——————————————————- 1 | 6 | | 2 | 1 | | 3 | 8 | | 4 | 3 | | 5 | 5 | | 6 | 9 | should be 11 | 7 | 1 | […]

Excel Active X控件 – 不再工作 – 2015年1月: MS Excel 2010 – 十二月初MS发出杀死Active X Controls的更新。经过几天的研究发现一个解决scheme，并能够恢复。现在又是2015年1月6日的第一个星期，同样的问题又出现了。这次有点不同，但基本一致。 Active-x控件再次不起作用，而且我还收到一条错误消息，说它不能退出devise模式（我不在devise模式 – 这是怎么回事，我不知道），并运行时间错误被显示。清理了“* .exd”文件，但无济于事。有没有人遇到这个问题，那里有解决scheme吗？附录 – 我从我的电脑放置一个较小的应用程序到有问题的电脑。再次，这不是工作，只有一个星期前，它工作正常。我开始重新创build问题电脑上的小应用程序，并做了一些testing。随着在特定的电脑上创build的代码，它正在工作。嗯…我下一步去哪里？

C＃如何从Excel更新访问表？: 如何从Excel中更新访问表？ string Access = System.AppDomain.CurrentDomain.BaseDirectory + "\\DB.mdb"; string Excel = fileName; string connect = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" + Excel + ";Extended Properties=Excel 8.0;"; using (OleDbConnection conn = new OleDbConnection(connect)) { using (OleDbCommand cmd = new OleDbCommand()) { cmd.Connection = conn; cmd.CommandText = "UPDATE [MS Access;Database=" + Access + "].[person] set vahedH=@vahedH,Bprice=@Bprice, Qest=@asd,mande=@mande,Date=@Date WHERE pcode=@pcode SELECT * […]

使用excel中的表格更新as400中的表格: 我想在excel工作表中使用表格更新as400中的表格，如下所示：表1 [as400] REFNO QTY 1 10 2 12 3 20 表2 [excel工作表] REFNO QTY 1 13 2 15 3 22 Table1中的数量使用VBA从表2中更新，因此输出将如下所示：表1 [as400] REFNO QTY 1 13 2 15 3 22 我写这样的代码： Dim s1 As Worksheet Dim BRDa As ADODB.Connection Dim RS As ADODB.Recordset Dim b As Integer Set RS = New ADODB.Recordset Set […]

由DDE更新触发的基于公式的单元更改的时间戳: 我有列A中的数据，并希望A列中的数据更改时在列B中的时间戳。现在，这里是棘手的部分：列A的值是基于公式的，从一个Vlookup表。这个Vlookup表有dde链接。所以没有人工input电子表格。下面的代码运行良好，如果你必须input数据到列A，但不会为上述scernario或甚至如果你说。单元格A1 = C1+D1 。通过改变C1或D1将改变A1 …但是这不会启动macros。 Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 1 Then Cells(Target.Row, 2).Value = Now End If End Sub