excel VBA code not working -


i have excel sheet vba code follows

private sub worksheet_change(byval target range)     if target.row = 1 , target.column = 5         dim iret integer         if not isempty(range("az1").value)             iret = msgbox("you have selectd size template", _                           vbokonly, "select size template")             exit sub         end if          dim arr variant         arr = split(target, ",")         range("r14:az14").clearcontents         range("r14:az14").numberformat = "@"         range("r14", cells(14, ubound(arr) + 18)) = worksheetfunction.transpose( _                                         worksheetfunction.transpose(arr))         range("az1").value2 = target     end if end sub

i saved excel file .xlsm(macro enabled excel file) , opend in another.this code works fine in machine. not in other machine. enabled marco , allowed trust acess vba ojbect model. can figure out issue here . excel versions same in both mahcines enter image description here

i want elaborate bit comment of mine correct suggestion.

first, let me repeat that- need switch on events in way

application.enableevents = true

which can run once in immediate window in vba/ide editor. know it!

second, if decided switch on events using other subroutine (or event, strange) please keep in mind there other subroutines, functions or add-ins require events switched off. long not sure why events not working should keep them not working right after macro doesn't need them more. therefore, suggestion switch events off each time close file. therefore add event thisworkbook module:

private sub workbook_beforeclose(cancel boolean)     application.enableevents = false end sub

extra tip. best option read events status @ beginning, keep information until close file. in following steps:

a) declare public variables in file

public boeventsstatus boolean

b) read status when opening file (you need figure out put line of code)

boeventsstatus = application.enableevents

c) switch on events described @ beginning

d) use beforeclose event:

private sub workbook_beforeclose(cancel boolean)     application.enableevents = boeventsstatus end sub

Comments

Post a Comment

Popular posts from this blog

java.util.scanner - How to read and add only numbers to array from a text file -

i'm learning java , have question regarding reading file want read numbers file contains strings well. here example of file: 66.56 "3 java 3-43 5-42 2.1 1 and here coding: public class test { public static void main (string [] args){ if (0 < args.length) { file x = new file(args[0]); try{ scanner in = new scanner( new fileinputstream(x)); arraylist<double> test = new arraylist<>(); while(in.hasnext()){ if(in.hasnextdouble()){ double f=in.nextdouble(); test.add(f);} else {in.next();} } catch(ioexception e) { system.err.println("exception during reading: " + e); } } my problem add 66.56,2.1 , 1 doesn't add 3 after "3 or ignores 3-43 , 5-42 can tell me how skip strings , add doubles here? thanks all said 3 ie; "3, 3-43 , 4-42 strings either u read string , split , check number @ " , - or put in space between characters , integers. jvm after compilation tre...
Read more

rewrite - Trouble with Wordpress multiple custom querystrings -

i'm working on adding multiple querystring , doesn't seem work. i've found codes seems work others might i'm missing something. i want like: http://mydomain.com/board/?getyear=2013&getsometext2=sometext to http://mydomain.com/board/2013/sometext/ i added code below functions.php file. doesn't seem work should though. this works. echoing querystring gets both variable without problem. http://mydomain.com/board/2013/sometext/ but doesn't. tested querystring vis isset() seems nothing being set/get http://mydomain.com/board/2013/ function add_query_vars($vars) { $vars[] = "getyear"; $vars[] = "getsometext2"; return $vars; } add_filter('query_vars', 'add_query_vars'); function add_rewrite_rules($arules) { $anewrules = array('board/([^/]+)/([^/]+)/?$' => 'index.php?pagename=board&getyear=$matches[1]&getsometext2=$matches[2]'); $arules = $a...
Read more