Visualizzazione dei risultati da 1 a 3 su 3
  1. #1
    Utente di HTML.it
    Registrato dal
    Jan 2011
    Messaggi
    3

    Cerca valore in file excel chiusi e memorizzazione in file excel nuovo

    Ragazzi buongiorno, sono nuovo del forum e volevo se possibile una mano per completare questo codice che ricerca un valore in una determinata cella di vari file di excel riscrivendolo poi in unico file. il problema e che non so come aggiungere un istruzione che cicli anche tutti i fogli presenti nel file e ne riporti anche il nome del foglio in una ipotetica colonna c del nuovo file.
    Ecco il codice


    Private Sub CommandButton1_Click()
    On Error Resume Next
    folderspec = ("C:\Documents and Settings\Desktop\DPR Produzione\")

    Dim fs, f, Nomefile, Cartella
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set f = fs.GetFolder(folderspec)
    Set Cartella = f.Files
    Dim iRow, icol As Integer
    x = InputBox("Cella Obiettivo", "Dichiara la cella da prelevare")
    For Each Nomefile In Cartella
    iRow = 1
    icol = 1

    While Cells(iRow, icol).Value <> ""
    iRow = iRow + 1
    Wend
    Cells(iRow, icol) = Nomefile.Name
    Range("B" & iRow).Formula = "='" & folderspec & "[" & Cells(iRow, 1).Value & "]" & "Foglio1'!" & x & ""
    Next
    Set fs = Nothing
    Set Cartella = Nothing
    Set f = Nothing
    End Sub




    Graxie in anticipo

  2. #2
    Utente di HTML.it L'avatar di gibra
    Registrato dal
    Apr 2008
    residenza
    Italy
    Messaggi
    4,244
    Guarda che stai sbagliando completamente approccio.
    Il FileSystemObject non c'azzecca assolutamente nulla.
    In realtà sembra proprio che tu non abbia nemmeno la più pallida idea di cosa stai facendo.

    Cells, Range, etc.... sono oggetti di Excel quindi sono disponibili solo all'interno di Excel ovvero devi aprire il file in un ambiente VBA, o all'interno di Excel stesso, oppure in un ambiente di progettazione (come C#,VB.NET, VB6, ...) tramite l'automazione di Excel.


    Un file, in ogni caso, va prima aperto; cosa che il tuo codice non fa.


  3. #3
    Utente di HTML.it
    Registrato dal
    Jan 2011
    Messaggi
    3
    Ciao... grazi della risposta. pero scusa secondo te come dovrei fare? Perche il codice funziona. Ovviamente devo metterlo in un Modulo di Excel ma a me va bene anche cosi. Mi potresti per piacere aggiungere il codice che cicla tutti i fogli?
    Senno dimmi tu come dovrei fare. Grazie

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.