NomeCartella= "C:\Programmi"

pippo = Mid$(NomeCartella, 2)

pippo="\:Programmi"