Acquista i nostri libri consigliati su Amazon.it
Discussione chiusa
Visualizzazione dei risultati da 1 a 6 su 6

excel 2007 VBA: leggere file presenti in una cartella zippata.

  1. #1
    L'avatar di Elimar
    Elimar non  in linea Scribacchino
    Buongiorno a tutti,
    ho un problema, ci hanno fornito in ufficio, un elenco di contratti scansionati e dei file csv contenente i link per "decodificare" tali file.

    Ho pensato di creare il seguente codice:

    Sub Auto_Open()
    Dim i As Integer
    
    Application.ScreenUpdating = False
    For i = 1 To 3
        Sheets(i).Select
        Range("B2").Select
        Do While ActiveCell <> Empty
            If ActiveCell.Style.Name = "Hyperlink" Then ActiveCell.Hyperlinks.Delete
            If ActiveCell.Offset(0, 3) <> Empty Then ActiveCell.Hyperlinks.Add ANCHOR:=ActiveCell, Address:=Application.ActiveWorkbook.Path & ActiveCell.Offset(0, 3).Value
            ActiveCell.Offset(1, 0).Select
        Loop
    Next
        Sheets(1).Select
    
    End Sub
    
    per inserire un collegamento ipertestuale nel cella B2 (nel primo caso) in modo che cliccando su B2 l'utente veda aprirsi il documento desisderato.

    Il mio problema il seguente:

    Il file formato cos:

    Cella A2 : una dicitura identificativa dei contratti
    cella B2 : Numero del contratto (cliccando questa cella si dovrebbe aprire il link)
    Cella C2 : un contatore dei contratti presenti nella directory incriminata
    Cella E2 : il link .... nel mio caso "\CN_2006\ANTO01.ZIP\ANTO01\DAT1\00000001.TIF"

    ora una volta che gira il codice posizionandomi si B2 leggo il seguente collegamento

    "C:\Antonveneta\CN_2006\ANTO01.ZIP\ANTO01\DAT1\000 00001.TIF"

    se copio questo link su "url" di una finestra di windows (passatemi il termine) mi apre il documento desiderato, se clicco sulla cella b2 mi da il seguente messaggio di errore:
    "Impossibile aprire il file specificato"

    Dove sbaglio???

    Lo so starete pensando: "a monte ostinandoti ad utilizzare il VBA", ma vi prego aiutatemi ....
    ℹ️ Leggi di pi su Elimar ...

  2. #2
    Prima di usare gli zip decomprimili in una cartella
    ℹ️ Leggi di pi su AntonioG ...

  3. #3
    L'avatar di Elimar
    Elimar non  in linea Scribacchino
    temevo che non fosse possibile leggerli senza decomprimerli.

    Grazie mille

    ab
    ℹ️ Leggi di pi su Elimar ...

  4. #4
    Semmai li puoi prima decomprimere con del codice VBA e dopo leggerli, ma non conviene.

    Sicuramente non puoi leggerli direttamente.
    ℹ️ Leggi di pi su AntonioG ...

  5. #5
    L'avatar di Elimar
    Elimar non  in linea Scribacchino
    scusate .... so che sto "trasgredendo" il regolamento ma indirettamente la cosa riguarda il codice di cui sopra.

    Oggi mi sono ritrovato office 2010.

    Facendo girare il codice su Excel 2010 a riga 65531 mi si blocca e mi da errore.

    Non riesco a capire a cosa possa essere dovuto il problema.

    Grazie a tutti per eventuali suggerimenti.
    ℹ️ Leggi di pi su Elimar ...

  6. #6
    Scusa Elimar ... a parte la faccenda del regolamento (che gi da sola ...), ma quando dici solamente "mi da errore" senza dire altro, come vuoi che gli altri ti possano dare un minimo di aiuto?

    Adesso ... questo thread viene chiuso. Creane un altro, indicando tutti i dettagli dell'errore, eventualmente inserendo un link a questa discussione.
    ℹ️ Leggi di pi su AntonioG ...

Discussione chiusa

Potrebbero interessarti anche ...

  1. Contare numero di file presenti in una cartella
    Da SILVIO nel forum Microsoft Access
    Risposte: 5
    Ultimo Post: 04-02-2018, 20:49
  2. Risposte: 3
    Ultimo Post: 05-06-2009, 23:19
  3. Risposte: 9
    Ultimo Post: 25-04-2008, 19:21
  4. leggere file di una cartella
    Da ketto85 nel forum Microsoft Word
    Risposte: 1
    Ultimo Post: 06-11-2005, 18:47
  5. Risposte: 4
    Ultimo Post: 29-08-2005, 18:32