vb.net - GetActiveObject from The Excel Worbook -


i have datepicker written in vb.net looks this.

enter image description here

i had way because of security settings have. because of that, build in datepicker excel generate error.

the date picker works fine if there only 1 excel application open. problem when there multiple excel applications open.

enter image description here

the code takes first excel application, want excel workbook that's called "test".

i think problem statement:

objexcel = system.runtime.interopservices.marshal.getactiveobject("excel.application")

for better understanding code excel , datepicker application below:

that's how open vb.net application in excel:

set wsh = vba.createobject("wscript.shell") arg = activeworkbook.path & ";" & activeworkbook.name & ";" & activesheet.name & ";" & target.address ' wait shelled application finish: errorcode = wsh.run(strpathdatepicker & " " & arg, windowstyle, waitonreturn)

the code datepciker is:

public sub frmdatepicker_load(sender object, e eventargs) handles mybase.load     dim par() string     dim strtemp string      try         dim arg = environment.getcommandlineargs         strtemp = arg(1)          par = split(strtemp, ";")          'split arg, information excel workbook         strwbpath = par(0)         strwbname = par(1)                     strwsname = par(2)                     stradresse = par(3)                  catch ex exception                     me.close()     end try end sub

if click on date vb.net application run code inserting selected date excel:

private sub monthcalendar1_dateselected(sender object, e daterangeeventargs) handles monthcalendar1.dateselected             dim objexcel excel.application     dim wb excel.workbook     dim ws excel.worksheet      try         'get excel object         objexcel = system.runtime.interopservices.marshal.getactiveobject("excel.application")           each wb in objexcel.workbooks             if wb.name = strwbname                 ws = wb.sheets(strwsname)                 ws.range(stradresse.tostring).value = e.start()                 me.close()             end if          next     catch ex exception         messagebox.show(ex.message)         me.close()     end try  end sub

the usual ways pass process id, or application.hwnd, or risky activewindow.caption, think full external address enough find excel instance. example in vb.net (not tested):

dim o object = getobject("book 1.xls") dim wb excel.workbook = trycast(o, excel.workbook)

note ; valid character in file, workbook, worksheet, , named range names recommend looking different separator. example non-printable characters chr(0) might work, or use full external address target.address(,,,1).

environment.getcommandlineargs(1) cause problems if argument contains spaces , not surrounded ": https://msdn.microsoft.com/en-us/library/system.environment.getcommandlineargs


Comments

Post a Comment

Popular posts from this blog

asynchronous - C# WinSCP .NET assembly: How to upload multiple files asynchronously -

i using winscp .net assembly uploading files. want upload multiple files asynchronous way. have created method works single upload. public class uploadingdata { private sessionoptions _sessionoptions; private session _session; //connection etc private void onconnected() { foreach (var fileinfo in localfileslist) { var task = task.factory.startnew(() => uploadfilesasync(fileinfo)); } } private async task uploadfilesasync(string file) { string remotefilepath = _session.translatelocalpathtoremote(file, @"/", "/test_data_upload"); var uploading = _session.putfiles(file, remotefilepath, false); //when done await task.run(() => thread.sleep(1000)); } } please suggest me correct way. thanks you can use backgroundworker class this: string[] images = new string[50]; foreach (var path in images) { backgroundworker
Read more

aws api gateway - SerializationException in posting new Records via Dynamodb Proxy Service in API -

i getting "__type": "com.amazon.coral.service#serializationexception" as reply in postman & in test console in api gateway trying post record directly dynamodb using api proxy services.. referring aws article - https://aws.amazon.com/blogs/compute/using-amazon-api-gateway-as-a-proxy-for-dynamodb/ here's mapping { "tablename": "tablenamegoeshere", "item": { "id" : "$context.requestid" "eventname" : "$input.path('$.eventname')", "timestamp" : $input.path('$.timestamp'), "answers": "$util.parsejson($input.path('$.answers'))" } } update: did asked ... , worked if try add array of json objects gives me above same error - here's trying now. please - couldnt find on google well #set($inputroot = $input.path('$')) { "tablename": "answer", "item": {
Read more

asp.net - Problems sending emails from forum -

i have been redesigning site has message board, has been written guy looked after site. it has few problems , written in .asp , uses .mdb files database. you can see whole thing here . feel free post if helps, test thing have set using original files , new database. the basic problem when posts message, supposed email sent them, have posted it. when replies, originator supposed message, replier has been posted. i’d have thought @ point in process there should script/file in postmessage.asp? the postmessage.asp page below. <% option explicit %> <!-- #include virtual="common/adovbs.inc" --> <html> <head> <meta http-equiv="content-type" content="text/html; charset=windows-1252"> <meta name="generator" content="microsoft frontpage 4.0"> <meta name="progid" content="frontpage.editor.document"> <title>new page 2</title> <base target="_self"
Read more