http://ocotal.iarc.uaf.edu/index.php?action=history&feed=atom&title=Data_Split 2026-05-12T22:48:02Z Revision history for this page on the wiki MediaWiki 1.34.2 http://ocotal.iarc.uaf.edu/index.php?title=Data_Split&diff=476&oldid=prev 2008-03-12T20:30:16Z

<p></p> <table class="diff diff-contentalign-left" data-mw="interface"> <col class="diff-marker" /> <col class="diff-content" /> <col class="diff-marker" /> <col class="diff-content" /> <tr class="diff-title" lang="en"> <td colspan="2" style="background-color: #fff; color: #222; text-align: center;">← Older revision</td> <td colspan="2" style="background-color: #fff; color: #222; text-align: center;">Revision as of 20:30, 12 March 2008</td> </tr><tr><td colspan="2" class="diff-lineno" id="mw-diff-left-l1" >Line 1:</td> <td colspan="2" class="diff-lineno">Line 1:</td></tr> <tr><td class='diff-marker'>−</td><td style="color: #222; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div>Copy and paste the text in the box into the visual basic editor that comes with Excel.  To get access to personal.xls in the visual basic editor check out this article: [[<del class="diffchange diffchange-inline">Save_Macros_in_Excel</del>]]</div></td><td class='diff-marker'>+</td><td style="color: #222; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div>Copy and paste the text in the box into the visual basic editor that comes with Excel.  To get access to personal.xls in the visual basic editor check out this article: [[<ins class="diffchange diffchange-inline">Save Macros in Excel</ins>]]</div></td></tr> <tr><td class='diff-marker'> </td><td style="background-color: #f8f9fa; color: #222; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"></td><td class='diff-marker'> </td><td style="background-color: #f8f9fa; color: #222; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"></td></tr> <tr><td class='diff-marker'> </td><td style="background-color: #f8f9fa; color: #222; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>This short macro splits a cell (you can select all the rows you need to split and just run the macro once).  The split method splits based on tabs and commas.  If you want others (like spaces) or don't want tabs/commas then toggle the boolean variables in the macro.</div></td><td class='diff-marker'> </td><td style="background-color: #f8f9fa; color: #222; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>This short macro splits a cell (you can select all the rows you need to split and just run the macro once).  The split method splits based on tabs and commas.  If you want others (like spaces) or don't want tabs/commas then toggle the boolean variables in the macro.</div></td></tr> <tr><td colspan="2"> </td><td class='diff-marker'>+</td><td style="color: #222; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;"></ins></div></td></tr> <tr><td colspan="2"> </td><td class='diff-marker'>+</td><td style="color: #222; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;">Once you've added this macro to your library you may also find it useful to create a [[Tool Bar Button|menu button]] for it. </ins></div></td></tr> <tr><td class='diff-marker'> </td><td style="background-color: #f8f9fa; color: #222; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"></td><td class='diff-marker'> </td><td style="background-color: #f8f9fa; color: #222; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"></td></tr> <tr><td class='diff-marker'> </td><td style="background-color: #f8f9fa; color: #222; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>  Sub Data_Split()</div></td><td class='diff-marker'> </td><td style="background-color: #f8f9fa; color: #222; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>  Sub Data_Split()</div></td></tr> </table>

imported>Bob http://ocotal.iarc.uaf.edu/index.php?title=Data_Split&diff=475&oldid=prev 2008-03-12T20:05:40Z

<p></p> <p><b>New page</b></p><div>Copy and paste the text in the box into the visual basic editor that comes with Excel. To get access to personal.xls in the visual basic editor check out this article: [[Save_Macros_in_Excel]]<br /> <br /> This short macro splits a cell (you can select all the rows you need to split and just run the macro once). The split method splits based on tabs and commas. If you want others (like spaces) or don't want tabs/commas then toggle the boolean variables in the macro.<br /> <br /> Sub Data_Split()<br /> '<br /> ' This short macro does a tab and comma text to columns separation using<br /> ' tabs and commas.<br /> '<br /> Selection.TextToColumns Destination:=Range(&quot;A1&quot;), DataType:=xlDelimited, _<br /> TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _<br /> Semicolon:=False, Comma:=True, Space:=False, Other:=False, FieldInfo _<br /> :=Array(1, 1), TrailingMinusNumbers:=True<br /> End Sub</div>

imported>Bob