Excel VBA - Making a macro valid for all worksheets in workbook -


i have workbook several sheets, (file1, file2, file3, etc), , i'm working on macro parse external file , paste contents in active worksheet. issue make pastestart below not specific work on any active worksheet, not file1, without specifying name. tried using sthg variable = activesheet.name runtime error 242.

sub import1()  dim wb1 workbook dim wb2 workbook dim sheet worksheet dim pastestart range   application.screenupdating = false set wb1 = activeworkbook set pastestart = [file1.c5]  filetoopen = application.getopenfilename _ (title:="please choose xliff parse", _ filefilter:="report files *.xlf (*.xlf),")  if filetoopen = false     msgbox "no file specified.", vbexclamation, "error"     exit sub else     set wb2 = workbooks.open(filename:=filetoopen)      each sheet in wb2.sheets         sheet.usedrange             .copy pastestart             set pastestart = pastestart.offset(.rows.count)         end     next sheet  end if wb2.close range("c5:l3146").select     selection.delete shift:=xltoleft     range("d6:d2337").select     selection.delete shift:=xltoleft     range("e6:g2307").select     selection.delete shift:=xltoleft end sub 

set pastestart = activesheet.range("a1")

should work.

also:

range("c5:l3146").select     selection.delete shift:=xltoleft     range("d6:d2337").select     selection.delete shift:=xltoleft     range("e6:g2307").select     selection.delete shift:=xltoleft

should like:

with pastestart.parent     .range("c5:l3146").delete shift:=xltoleft     .range("d6:d2337").delete shift:=xltoleft     .range("e6:g2307").delete shift:=xltoleft end

Comments

Post a Comment

Popular posts from this blog

apache - Remove .php and add trailing slash in url using htaccess not loading css -

i have add following code htaccess file removing .php extension , add trailing slash urls. worked fine reduced page loading speed , css code not loading @ all. pages ugly. please help rewriteengine on rewritebase / ## hide .php extension snippet # externally redirect /dir/foo.php /dir/foo rewritecond %{the_request} ^[a-z]{3,}\s([^.]+)\.php [nc] rewriterule ^ %1/ [r,l] # add trailing slash rewritecond %{request_filename} !-f rewritecond %{request_uri} !/$ rewriterule . %{request_uri}/ [l,r=301] # internally forward /dir/foo /dir/foo.php rewritecond %{request_filename} !-d rewritecond %{request_filename}.php -f rewriterule ^(.*?)/?$ $1.php [l] we can rewrite urls using .htaccess files. before writing in .htaccess files need verify kind of server using. can check server adding a <?php phpinfo(); ?> in php page. ensure mod_rewrite module enabled in apache server. can identified checking phpinfo included page. common methods used url rewriting follows ...
Read more

javascript - jQuery show full size image on click -

pretty self explanatory not workking . i want display full image when user click on image... yes know there tons of plugins but i want keep simple. any idea ? css : .full { display: none; width: 500px; height: 500px; margin-left: 100px; margin-top: -300px; position: fixed; background-color: #f00; z-index: 6; } .thumbnail { width: 50px; height: 50px; } html: <img class="thumbnail" src="http://4.bp.blogspot.com/-uhbdp2esxng/txneptvi92i/aaaaaaaaaky/upfqis7zto0/s1600/rihanna-wallpaper.jpg"> jquery: $(document).ready(function() { $('.thumbnail').on('click', function() { var img = $('<img />',{src:this.src,'class':'full'}); $('.full').html(img).show(); console.log('done!'); }); }); try looking how jquery works. $(document).ready(function() { $('.thumbnail').on('click', function(...
Read more