vba - How to split a row into columns for every three columns in excel? -



vba - How to split a row into columns for every three columns in excel? -

in excel, how split row set of columns. info in a1 : g1 should in first row, a1: c1 same first row, d1: g1 should end of first row.this should go on till info in first row limited g1.

the info have like

b c d e ... ae af ag 1 ab 2013/01/12 2013/02/23 233 2013/02/24 2013/03/11 500 2 cd 2013/01/12 2013/02/23 233 2013/02/24 2013/03/11 343 . . 200 xx xxxx/xx/xx xxxx/xx/xx xx xxxx/xx/xx xxxx/xx/xx xxx

i need split into:

b c d e 1 ab 2013/01/12 2013/02/23 233 . . 1 ab 2013/02/24 2013/03/11 500 2 cd 2013/01/12 2013/02/23 233 . . 2 cd 2013/02/24 2013/03/11 343 . .

how can done in excel, tried writing vb script, didn't go anywhere. can please help me this.

ok, seems have 2 cells static id , name series of 3 cells show pattern of date,date,number. want bring right of first 2 cells repeating rows. should do.

sub split_and_stack() dim c long, r long, lc long, lr long dim ws1 worksheet, ws2 worksheet set ws1 = activesheet sheets.add after:=sheets(sheets.count) set ws2 = sheets(sheets.count) ws2.cells(1, 1).resize(1, 5) = array("id", "name", "start", "end", "number") ws1 lr = .cells(rows.count, 1).end(xlup).row lc = .cells(1, columns.count).end(xltoleft).column r = 1 lr c = 3 lc step 3 ws2.cells(rows.count, 1).end(xlup).offset(1, 0).resize(1, 2) = _ .cells(r, 1).resize(1, 2).value ws2.cells(rows.count, 1).end(xlup).offset(0, 2).resize(1, 3) = _ .cells(r, c).resize(1, 3).value next c next r end end sub

the next image may not show dates correctly should teh general idea. thought not provide ambiguous date transcribed either mm/dd/yy or dd/mm/yy when supplying sample data.

               

excel vba vbscript

Comments

Post a Comment

Popular posts from this blog

xslt - DocBook 5 to PDF transform failing with error: "fo:flow" is missing child elements. Required content model: marker* -

xslt - DocBook 5 to PDF transform failing with error: "fo:flow" is missing child elements. Required content model: marker* - i've inherited doc publishing process takes docbook , builds html , pdf output, using apache fop both. project had been started, never completed. lots of tweaking, i've able of doc sets build (20+), except handful, , fail severe code 1 of these 2 conditions: "fo:flow" missing kid elements. required content model: marker* "fo:block" not valid kid of "fo:root" the xml output comes out of docbook , docbook-fop checks out well-formed. the fop error in 1 book, "endecagloss", example, points end of string: <fo:flow flow-name="xsl-region-body" start-indent="4pc" end-indent="0pt"/> here’s log output in case: [java] severe: javax.xml.transform.transformerexception: file:/scratch/publishing/hudson/jobs/build-main-endeca-documentation/workspace/serverdoc/w...
Read more

mediawiki - How do I insert tables inside infoboxes on Wikia pages? -

mediawiki - How do I insert tables inside infoboxes on Wikia pages? - i want insert tables in infoboxes. example, have proteinbox i've developed using infobox template (http://health-and-medicine.wikia.com/wiki/template:proteinbox), , fasta field big fit comfortably in proteinbox. hence collapsible table within box. this tried: {{infobox | row 1 = {| class = "mw-collapsible mw-collapsed wikitable" |- | <!-- table content --> |} }} your problem is, putting nested table within template. pipe characters ( | ) in table syntax collides pipe usage in templates. the commonly used hack around create template called template:! , containing pipe character, , utilize when need set tables, parser functions or other stuff using pipe characters, within templates. table (with every | replaced {{!}} ): {{{!}} {{!}}- {{!}} a1 {{!}} b1 {{!}}- {{!}} a2 {{!}} b2 {{!}}} ...the equivalent of {| |- | a1 | b1 |- | a2 | b2 |} furthermore, hav...
Read more

Local Service User Logged into Windows -

Local Service User Logged into Windows - i created windows service tracks app server user connected through load balancer. it retrieves user logged windows on machine, cross references active directory (ad) business relationship homecoming first name, lastly name , e-mail (for notification through website created project) there 1 scheme on network users remote system, vista system, reason returning values "local service" logged machine, it's weird , security guys impossible "local service" business relationship logged windows. here how user logged windows managementscope ms = new managementscope("\\\\.\\root\\cimv2"); objectquery query = new objectquery("select * win32_computersystem"); managementobjectsearcher searcher = new managementobjectsearcher(ms, query); foreach (managementobject mo in searcher.get()) { _username = mo["username"].tostring(); } // remove domain part username string[] usernameparts = _...
Read more