Excel impazzito!!!!

[grace]

Ciao Ragazzi,
io sono nuova di quì, vorrei un aiuto.... (che domande)

dovrei aggiornate un file .xls che si trova in una cartella condivisa in rete, il mio metodo di aggiornamento è il ripescaggio di determinati dati presenti su altri file .xls che si trovano nella stessa cartella e che a me servono.
ho seguito la regola per aggiornare tali dati, da oggi quando vado a fare il mio solito aggiornamento Office automaticamente mi crea come un link di connessione tra il mio file di oggi ed un file dell'anno passato.

evidentemente o ho creato una connessione tra i due senza volerlo oppure si è creata in qualche modo visto che .xls ogni tanto fa questi giochetti.

esiste una procedura che mi scova tutti gli hyperlink esistenti e che mi consenta di disattivarli o cancellarli?

grazie mille ragazzi:

[Cricchia]

copia tutto il codice e inseriscilo in un modulo, esegui la macro "ListExternalFormulaReferences"; ti verrà creato un nuovo foglio dove troverai l'elenco di tutte le celle che contengono riferimenti esterni

Sub ListExternalFormulaReferences()
Dim ws As Worksheet, TargetWS As Worksheet, SourceWB As Workbook
    If ActiveWorkbook Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    With ActiveWorkbook
        On Error Resume Next
        Set TargetWS = .Worksheets.Add(Before:=.Worksheets(1))
        If TargetWS Is Nothing Then ' the workbook is protected
            Set SourceWB = ActiveWorkbook
            Set TargetWS = Workbooks.Add.Worksheets(1)
            SourceWB.Activate
            Set SourceWB = Nothing
        End If
        With TargetWS
            .Range("A1").Formula = "Sequence"
            .Range("B1").Formula = "Cell"
            .Range("C1").Formula = "Formula"
            .Range("A1:C1").Font.Bold = True
        End With
        For Each ws In .Worksheets
            If Not ws Is TargetWS Then
                ListLinksInWS ws, TargetWS
            End If
        Next ws
        Set ws = Nothing
    End With
    With TargetWS
        .Parent.Activate
        .Activate
        .Columns("A:C").AutoFit
        On Error Resume Next
        .Name = "Link List"
        On Error GoTo 0
    End With
    Set TargetWS = Nothing
    Application.ScreenUpdating = True
End Sub

ovviamente non è farina del mio sacco!

[grace]

scusa l'ignoranza.... me la fai più semplice?
per codice intendi il nome del file?come faccio a creare una macro?

in parole più spicciole???? non ne capisco nulla atrlimenti

però ti ringrazio tanto....

[Cricchia]

ok... allora copia tutto quello che sta tra "Sub..." e "End Sub"
apri il tuo file excel su cui devi trovare i collegamenti, menù Strumenti => Macro => Editor Visual Basic

ora, dall'editor vai dal menù Inserisci => Modulo e incolli il codice copiato prima

ora torna in excel, (chiudi pure l'editor senza problemi ), menù Strumenti => Marco => Macro... seleziona la macro "ListExternalFormulaReferences" e clicca su Esegui. Ti si creerà il foglio con tutti i tuoi collegamenti

se hai problemi: siamo qui

[grace]

perchè non trovo ESEGUI?

uffy
((((((

[Cricchia]

allora, non ti preoccupare...

se vai da Strumenti => Macro => Macro...
ti appare questa finestra:

[grace]

grazie mille........
))))))))

[Cricchia]

riuscita?

[grace]

si si....
ora te la dico tutta, il casino non l'avevo fatto io, ma una collega che con excel riesce a creare degli errori allucinanti!!!!
credimi, io lavoro nell'informatica e quello che riesce a creare lei è da genio!!!!
tu che lavoro fai???

[grace]

ragazzi quì l'errore contina a persistere!!!!
come faccio?