› Sviluppare funzionalita su Microsoft Office con VBA › Export foglio excel con riferimenti ad altri fogli
-
AutoreArticoli
-
Buongiorno
Premetto che ho creato 1 cartella di lavoro contenente 2 fogli... Il primo contenente i dati e i calcoli e il secondo con lo schema che è stato predisposto dall'ufficio personale a cui ho collegato i risultati dei calcoli relativi al primo foglio.
Ora, dovendo restituire per mail e in formato xlsx il secondo foglio all'uff. Personale completo di tutti i risultati, ma senza il foglio con i calcoli, c'è il problema che se salvo solo il secondo foglio, chi riceverà la mail nei risultati troverà l'errore RIF perché sicuramente non trova i collegamenti.
Si può creare una macro che cristallizza in fase di esportazione del secondo foglio, i collegamenti presenti convertendoli in numeri?
Grazie mille
ciao a tutti,
ciao essegi,
non hai allegato uno straccio di file che tu hai già, quindi aiutarti è un pò "difficoltoso":
se i dati che riporti nel foglio2 non sono molti, potresti usare l'incolla speciale valori.
Diversamente la soluzione diventa un pò più lunga da realizzare tramite vba, ma non impossibile.
Impossibile lo è certamente senza file, ed essendo un file da inviare all'ufficio del Personale,
con dati di fantasia e non reali.
Ciao
e buon lavoro
la soluzione diventa un pò più lunga da realizzare tramite vba
Bè dai, non molto lunga. Una riga di codice
Scusate, allego il file, anche se quello originale è molto più complesso nei calcoli, ma questo comunque rende l'idea.
Il risultato che devo ottenere, è l'estrazione del SOLO foglio "statistica" in formato XLSX con la conversione delle celle C9, C10 e C11, da collegamento a numero (ed è spiegato il perché nel primo post).
La cosa migliore, sarebbe una macro dove io posso aggiungere altri comandi per il salvataggio del file.
Grazie
Allegati:
You must be logged in to view attached files.ciao a tutti,
ciao essegi,
in allegato, la soluzione molto elementare per la prima parte del problema.
Per mancanza di tempo ti lascio proseguire per l'invio tramite mail del foglio "Statistica".
Se cerchi sul forum troverai sicuramente le indicazioni che ti servono.
Tieni conto che quanto ti propongo è elementare e consono al file elementare che hai postato:
se quello reale è più complesso, lo diventerà anche la soluzione.
Ciao
Frank
Allegati:
You must be logged in to view attached files.Soluzione davvero elementare, ma efficace!!!
Per il salvataggio del solo foglio "statistica" ci aggancio una macro che avevo utilizzato in precendenza.
Grazie mille
avresti potuto dirlo prima,
per fortuna non avendolo, non ho perso tempo per la mail.
grazie
Frank
Devo riaprire il post per risolvere un'anomalia relativa alla conversione delle celle C9, C10 e C11 da collegamento a numero e per il salvataggio del file.
Questa la macro (che non nego aver preso un po qua e un po la, cercando di assemblare le funzioni)
----------
Sub esporta()
Sheets("Scritture").Range("C9").Value = Sheets("Attività").Range("N9").Value
Sheets("Scritture").Range("C10").Value = Sheets("Attività").Range("N10").Value
Sheets("Scritture").Range("C11").Value = Sheets("Attività").Range("N11").Value
Sheets("Scritture").Range("C12").Value = Sheets("Attività").Range("N32").Value
Sheets("Scritture").Range("C13").Value = Sheets("Attività").Range("N12").Value
Sheets("Scritture").ActivateDim tb As Workbook
Dim wb As WorkbookSet tb = ThisWorkbook
Set wb = Workbooks.Addtb.Worksheets("Scritture").Copy
fpath = wb.Path & "\"
nomefile = ActiveSheet.Range("H1").Value & ".xlsx"
Application.Dialogs(xlDialogSaveAs).Show nomefile
ActiveWorkbook.Close SaveChanges:=False
End Sub--------
1. le celle vengono convertite in numero, ma anche nel file di origine i numeri sostituiscono i collegamenti e questo non deve accadere perché nel file originale devono rimanere i collegamenti al foglio attività
2. l'oggetto a cui è collegata la macro è e deve restare nel foglio Attività... a questo punto è necessario prendere come nome del file, la cella H1 del foglio attività (cosa che non accade) e poi procedere al salvataggio del foglio esportato ... cosa che non accade!!!
Allego il file per facilitare la risoluzione del problema
Allegati:
You must be logged in to view attached files. -
AutoreArticoli
