Tag: ms access

从Excel设置VBA ADO连接到访问多个用户和文件的正确方法是什么？

我有几个用于input数据的excel文件。 文件在function上是相同的，对于我们的每个服务中心都是一样的。 在窗体中有button，启动一个macros，将数据转换为另一个表格上的表格格式，然后上传到Access数据库。 一切工作正常在我自己的电脑上。 添加新行，更新现有行并删除现有angular色。 我使用了早期的绑定，当我把文件移动到我们的networking驱动器时会导致问题。 我设法将文件转换为后期绑定，但随后出现其他问题。 大多数情况下，上传到Access不起作用，特别是当多个用户同时尝试做东西时。 最常见的错误代码是我没有使用可更新的查询，或者这种方法不支持向后滚动。 我很抱歉没有报告实际的错误代码，但目前我无法复制它们。 我的连接代码如下，是来自不同例子的复制粘贴代码的混合。 打开连接和其他prestuff Sub excel2access() Const adUseClient = 3 Const adUseServer = 2 Const adLockOptimistic = 3 Const adOpenKeyset = 1 Const adOpenDynamic = 2 Dim oConn As Object Dim cmd As Object Dim rs As Object Dim r As Long Dim criteria As String Dim […]

在Access 2010中制作一个日历

我有一个日历列表，在一定范围内列出所有date，然后其中一些date有其他dateattatched给他们参考。 该表格是60_Days，它具有Date和Date_60字段，Date是实际日历，Date_60是指需要在Date下面列出的其他date。 我想做一个报告，显示一个正常的日历，但会显示date下面Date_60date存在。 有任何想法吗？ 如果可以完成，Visual Basic将会很好。 如果我可以导出到Excel中，并以某种方式使它更容易，那也没关系。 谢谢！！ 编辑 由于似乎没有人知道我的答案，我不明白为什么会这样下去。 只是诚实。 我找不到我在找什么，我不知道从哪里开始。 我由于某种原因读过，MS从2010年的版本中拿出了“日历控制”（Access Control）的forms和报告。对我来说没有任何意义，但无论如何。 在做了更多的研究后，似乎可以在Excel中完成，但是我仍然不知道如何完成。 下一步编辑。 我想要使​​用的日历types应该看起来像这样 http://www.google.com/imgres?um=1&hl=en&safe=active&sa=N&biw=1280&bih=880&tbm=isch&tbnid=WR_gZPF0plXvWM:&imgrefurl=http://www.docstoc.com/docs/16553160/Year-Round-学校日历-2009-2010日至2010年-S-7-14-21-28-7-14-21-28-SM-1-8-15-22-29-T-2-9-16- 23-30-W-3-10-17-24-31-T-4-11-18-25-F-5-12-19-26-S-6-13-20-27-W-4- 25年11月18日-T-5-12-19-26-F-20年6月13日＆的docID = _aFOfbu3eBlxcM＆imgUrl的HTTP =：//img.docstoccdn.com/thumb/orig/16553160.png&w=1275&h=1650&ei=Q8yKUJmuIZCK9gTd34HACg&zoom= 1 IACT = RC＆DUR = 357＆SIG = 117327434000511743512＆页= 2＆TBNH = 150＆tbnw = 117＆开始= 24＆NDSP = 35＆VED =1吨：429，R：5，S：20，I：158和Tx = 104＆TY = 49

VB.NET访问数据库插入不插入数据？

我试图插入一个表，我在Access中的表。 该表名为Site，它有两列，SiteId（AutoNumber）和SiteName（Text）。 出于testing的目的，我从Excel工作表中抓取了一个值，并尝试用下面的代码将值插入到SiteName列中。 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim App As New Excel.Application Dim WB As Excel.Workbook = App.Workbooks.Open("C:\MyFile.xlsx") Dim WS As Excel.Worksheet = DirectCast(WB.Worksheets(2), Excel.Worksheet) App.Visible = False Dim Range As Excel.Range Range = WS.Range("A8") Dim cnn As New OleDbConnection(My.Settings.cnn) Dim cmd As New OleDbCommand("INSERT INTO Site(SiteName) […]

带有列的文本文件到odbc数据库

我每天都以文本文件格式获取日志。 在我运行记事本++macros来清理文件（垃圾行和空行/空行）/ 我导入它的访问表，从那里我出口到odbc数据库一些我怎么不知道。 进行odbc访问连接后，我使用访问odbc连接做我的sql查询，并创build一个需要的报告。 有没有办法让这个过程自动化？ 从日常文本日志更新访问数据库我得到？ 谢谢

插入设定数字以设定数值

我有以下数据集： PARENT_RECORD 5 5 5 6 6 6 7 这些logging进入成千上万。 我有另外一个空列，我想从100开始放置一个数字，每个唯一的parent_record将数字“100”与它相关联。 例如，每个parent_record "5"将在我的另一列中有100个。 每个parent_record "6"将在另一列中有101个，这将继续一直通过parent_record列。 我正在使用Access，但可以将其导出到Excel电子表格中。 任何人都知道任何function或任何SQL可以帮助我做到这一点？

使用vba访问查询到macros启用的Excel模板

我试图把需要参数的查询中的数据与马克斯在其中的Excel模板，但我不断收到错误。 我从表单获取参数。 inheritance人我的代码： Private Sub exportButton_Click() Dim XL As Excel.Application Dim wbTarget As Workbook Dim qdfResults As QueryDef Dim rsResults As Recordset 'Set up refernce to the query to export Set qdfResults = CurrentDb.QueryDefs("MarksQuery") qdfResults.Parameters("Forms!comp!competition") = Forms!comp!competition 'Execute Query Set rsResults = qdfResults.OpenRecordset() 'reference excel Set XL = CreateObject("Excel.Application") 'refernce workbook Set wbTarget = XL.Workbooks.Open("C:\Users\user\Documen…\folder\resultTemplate.xltm") […]

使用C＃以编程方式将查询表从MS Access导出到Excel

今天我有一个软件，从网上下载XML数据，并将其导出到适当的表中的MS Access DB。 在MS Access数据库中，我创build了一个查询使用表来创build列和行，因为我希望它看起来像在Excel中。 当我右键单击我的新查询表，并select导出到Excel，我能够从该查询创build一个Excel文件。 基本上我想要做的是扩展我的软件，以便我可以用C＃编程导出查询到Excel。 我怎样才能做到这一点？ ————————— 其他方面的事情我也想解决。 我得到左侧的数字上方的绿色三angular形，检查图像postimg.org/image/t6tvfw2cz我如何从C＃中删除。 是否有可能格式表的外观和devise与C＃代码？ 用c＃代码添加filter到头是否是可行的？ – 法力15小时前

如何删除Access中存在的Excel中的行？

我在Access数据库中有一个名为“ActiveCustomers”的表，其中包含客户姓名和电话号码。 我也有一个Excel工作表，其中包含Access中的“ActiveCustomers”表中包含相同的数据，加上无效的客户。 我想从Excel工作表中删除存在于Access数据库中的所有活动客户，只留下工作表中的非活动客户。 我需要做什么才能做到这一点？

MS Access小等价

我有这个工作在Excel中，但它真的需要移动到Access中，因为这是数据库的其余部分所在。 它只是一个表，其中包含Unique_ID，卖方和水果… 1 Chris Orange 2 Chris Apple 3 Chris Apple 4 Sarah Kiwi 5 Chris Pear 6 Sarah Orange 最后的结果应该由卖方显示，然后列出每个出售的水果（在下面的例子中，罗伯特还没有出售任何水果，我有一个所有卖家的名字的名单，但是这个例子中可以忽略，因为我相信将很容易整合。）他们只会出售最多20个水果。 Seller 1st 2nd 3rd 4th Chris Orange Apple Apple Pear Sarah Kiwi Orange Robert 目前，Excel使用Index，Match和Small来返回结果。 Small只是用于Unique_ID来查找第一，第二，第三等等…最小的条目，并与每个卖家的名称相匹配，以build立上述结果。 由于访问没有一个小function，我很茫然！ 实际上有超过100,000个logging（最less），超过4000个卖家….他们也不是水果:)

保存单个Excel工作表作为新的Excel文件与新的input

我正在与VBA和访问2010年。我在这里有一个Excel文件作为模板，3个不同的工作表，我想写这些不同的工作表中的东西取决于什么是在我的访问分贝。 我只是有一个麻烦：原来的Excel模板文件不应该改变。 我想保存在一个新的文件与我的input，这次只有1工作表（取决于访问数据库中的什么）。 所以这是我的代码访问： Dim excelObject As Object Dim sheet As Object Dim myRec As DAO.Recordset Dim fldCustName As DAO.Field 'open excel file Set objExcel = CreateObject("Excel.Application") Set excelObject = objExcel.Workbooks.Open("MyTemplate.xlsx") Set sheet = excelObject.Worksheets(1) 'read table Set myRec = CurrentDb.OpenRecordset("MyTable") Set fldCustName = myRec.Fields("ID") 'select worksheet and add text to excel depends on table […]