Advice on Debugging Machine-Specific Excel VBA Issue -

-

i have excel workbook dependencies on code in other other excel workbooks (these dependent .xls's vb-level references, i.e. via tools->references dialog box in vba editor), , dependencies on dll's such as: microsoft scripting runtime microsoft forms 2.0 object library

this sheet has worked 2 years on around 20 machines running windows xp , office xp. have taken delivery of 3 new machines (same os, same office version) refuse run sheet. when sheet opens, throws 'compile error', , session hangs.

if open sheet on 'bad' machine, hold down left shift key stop macro's running, , go vba editor->debug->complie vbaproject, compiles fine. able save sheet , open on 'bad' machine. new version of sheet refuses run on 'good' machine!!

i think there must sort of version mismatch between dll's on 'good' , 'bad' machines. how establish causing issue? there tools available comparing versions of com components?

two suggestions

1) first open file macros disabled. , check vba editor | tools | references. check missing references , let know they. take there.

2) references "microsoft scripting runtime object library" never use binding. binding major cause these kind of errors. fyi: binding creating references beforehand via vba editor | tools | references. recommend changing code late binding. here 2 examples of same code using "microsoft scripting runtime object library" binding , late binding

early binding example

'~~> set reference "microsoft scripting runtime object library"  sub ebexample()     dim fso scripting.filesystemobject     dim sourcefolder scripting.folder     dim fileitem scripting.file      set fso = new scripting.filesystemobject     set sourcefolder = fso.getfolder(sourcefoldername)      each fileitem in sourcefolder.files         '~~> code     next fileitem end sub

late binding example

'~~> doesn't need reference sub lbexample()     dim fso object, sourcefolder object, fileitem object      set fso = createobject("scripting.filesystemobject")     set sourcefolder = fso.getfolder(sourcefoldername)      each fileitem in sourcefolder.files         '~~> code     next fileitem end sub

as me use binding take advantage of intellisense convert late binding avoid version-specific code before distributing code. ways code works. :)

imp note: late binding fails in scenarios destination machine doesn't have relevant dll registered.

recommended link:

topic: using binding , late binding in automation

link: http://support.microsoft.com/kb/245115

hope helps

sid


Comments

Post a Comment

Popular posts from this blog

jasper reports - Fixed header in Excel using JasperReports -

-
how can create excel report fixed header using japserreports? mean need header fixed when scroll excel file. this possible adding couple properties in jrxml file each report. take @ advanced excel features freeze panes. if wanted freeze after first column header (down left side basically) this: <statictext> <reportelement style="sans_bold" mode="opaque" x="0" y="60" width="104" height="20" forecolor="#ffffff" backcolor="#666666"> <property name="net.sf.jasperreports.export.xls.auto.filter" value="start"/> <property name="net.sf.jasperreports.export.xls.column.width" value="110"/> <property name="net.sf.jasperreports.export.xls.freeze.column.edge" value="left"/> </reportelement> &
Read more

media player - Android: mediaplayer went away with unhandled events -

-
i need duration of audio file series of voice announcements need play app. have added audio files resources , play fine. sample code below works perfect intended purpose: return duration of audio files. here code: float getdurationofaudioresource(locationenum loc, context context){ float duration = 0; try { mediaplayer mp; mp = mediaplayer.create(context, getaudioresource(loc)); duration = mp.getduration(); mp.release(); mp = null; } catch (illegalstateexception e) {e.printstacktrace(); logerror(25, "testdescitem:fault::could not open mediaplayer object audio resource.");} return duration; } here's weird thing. code called in main activity prepares set of audio instructions given test. there no errors within activity. second activity called, long string of errors on logcat. 03-07 13:23:43.820: i/actionlogger(21435): gentest_info_test #0 created. 03-07 13:23:43.830: i/actionlogger(21435): gente
Read more

python - ('The SQL contains 0 parameter markers, but 50 parameters were supplied', 'HY000') or TypeError: 'tuple' object is not callable -

-
import pyodbc,nltk,array cnxn = pyodbc.connect('driver={mysql odbc 5.1 driver};server=127.0.0.1;port=3306;database=information_schema;user=root; password=1234;option=3;') cursor = cnxn.cursor() cursor.execute("use collegedatabase ;") cursor.execute("select * sampledata ; ") cnxn.commit() s=[] j=[] x=[] words = [] w = [] sfq = [] pos=[] entry in cursor: s.append(entry.injury_type),j.append(entry.injury_desc) nltk.tokenize import punktwordtokenizer nltk.corpus import stopwords tokenizer = punktwordtokenizer() english_stops = set(stopwords.words('english')) in range(0,26): # filter stop words tokenizer.tokenize(j[i]) w.append([word word in tokenizer.tokenize(j[i]) if word not in english_stops]) in range(0 , 26):#converting tokenzied text ito string sfq.append(" ".join(w[a])) replacers import regexpreplacer replacer = regexpreplacer() in range (0,26):#pos tagging replacer.repl
Read more