Esta es una macro de Excel. Este código crea la carpeta "micarpeta" en la ubicación indicada. Quiero que, en lugar de micarpeta se cree una carpeta que lleve el nombre del texto que contiene la celda B7 de la hoja1 del libro abierto de Excel. Agradezco ayuda.
Sub Macro1()
Dim fs, f
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.CreateFolder("C:\Documents and Settings\Escritorio\micarpeta")
End Sub
