Foglio Parametri

Hai un problema con Excel?

Nuova discussione

Foglio Parametri
di Seb (utente non iscritto) data: 12/05/2017 13:11:17
Buongiorno,
ho una macro che mi importa in excel due file txt o csv in due foglio diversi. Ora vorrei creare un foglio parametri dove indicare i percorsi dove reperire i due file di origine ma non funziona e si blocca alla prima riga.
Di seguito riporto il codice.

Grazie

Ecc_Arr = Range("B2").Value
SGNC_Arr = Range("B3").Value
Debug.Print Ecc_Arr
Debug.Print SGNC_Arr

    With ActiveSheet.QueryTables.Add(Connection:=Ecc_Arr, Destination:=Sheets(B - C - I - A - E).Range("$A$1"))
        .Name = "ritiri_sede"
        .FieldNames = True
        .RowNumbers = False
        .FillAdjacentFormulas = False
        .PreserveFormatting = True
        .RefreshOnFileOpen = False
        .RefreshStyle = xlInsertDeleteCells
        .SavePassword = False
        .SaveData = True
        .AdjustColumnWidth = True
        .RefreshPeriod = 0
        .TextFilePromptOnRefresh = False
        .TextFilePlatform = 850
        .TextFileStartRow = 1
        .TextFileParseType = xlFixedWidth
        .TextFileTextQualifier = xlTextQualifierDoubleQuote
        .TextFileConsecutiveDelimiter = False
        .TextFileTabDelimiter = True
        .TextFileSemicolonDelimiter = False
        .TextFileCommaDelimiter = False
        .TextFileSpaceDelimiter = False
        .TextFileColumnDataTypes = Array(1, 1, 1, 1, 1, 1, 1, 1, 1)
        .TextFileFixedColumnWidths = Array(5, 9, 14, 12, 13, 13, 7, 16)
        .TextFileTrailingMinusNumbers = True
        .Refresh BackgroundQuery:=False
    End With

di patel data: 13/05/2017 07:30:20
se non allegfhi un file di esempio come possiamo testare il tuo codice ?
Foglio Parametri
di Seb (utente non iscritto) data: 15/05/2017 10:41:53
Buongiorno, ho allegato il file di origine. Di seguito inoltre riporto il foglio Parametri con il percorso del file (Foglio:parametri - Cella B2).
Grazie

A B
1 File Percorso
2 Eccedenze in Arrivo \r2s1 mp itiri_sede.xls
di patel data: 15/05/2017 11:37:05
se ho capito bene occorrono due file, tu ne hai allegato uno
Foglio Parametri
di Seb (utente non iscritto) data: 15/05/2017 16:10:15
Ciao, si i file sono 2 ma il codice che ho scritto è riferito ad un solo file, quello allegato. Il secondo file viene importato allo stesso modo del primo (allegato) e poi tramite cerca.vert incrocia i dati. Se vuoi allego il secondo file ma il relativo codice non l'ho ancora scritto.

Seb

Vuoi Approfondire?