ÿþ<html xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns="http://www.w3.org/TR/REC-html40" xmlns:ns0="http://schemas.microsoft.com/office/2004/12/omml"> <head> <meta http-equiv=Content-Type content="text/html; charset=unicode"> <meta name=ProgId content=Word.Document> <meta name=Generator content="Microsoft Word 11"> <meta name=Originator content="Microsoft Word 11"> <link rel=File-List href="SeznamSouboruVsechPodslozek_soubory/filelist.xml"> <title>Seznam vzorco seaitu</title> <!--[if gte mso 9]><xml> <o:DocumentProperties> <o:Author>Dell</o:Author> <o:LastAuthor>Deell</o:LastAuthor> <o:Revision>12</o:Revision> <o:TotalTime>141</o:TotalTime> <o:Created>2018-01-01T19:29:00Z</o:Created> <o:LastSaved>2018-01-10T09:13:00Z</o:LastSaved> <o:Pages>1</o:Pages> <o:Words>187</o:Words> <o:Characters>1108</o:Characters> <o:Lines>9</o:Lines> <o:Paragraphs>2</o:Paragraphs> <o:CharactersWithSpaces>1293</o:CharactersWithSpaces> <o:Version>11.5606</o:Version> </o:DocumentProperties> </xml><![endif]--><!--[if gte mso 9]><xml> <w:WordDocument> <w:Zoom>75</w:Zoom> <w:DisplayBackgroundShape/> <w:HyphenationZone>21</w:HyphenationZone> <w:PunctuationKerning/> <w:ValidateAgainstSchemas/> <w:SaveIfXMLInvalid>false</w:SaveIfXMLInvalid> <w:IgnoreMixedContent>false</w:IgnoreMixedContent> <w:AlwaysShowPlaceholderText>false</w:AlwaysShowPlaceholderText> <w:Compatibility> <w:BreakWrappedTables/> <w:SnapToGridInCell/> <w:WrapTextWithPunct/> <w:UseAsianBreakRules/> <w:DontGrowAutofit/> <w:SplitPgBreakAndParaMark/> <w:DontVertAlignCellWithSp/> <w:DontBreakConstrainedForcedTables/> <w:DontVertAlignInTxbx/> <w:Word11KerningPairs/> <w:CachedColBalance/> </w:Compatibility> <w:BrowserLevel>MicrosoftInternetExplorer4</w:BrowserLevel> <w:TrackMoves>false</w:TrackMoves> <w:TrackFormatting/> <w:DoNotPromoteQF/> <w:LidThemeOther>CS</w:LidThemeOther> <w:LidThemeAsian>X-NONE</w:LidThemeAsian> <w:LidThemeComplexScript>X-NONE</w:LidThemeComplexScript> <m:mathPr> <m:mathFont m:val="Cambria Math"/> <m:brkBin m:val="before"/> <m:brkBinSub m:val="--"/> <m:smallFrac m:val="off"/> <m:dispDef/> <m:lMargin m:val="0"/> <m:rMargin m:val="0"/> <m:defJc m:val="centerGroup"/> <m:wrapIndent m:val="1440"/> <m:intLim m:val="subSup"/> <m:naryLim m:val="undOvr"/> </m:mathPr> </w:WordDocument> </xml><![endif]--><!--[if gte mso 9]><xml> <w:LatentStyles DefLockedState="false" LatentStyleCount="156"> </w:LatentStyles> </xml><![endif]--> <style> <!--p.MSONORMAL {mso-style-unhide:no; mso-style-qformat:yes;} li.MSONORMAL {mso-style-unhide:no; mso-style-qformat:yes;} div.MSONORMAL {mso-style-unhide:no; mso-style-qformat:yes;} h2 {mso-style-unhide:no; mso-style-qformat:yes; mso-fareast-theme-font:minor-fareast;} a:link {mso-style-unhide:no;} span.MSOHYPERLINK {mso-style-unhide:no;} a:visited {mso-style-unhide:no;} span.MSOHYPERLINKFOLLOWED {mso-style-unhide:no;} p {mso-style-unhide:no;} p.MSOACETATE {mso-style-unhide:no;} li.MSOACETATE {mso-style-unhide:no;} div.MSOACETATE {mso-style-unhide:no;} span.NADPIS2CHAR {mso-style-unhide:no; mso-ascii-theme-font:major-latin; mso-fareast-theme-font:major-fareast; mso-hansi-theme-font:major-latin; mso-bidi-theme-font:major-bidi; mso-themecolor:accent1;} span.TEXTBUBLINYCHAR {mso-style-unhide:no;} .MSOCHPDEFAULT {mso-default-props:yes;} table.MSONORMALTABLE {mso-style-priority:99; mso-style-qformat:yes;} /* Font Definitions */ @font-face {font-family:Tahoma; panose-1:2 11 6 4 3 5 4 4 2 4; mso-font-charset:238; mso-generic-font-family:swiss; mso-font-pitch:variable; mso-font-signature:-520078593 -1073717157 41 0 66047 0;} @font-face {font-family:Cambria; panose-1:2 4 5 3 5 4 6 3 2 4; mso-font-charset:238; mso-generic-font-family:roman; mso-font-pitch:variable; mso-font-signature:-1610611985 1073741899 0 0 159 0;} /* Style Definitions */ p.MsoNormal, li.MsoNormal, div.MsoNormal {mso-style-parent:""; margin:0cm; margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:12.0pt; font-family:"Times New Roman"; mso-fareast-font-family:"Times New Roman";} h2 {mso-style-link:"Nadpis 2 Char"; mso-margin-top-alt:auto; margin-right:0cm; mso-margin-bottom-alt:auto; margin-left:0cm; mso-pagination:widow-orphan; mso-outline-level:2; font-size:18.0pt; font-family:"Times New Roman"; font-weight:bold;} a:link, span.MsoHyperlink {color:blue; text-decoration:underline; text-underline:single;} a:visited, span.MsoHyperlinkFollowed {color:purple; text-decoration:underline; text-underline:single;} p {mso-margin-top-alt:auto; margin-right:0cm; mso-margin-bottom-alt:auto; margin-left:0cm; mso-pagination:widow-orphan; font-size:12.0pt; font-family:"Times New Roman"; mso-fareast-font-family:"Times New Roman";} p.MsoAcetate, li.MsoAcetate, div.MsoAcetate {mso-style-link:"Text bubliny Char"; margin:0cm; margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:8.0pt; font-family:Tahoma; mso-fareast-font-family:"Times New Roman";} span.Nadpis2Char {mso-style-name:"Nadpis 2 Char"; mso-style-locked:yes; mso-style-link:"Nadpis 2"; mso-ansi-font-size:13.0pt; mso-bidi-font-size:13.0pt; font-family:Cambria; mso-ascii-font-family:Cambria; mso-fareast-font-family:"Times New Roman"; mso-hansi-font-family:Cambria; mso-bidi-font-family:"Times New Roman"; color:#4F81BD; font-weight:bold;} span.TextbublinyChar {mso-style-name:"Text bubliny Char"; mso-style-locked:yes; mso-style-link:"Text bubliny"; mso-ansi-font-size:8.0pt; mso-bidi-font-size:8.0pt; font-family:Tahoma; mso-ascii-font-family:Tahoma; mso-hansi-font-family:Tahoma; mso-bidi-font-family:Tahoma;} @page Section1 {size:841.9pt 595.3pt; mso-page-orientation:landscape; margin:70.9pt 70.9pt 70.9pt 70.9pt; mso-header-margin:35.45pt; mso-footer-margin:35.45pt; mso-paper-source:0;} div.Section1 {page:Section1;} --> </style> <!--[if gte mso 10]> <style> /* Style Definitions */ table.MsoNormalTable {mso-style-name:"Normální tabulka"; mso-tstyle-rowband-size:0; mso-tstyle-colband-size:0; mso-style-noshow:yes; mso-style-parent:""; mso-padding-alt:0cm 5.4pt 0cm 5.4pt; mso-para-margin:0cm; mso-para-margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:10.0pt; font-family:"Times New Roman"; mso-ansi-language:#0400; mso-fareast-language:#0400; mso-bidi-language:#0400;} </style> <![endif]--> <link rel=themeData href="SeznamVzorcu_soubory/themedata.thmx"> <link rel=colorSchemeMapping href="SeznamVzorcu_soubory/colorschememapping.xml"> <!--[if gte mso 9]><xml> <o:shapedefaults v:ext="edit" spidmax="9218"> <o:colormenu v:ext="edit" fillcolor="#fc9"/> </o:shapedefaults></xml><![endif]--><!--[if gte mso 9]><xml> <o:shapelayout v:ext="edit"> <o:idmap v:ext="edit" data="1"/> </o:shapelayout></xml><![endif]--> </head> <body bgcolor="#FFCC99" lang=CS link=blue vlink=purple style='tab-interval: 35.4pt'> <div class=Section1> <h2 align=center style='text-align:center'><span style='color:black'>VytvoYeni seznamu vaech souboro ve vaech podslo~kách<o:p></o:p></span></h2> <p class=MsoNormal>V&nbsp;rámci rozsáhlého projektu jsem potYeboval zpracovat stovky souboro umístných v&nbsp;mnoha podslo~kách. VytvoYil jsem tedy makro které nejdYív vypíae seznam vaech podslo~ek aktuální slo~ky do dynamického pole, potom na te seznam vaech souboro ze vaech podslo~ek, také do dynamického pole a výsledky ulo~í do textového souboru. Zatímco pou~ití makra je jednoduché, jeho vytvoYení trvalo mnoho hodin a pro zájemce uvádím v&nbsp;kódu podrobný komentáY zejména v&nbsp;proceduYe která vytvoYí seznam vaech podslo~ek</p> <p class=MsoNormal><o:p>&nbsp;</o:p></p> <p class=MsoNormal>Pokud chcete získat seznam vaech souboro umístných nejen v libovolné slo~ce ale i ve vaech jejích podslo~kách umístte do ní sta~ený soubor <b style='mso-bidi-font-weight:normal'>Vytvoreni seznamu vsech souboru vsech podslozek.xlsm</b>, otevYete ho a tla ítkem VytvoYení seznamu vaech podslo~ek a jejich souboro vytvoYíte seznam v souboru Protokol.txt. </p> <p class=MsoNormal><o:p>&nbsp;</o:p></p> <p class=MsoNormal>Musím upozornit, ~e pokud budete chtít vypsat obsah slo~ky v&nbsp;ní~ budou zapomenutí zástupci neexistujiících slo~ek, mo~e být program zastaven a oznámena tato situace. </p> <p class=MsoNormal>Po et souboro v&nbsp;poslo~kách jsem omezil do 1000, jinak zpracování trvá dlouho a dokonce mo~e po íta  zatuhnout.</p> <p class=MsoNormal><o:p>&nbsp;</o:p></p> <p class=MsoNormal><o:p>&nbsp;</o:p></p> <p><b style='mso-bidi-font-weight:normal'><span style='font-size:13.5pt; color:black'><a href="Vytvoreni%20seznamu%20vsech%20souboru%20vsech%20podslozek.xlsm">Sta~ení souboru</a></span></b><span class=MsoHyperlink><b style='mso-bidi-font-weight: normal'><span style='font-size:13.5pt'><o:p></o:p></span></b></span></p> <p><b style='mso-bidi-font-weight:normal'><span style='font-size:13.5pt; color:black'><a href="../index.php">Zpt na hlavní stránku</a></span></b><span class=MsoHyperlink><b style='mso-bidi-font-weight:normal'><span style='font-size:13.5pt'><o:p></o:p></span></b></span></p> <p class=MsoNormal><o:p>&nbsp;</o:p></p> </div> </body> </html>