Importing MS Excel sheet into MS Access via VBA not importing everything -


i have ms access database program brings in data ms excel workbook (it's 1 sheet) processed , kicks out completed form user.

the whole thing working fine, when encountered error in report went work database program find problem , new 1 cropped up. ms access importing cells a1 , a2.

when try manually import excel file , append table, import wizard shows 2 cells being included in file. somehow, ms access not seeing entire sheet of data.

i have tried manually changing acspreadsheettype option in docmd.transferspreadsheet , worked once. have tried changing programmatically no effect (i.e., still cells a1 , a2).

here segment of vba deals part of program: 

dim acspreadsheettype integer  strfile2import = txtfindfile  acspreadsheettype = excelversion(strfile2import)  docmd.hourglass (hourglasson) docmd.setwarnings (warningsoff)  docmd.runsql _     "delete tbl_work_plan_item_import.*, * " & _     "from tbl_work_plan_item_import;"  docmd.transferspreadsheet _     acimport, acspreadsheettype, "tbl_work_plan_item_import", strfile2import, true

and here "excelversion" function: 

public function excelversion(byval strfile2import string)     'https://msdn.microsoft.com/en-us/library/office/ff840717.aspx     'https://msdn.microsoft.com/en-us/library/office/ff198017.aspx     set objapp = createobject("excel.application")     objapp.visible = true     set wb = objapp.workbooks.open(strfile2import, true, false)     excelversion = wb.fileformat     wb.close      objapp.quit      set objapp = nothing      select case excelversion         case 29             'xlexcel3 (excel3)             excelversion = 0    'acspreadsheettypeexcel3 (microsoft excel 3.0 format)         case 33             'xlexcel4 (excel4)             excelversion = 6    'acspreadsheettypeexcel4 (microsoft excel 4.0 format)         case 39             'xlexcel5 (excel5)                             'xlexcel7 (excel7)             excelversion = 5    'acspreadsheettypeexcel5 (microsoft excel 5.0 format)                                 'acspreadsheettypeexcel7 (microsoft excel 95 format)         case 46             'xlxmlspreadsheet (xml spreadsheet)             excelversion = 10   'acspreadsheettypeexcel12xml (microsoft excel 2010 xml format)         case 50, 51         'xlexcel12 (excel12)                             'xlworkbookdefault (workbook default)             excelversion = 9    'acspreadsheettypeexcel12 (microsoft excel 2010 format)         case 56             'xlexcel8   (excel8)             excelversion = 8    'acspreadsheettypeexcel8 (microsoft excel 97 format)                                 'acspreadsheettypeexcel9 (microsoft excel 2000 format)     end select  end function

"strfile2import" , "txtfindfile" file name , full path imported gotten file dialog box.

my original program didn't have excelversion function , had hardcoded acspreadsheettype "acspreadsheettypeexcel12xml" , when changed "acspreadsheettypeexcel9" worked correctly once.

what missing?

for record, have tried doing .recalc , .requery entire form after performing import, , unsuccessful well.

any guys can throw way appreciated!

"delete tbl_work_plan_item_import.*, * " & _

this has * twice.

change 

"delete tbl_work_plan_item_import.* " & _

Comments

Post a Comment

Popular posts from this blog

html - Outlook 2010 Anchor (url/address/link) -

i'm trying link specific pdf page msoutlook'10 or msword'10, #page=... anchor particularly useful , works fine elsewhere. unfortunately when click [ctr-k] in outlook or winword, links re-formatted assuming unc path. pdf file located on shared drive. using "file:" prefix links open pdf in adobe reader (outside of browser), , "http:" open inside browser. issue seem need open in browser "file:" prefix in order anchor work. know anchors work inside browser. outlook uses windows/explorer default program (based on file extension) seems open in adobe reader neglecting anchor. is aware of solution, link specific page or bookmark of shared-pdf ms outlook and/or winword link? common references: mailermailer.com/...anchor-tags-html-emails campaignmonitor.com/...anchor-links-in-email-newsletters/ stackoverflow.com/...anchor-in-pdf-document
Read more

javascript - Why does running this loop 9 times take 100x longer than running it 8 times? -

consider code: test = function() { } t = new test(); (var = 0; < 8; i++) { result = t instanceof test; } if change number of iterations 8 9 , loop take 100 times longer complete in latest version of firefox (41.0.1). tested on 2 different pcs , magic limit 8. here jsperf test used: http://jsperf.com/instanceof-8-times-vs-9-times does have idea why might happen? seems specific instanceof . not happen if else object, example check property. note: filed bugzilla bug this. jan de mooij mozilla team has posted details in bugzilla thread . here's simplistic interpretation of highly technical answers: in i < 8 case, firefox smart enough hoist result = t instanceof test; statement out of loop (according tests, doesn't seem omit altogether). in i < 9 case, apparently doesn't optimization . why? reason not clear, related fact 9 iterations threshold above function considered "hot" enough run through jit compiler. i < 8 cas...
Read more

Getting gateway time-out Rails app with Nginx + Puma running on Digital Ocean -

following this guide setup app on digital ocean droplet, not working. site not loading , it's throwing: "gateway time-out". the puma server works, since ps aux | grep puma prints: root 15878 0.0 0.4 376832 2168 ? sl 12:50 0:00 puma 2.13.4 (unix:///var/www/myapp/shared/tmp/sockets/myapp-puma.sock) [20150930164940] root 15881 0.0 0.7 903676 3692 ? sl 12:50 0:06 puma: cluster worker 0: 15878 [20150930164940] root 24654 0.0 0.1 11748 916 pts/2 s+ 18:00 0:00 grep --color=auto puma my nginx config: user root; worker_processes 1; events { worker_connections 1024; } http { upstream puma { server unix:///var/www/myapp/shared/tmp/sockets/myapp-puma.sock; } server { listen 80; server_name myapp.com; root /var/www/myapp/current/public; access_log /var/www/myapp/current/log/access.log; error_log /...
Read more