Rank: AiutAmico
Iscritto dal : 5/10/2010 Posts: 723
|
Ciao, in una macro, supponendo
Dim wbFr As Workbook Dim wsFr As Worksheet l'istruzione For Each wsFr In wbFr.Worksheets dovrebbe significare Per ciascun foglio delle cartelle (di TUTTE le cartelle) includendo quindi TUTTI i Workbooks aperti. C'è la possibilità di istruire in modo che l'impianto rimanga lo stesso, ma si escluda il primo Workbook (o meglio ancora un file specificato nell'istruzione) aperto? Per ciascun foglio delle cartelle (di TUTTE le cartelle), eccetto Workbooks("FILE1.xlsm") [il primo Workbook aperto]
Una precisazione: ciò che ho scritto sopra è l'assunto di uno che "sta imparando", quindi prego di leggere il tutto al condizionale. Grazie assai, buona giornata eZio
|
Rank: AiutAmico
Iscritto dal : 5/29/2003 Posts: 1,694
|
aetio ha scritto:Ciao, in una macro, supponendo
Dim wbFr As Workbook Dim wsFr As Worksheet l'istruzione For Each wsFr In wbFr.Worksheets dovrebbe significare Per ciascun foglio delle cartelle (di TUTTE le cartelle) includendo quindi TUTTI i Workbooks aperti. C'è la possibilità di istruire in modo che l'impianto rimanga lo stesso, ma si escluda il primo Workbook (o meglio ancora un file specificato nell'istruzione) aperto? Per ciascun foglio delle cartelle (di TUTTE le cartelle), eccetto Workbooks("FILE1.xlsm") [il primo Workbook aperto]
Una precisazione: ciò che ho scritto sopra è l'assunto di uno che "sta imparando", quindi prego di leggere il tutto al condizionale. Grazie assai, buona giornata eZio salve prova così': Dim wbFr As Workbook Dim wsFr As Worksheet For Each wbFr In Workbooks If wbFr.Name <> "FILE1.xlsm" Then For Each wsFr In wbFr.Worksheets 'quello che devi fare Next End If Next saluti Giap
|
Rank: AiutAmico
Iscritto dal : 5/10/2010 Posts: 723
|
Ciao, sei davvero u-ni-co. Funziona perfettamente, come sempre. Grazie infinite, buona giornata eZio
|