Aggiornare files con riferiementi esterni

[Flash30005]

Il link per il download file non è più valido

ciao

[Tantocattivo]

Questo è il link aggiornato

http://www.filedropper.com/xlsxinglobati

Sono un padre e un figlio. Per mia comodità ho riportato tutti i dati del padre nel figlio invece di puntare direttamente.

[Tantocattivo]

io ci provo.... UP

[Anthony47]

Ci (ri)provo anche io:
"potresti fare il riepilogo di che cosa viene richiesto, cosi' non siamo costretti a riprendere dal primo messaggio e dalla prima risposta?"
Qualcosa pero' di piu' descrittivo di "ho tanti files figlio che pescano i dati da un file padre. Quello che voglio è un sistema automatico che dopo che ho compilato il padre, apre i figli e li salvi"

Ciao

[Tantocattivo]

Ciao grazie per il tuo tempo,
riassumo, spero meglio.
Ho un file (chiamiamolo padre) che compilo con i dati che mi servono, visivamente è una specie di form, dove si rispondono ad alcune domande del tipo: larghezza, altezza, profondità, accessori etc etc.
Poi ho tanti altri file (figli), ognuno legge il dato che gli interessa nel file padre e se lo copia usando per esempio la formula ='C:\Users\Nuova cabina\[Configuratore cabina.xlsx]Foglio1'!B33 .
Il programma che uso per disegnare in 3d, usa questi 40 fogli per creare le parti in funzione di quello che trova scritto.
Il problema è che se io compilo il padre e i figli sono chiusi, questi non si aggiornano e quando il mio programma di disegno li prende non li trova aggiornati e mi disegna la soluzione vecchia.
(per un motivo che non ti spiego per non complicare le cose, quando il mio programma di disegno apre il file excell non lo fa aggiornare, quindi i files devono essere aggiornati prima che lui li apra.)
Quindi, attualmente che faccio:
1- compilo il padre e lo lascio aperto
2- apro i quaranta file, li salvo e li chiudo.
3- Apro il mio programma di disegno e funziona tutto.

Quello che voglio io è cercare di fare automaticamente il passaggio 2

[Anthony47]

Allora si tratta di aprire uno dopo l'altro i figli e salvarli...
Per questo scopo potrai usare questa macro:

Codice: Seleziona tutto

Sub AllOpen()
Dim myPath As String, myCommon As String, myFile As String
'
myPath = "C:\Users\Utente1\Downloads\"         '<<< La directory che contiene i figli (con \ finale)
myCommon = "byPEPPE*.xls"                        '<<<** Vedi testo
'
myFile = Dir(myPath & myCommon)
Application.EnableEvents = False
Do
    If myFile = "" Then Exit Do
    Workbooks.Open myPath & myFile, UpdateLinks:=3
    ActiveWorkbook.Close savechanges:=True
    myFile = Dir
Loop
Application.EnableEvents = True
End Sub


Da excel: Alt-F11 per aprire l' editor delle macro; Menu /Inserisci /Modulo; copia il codice e incollalo nel frame di dx

Le righe marcate <<< vanno adattate alla tua situazione, i valori indicati sono quelli che ho usato io per il test.
In particolare con la riga marcata <<<** potrai filtrare i file da cercare indicando la parte iniziale del file, se comune a tutti i figli; questo ha senso se nella stessa directory ci sono altri file che invece vanno ignorati.
Se invece in quella directory ci sono solo i "figli" allora bastera' indicare "*.xls".

Quando serve manderai in esecuzione la Sub AllOpen: da Excel premi Alt-F8, scegli AllOpen dall' elenco che ti propone, premi Esegui.

Prova e fai sapere.