I wrote some code so the user could push a button and import from excel, the problem is that my unique ID for my data is an autonumber and the data imported is not getting assigned one. How can I fix that?
DoCmd.TransferSpreadsheet transfertype:=acImport, TableName:=acTable...
"To use a 'File-Open' or a 'File-Save' dialog, download or open the following file containing Ken's code, then copy and paste the entire contents into a new module."
What does it mean by new module?
Yea, I tried it but there are so many functions that it calls that it gets messy and doesn't work...
http://www.mvps.org/access/api/api0001.htm
Thats the site with the source code.
I'd use a textbox but it would be a pain to have to look up the file name every time. A dialog box would be...
Would something like this work
Dim strFilter As String
Dim strInputFileName as string
strFilter = ahtAddFilterItem(strFilter, "Excel Files (*.XLS)", "*.XLS")
strInputFileName = ahtCommonFileOpenSave( _
Filter:=strFilter, OpenFile:=True, _...
When i follow these instructions it says I do not have the rights to run the Active X control. I am at work using company software so there is nothing I can do about that. Is there any other way?
I want to create a button that users can use to import excel data straight into a table. I have all the code for the excel part but I have no idea how to ask the user for the excel file they want to use. Right now I have the filename varible manually set, is there a way that I can bring up the...
Im sure this is a simple syntax mistake on my part but I cannot figure it out, in my code below how would i get the value that is in the string to show up in the message box?
Thanks.
Dim currentSTRNum As String
currentSTRNum = CStr(Forms![STR Log]!txtSTRserialNumber)
msgbox ( &...
I'm doing something similar, but i cannot figure out how to fill in the bookmarks that I wrote the code for. The code i have right now opens it up and asks the user to save as without filling the form in. How to i get the form to fill in before It asks the user to save?
Private Sub...
This is the code i have right now:
'Select the bookmark setup in the template
.ActiveDocument.Bookmarks("text2").Select
'Populate the bookmark with this data
.Selection.Text = (CStr(Forms!Form1!cmboHullNGSS))
And I have this for about 30 different forms, I have it open a certian document in...
CurrentDb.Execute "UPDATE [VME Chassis Contents] SET [Slot Number] = " & Me.Combo44 & " WHERE [Serial Number] = " & Me.CmboRepairHistory
Now I have it down to expected 1