Condividi:        

[Excel] separare il percorso dal file

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

[Excel] separare il percorso dal file

Postdi feno » 03/04/06 17:45

ciao
se nella cella A1 ho il seguente valore

D:\QUALITA'\SISTEMA QUALITA' AMBIENTE\Copie obsolete\Procedure\TEMP\Revisionate\PRO-COM-18_Riesame delle richieste contrattuali del prodotto non standard_attuale.doc

che in pratica è un percorso di un file che può variare come nidificazione di cartelle

e volessi mettere nella cella B1 il percorso e nella cella B2 il nome del file quale formula dovrei usare?
Cià

F@no
feno
Utente Senior
 
Post: 268
Iscritto il: 29/05/02 08:36
Località: Somewhere in Italy

Sponsor
 

Postdi archimede » 03/04/06 18:15

Codice: Seleziona tutto
Public Function NomeFile(rsFullPath As String) As String
    NomeFile = Dir(rsFullPath)
End Function
Quindi, in B2 =nomefile(A1) e in B1 =SINISTRA(A1;TROVA(B2;A1)-1).

HTH.

Alessandro
archimede
Moderatore
 
Post: 2851
Iscritto il: 07/11/02 12:41
Località: Genova

Postdi archimede » 03/04/06 18:17

Quanto sopra ammesso che il file sia davvero presente nella posizione indicata in A1.

Alessandro
archimede
Moderatore
 
Post: 2851
Iscritto il: 07/11/02 12:41
Località: Genova

Postdi feno » 04/04/06 07:49

nn funz... mi dà #NOME?

dove devo dichiararla?

a questo punto potrei proprio dichiararmi una funzione che fa un loop sul valore della cella e trova il valore \ mette quello che sta a sx di questo valore nella variabile percorso e quello che sta a dx nella variabile file...


Insomma qualcosa del genere....
Cià

F@no
feno
Utente Senior
 
Post: 268
Iscritto il: 29/05/02 08:36
Località: Somewhere in Italy

Postdi Alexsandra » 04/04/06 07:56

La Function di Archimede funziona,la mevi mettere in un modulo in VBA (ALT+F11 ed entri nel VB , Menù inserisci ,scegli modulo e incolli il codice di Archimede) Poi devi mettere il percorso completo con il nome file,funziona anche senza "nome file" a patto che tu metta la "\" e ti riporta il 1° file presente nel percorso
PS. Attento a non invertire le formule in B1 e B2
- Il primo fondamento della sicurezza non e' la tecnologia, ma l'attitudine mentale.

Win7 + Office 2003 Ita
Avatar utente
Alexsandra
Utente Senior
 
Post: 2358
Iscritto il: 09/01/06 20:31

Postdi archimede » 04/04/06 07:57

feno ha scritto:dove devo dichiararla?
A me funziona: tu dove l'hai dichiarata? :mmmh:

ALT-F11 --> Inserisci --> Modulo

Alessandro
archimede
Moderatore
 
Post: 2851
Iscritto il: 07/11/02 12:41
Località: Genova

Postdi feno » 04/04/06 08:28

ho creato questo codice che estrae il percorso anche se non esiste la dir sul pc.

Codice: Seleziona tutto
Public Function path(percorso As String) As String
 For i = 1 To Len(percorso)
  valore = Mid(percorso, i, 1)
  If valore = "\" Then
   path = Mid(percorso, 1, i)
  End If
 Next i
 
End Function


Spero possa tornare utile a qualcuno.

Ciao
Cià

F@no
feno
Utente Senior
 
Post: 268
Iscritto il: 29/05/02 08:36
Località: Somewhere in Italy

Postdi archimede » 04/04/06 09:41

Oppure:
Codice: Seleziona tutto
Public Function path(percorso As String) As String
   path = Mid(percorso, 1, InStrRev(percorso, "\", -1, vbTextCompare))
End Function


Alessandro
archimede
Moderatore
 
Post: 2851
Iscritto il: 07/11/02 12:41
Località: Genova


Torna a Applicazioni Office Windows


Topic correlati a "[Excel] separare il percorso dal file":


Chi c’è in linea

Visitano il forum: Nessuno e 83 ospiti