excel - Create UDF in VBA Generated Workbook -

-

i'm building application in vba parse machine generated file. part of project need convert machine format integers since fixed width columns don't accommodate negative numbers. used macro recorder parse text file:

workbooks.opentext filename:= _     *file name here*, origin:= _     437, startrow:=1, datatype:=xlfixedwidth, fieldinfo:=array(array(0, 2), _     array(6, 2), array(10, 2), array(14, 2), array(19, 2), array(25, 2), array(27, 2), array(34 _     , 2), array(39, 2), array(43, 2), array(44, 2), array(52, 2)), trailingminusnumbers:= _     true

but creates new workbook since it's opening new file. problem need run udf on final column converts fixed width value integer. example, suppose final column 0000000e , know e means last digit 5 , number negative. udf converts accordingly:

public function convertcodetointeger(inputstring string) long   if inputstring <> vbnullstring     select case right(inputstring, 1)         case "e" 'negative 5             convertcodetointeger = -1 * (left(inputstring, len(inputstring) - 1) & 5)          case else 'error case'             msgbox ("an error has occurred.")             end     end select else     convertcodetointeger = vbnullstring end if  end function  private sub testconvertcodetointeger()  debug.print convertcodetointeger("000001e")  end sub

but since file open in new workbook can't access udf. there easy way use vba make udf available new workbook? either directly copying function code new workbook's module using vba somehow or accessing original code? or there way open text file in current workbook instead?

this needs portable using personal workbook isn't option.

record macro , import text file using data->from text instead. import in current workbook.


Comments

Post a Comment

Popular posts from this blog

ruby - Trying to change last to "x"s to 23 -

-
i have been playing around irb , have string looks this: irb(main):072:0> puts ["[\"4354 5432 5432 xxxxx\", \"6547 6547 8543 xxxxx\", \"2344 6543 6674 xxxxx\", \"2346 6236 7543 xxxxx\", \"1273 5585 5587 xxxxx\"]"] => nil irb(main):073:0> what want gsub last 2 "x" s of each 17 digit combination, 23 . what i've tried far (i've been using rubular): a.gsub(/\d[x]/,"23") <= grabs "x" s i'm close a.gsub(/\w[x{2}]/,"23") <= grabs "x" s grabs two digits each combination. is there easier way i'm not understanding? a.gsub(/\d{4} \d{4} \d{4} xxx\kxx/, '23') \d{4} = 4 digits what \k drop matched far. can use don't replace entire number, still able validate have in desired format.
Read more

jquery - Clone last and append item to closest class -

-
this bare-bones code on page: <div class="list-container"> <div class="single-list-item"> <button>remove</button> </div> <div class="single-list-item"> <button>remove</button> </div> <div class="single-list-item"> <button>remove</button> </div> </div> <p><button class="add-list-item">add</button></p> <div class="list-container"> <div class="single-list-item"> <button>remove</button> </div> <div class="single-list-item"> <button>remove</button> </div> <div class="single-list-item"> <button>remove</button> </div> </div> <p><button class="add-list-item">add</button></p> <di...
Read more

css - Can I use the :after pseudo-element on an input field? -

-
i trying use :after css pseudo-element on input field, not work. if use span , works ok. <style type="text/css"> .mystyle:after {content:url(smiley.gif);} .mystyle {color:red;} </style> this works (puts smiley after "buu!" , before "some more") <span class="mystyle">buuu!</span>a more this not work - colors somevalue in red, there no smiley. <input class="mystyle" type="text" value="somevalue"> what doing wrong? should use pseudo-selector? note: cannot add span around input , because being generated third-party control. :after , :before not supported in internet explorer 7 , under, on elements. it's not meant used on replaced elements such form elements (inputs) , image elements . in other words it's impossible pure css. however if using jquery can use $(".mystyle").after("add smiley here"); api docs on .after to ...
Read more