mi dilema es que intento copiar unos archivos a la direccion E:\Archivos de programa\Microsoft Office\Office10 pormedio de codigo pero no me deja, pq segun parece no tengo permisos, pero si realizo esta accion x mi explorador si me deja - mi otro dilema es q estoy utilizando un control ocx que es un calendario en mis macros de excel pero hay equipos que no tiene este ocx como hiciera para que cuando un pc no tenga este ocx se lo puede instalar facilmentey registrarlo, gracias

Respecto a que no tengas permisos para copiar un fichero mediante código y sí los tengas para copiarlo desde el explorador de Windows, permíteme decirte que debes buscar cuál es la causa verdadera por la que no se realiza la copia, porque no encaja ese motivo de "falta de permisos"...

Una librería que no has instalado adecuadamente y que te resulta necesaria, puedes copiarla directamente en Windows\System32 y seguidamente registrarla ejecutando regsvr32.exe.

__________________
José María Movilla Cuadrado
______________________

Visual Basic Videos Programacion Foro Programacion
Tutoriales Programacion Trucos Programacion Codigos Programacion

este es el codigo que estoy utilizando para copiar el archivo en la ruta anteriormente mensionada, estoy trabajando sobre VBA de excel 2002

Private Sub CommandButton1_Click()
Dim fs, f, f1, f2, f3, f4, f5, s
Dim ruta As String
ruta = Application.ActiveWorkbook.Path
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFile(ruta & "\MSCAL.CNT")
f.Copy Application.Path
End Sub