excel vba - Concatenate two selected cells and delete -


i have data in column 1000 rows of data. need concatenate 2 selected cells. example, data in user selected cells a10 & a11 gets concatenated in cell a10. after need clear content of cell a11.

the code below job of concatenation, , puts data in a10. not clear contents of a11 cell data. need clear a11 cell contents.

any appreciated.

option explicit sub mergestems()    dim colfirst long   dim collast long   dim joinedvalue string   dim rowcrnt long   dim rowfirst long   dim rowlast long      rowfirst = selection.row      rowlast = rowfirst + selection.rows.count - 1      colfirst = selection.column     collast = colfirst + selection.columns.count - 1      if colfirst <> 1 or collast <> 1       call msgbox("please select range within column ""a""", vbokonly)       exit sub     end if      worksheets("sheet1")      ' worksheet of choice.       joinedvalue = .cells(rowfirst, "a").value       rowcrnt = rowfirst + 1 rowlast         joinedvalue = joinedvalue & " " & .cells(rowcrnt, "a").value       next       .cells(rowfirst, "a").value = joinedvalue     end    end sub

add before "end with"

.cells(rowfirst + 1, 1).resize(selection.rows.count - 1, 1).clearcontents

note: dont miss out dot @ beginning

edit: try now. tested on pc , worked


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