Il problema dei 3 corpi: Attraverso continenti e decadi, cinque amici geniali fanno scoperte sconvolgenti mentre le leggi della scienza si sgretolano ed emerge una minaccia esistenziale. Vieni a parlarne su TopManga.
 
Pagina precedente | 1 | Pagina successiva
Vota | Stampa | Notifica email     « Discussione Precedente | Lista | Discussione Successiva »
Autore

Elenco file in cartella con riferimento cella

Ultimo Aggiornamento: 16/11/2017 05:21
BG66
Post: 198
Registrato il: 13/12/2015
Città: MILANO
Età: 58
Utente Junior
2010
OFFLINE
15/11/2017 22:14
00#1
Ciao a tutti,
vorrei "semplicemente" che lo script andasse a prendere il percorso cartella in A6.
Attualmente sono io ad imporlo con: 
 mfolder = "C:\Users\Microsoft\Desktop\Progetti Excel\CreaMASTER\DICEMBRE\"

La macro completa è questa: 
Sub LeggeFileInDir() 
Dim strFile As String 
Dim r As Integer 
mfolder = "C:\Users\Microsoft\Desktop\Progetti Excel\CreaMASTER\DICEMBRE\" 
strFile = Dir(mfolder & "*.*") 
r = 11  
Do While strFile <> "" 
Cells(r, 1) = strFile 
strFile = Dir 
r = r + 1 
Loop 
End Sub


Se serve il file, provvedo immediatamente.

Grazie in anticipo
BG66
Excel 2010
alfrimpa
Post: 3.558
Registrato il: 21/06/2013
Città: NAPOLI
Età: 70
Utente Master
Excel 365
OFFLINE
15/11/2017 22:33
00#2
Gene mi meravigli [SM=g27828]

mfolder = Range("A6").Value

Alfredo
BG66
Post: 198
Registrato il: 13/12/2015
Città: MILANO
Età: 58
Utente Junior
2010
OFFLINE
15/11/2017 22:43
00#3
Ciao Alfredo,
avevo già provato ma non riesco a farlo funzionare [SM=g27833]

Gene
[Modificato da BG66 15/11/2017 22:45]
BG66
Excel 2010
rollis13
Post: 596
Registrato il: 16/08/2015
Città: CORDENONS
Età: 67
Utente Senior
Excel 2016-32bit Win11
OFFLINE
15/11/2017 22:45
10#4
Attenzione al separatore finale, o é già in cella A6 o da mettere nella macro.

______________________________________________________________
C'è chi fa le COSE a CASO e chi fa CASO alle COSE (Ignoto)
BG66
Post: 199
Registrato il: 13/12/2015
Città: MILANO
Età: 58
Utente Junior
2010
OFFLINE
15/11/2017 22:48
00#5
Ciao Rollis,
era proprio quello !!! [SM=g27816]

Come integro la macro?

Grazie
[Modificato da BG66 15/11/2017 22:51]
BG66
Excel 2010
alfrimpa
Post: 3.559
Registrato il: 21/06/2013
Città: NAPOLI
Età: 70
Utente Master
Excel 365
OFFLINE
15/11/2017 23:09
10#6
Se non lo metti in cella

mfolder = Range("A6").Value & "\"

Alfredo
BG66
Post: 200
Registrato il: 13/12/2015
Città: MILANO
Età: 58
Utente Junior
2010
OFFLINE
16/11/2017 05:21
00#7
[RISOLTO]
Grazie a tutti.

Alla prossima.
BG66
Excel 2010
Vota: 15MediaObject5,0027 2
Amministra Discussione: | Chiudi | Sposta | Cancella | Modifica | Notifica email Pagina precedente | 1 | Pagina successiva
Nuova Discussione
 | 
Rispondi
Cerca nel forum
Cerca
nei titoli, nei messaggi, con Google
Tag discussione
elenco file con riferimento cella
Discussioni Simili   [vedi tutte]
Feed | Forum | Bacheca | Album | Utenti | Cerca | Login | Registrati | Amministra
Tutti gli orari sono GMT+01:00. Adesso sono le 07:05. Versione: Stampabile | Mobile | Regolamento | Privacy
FreeForumZone [v.6.1] - Copyright © 2000-2024 FFZ srl - www.freeforumzone.com

  • Anteprima