Home › Forum › Domande su Excel VBA e MACRO › Copiare serie di dati con valore chiave in altro file e rinominare › Rispondi a: Copiare serie di dati con valore chiave in altro file e rinominare
Riferirò….lassù…
<!– [if gte mso 9]><xml>
<w:WordDocument>
<w:View>Normal</w:View>
<w:Zoom>0</w:Zoom>
<w:HyphenationZone>14</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:Compatibility>
<w:BrowserLevel>MicrosoftInternetExplorer4</w:BrowserLevel>
</w:WordDocument>
</xml><![endif]–><!– [if gte mso 9]><xml>
<w:LatentStyles DefLockedState=”false” LatentStyleCount=”156″>
</w:LatentStyles>
</xml><![endif]–><!– [if gte mso 10]>
<style>
/* Style Definitions */
table.MsoNormalTable
{mso-style-name:”Tabella normale”;
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]–>
Una novità:
<p class=”MsoNormal”>Ho processato circa 200 file e sono andati tutti bene …tranne uno!!</p>
<p class=”MsoNormal”>Questo file ha la sola particolarità di essere lunghissimo e quindi succede che quando va ad incollare, arriva all’ultima colonna disponibile di Excel (Colonna IV) delle 256…. sul file Report.xls e va in errore!!</p>
<p class=”MsoNormal”>Per ora ho risolto.. sdoppiando in due il file originario…</p>
<p class=”MsoNormal”>A meno che non si possa aggiungere al codice una istruzione che, arrivato all’ultima colonna disponibile, vada “ a capo” riprendendo ad incollare dalla Cella G22</p>
Che dici?
ciao
aqquila2