** NORMAS DEL FORO **
Inicio del foro Inicio del foro > Otros de Microsoft: Windows y Office > Excel
  Mensajes nuevos Mensajes nuevos RSS - acceder a una carpeta en sharepoint
  Preguntas frecuentes Preguntas frecuentes  Buscar en el foro   Eventos   Registro Registro  Iniciar sesion Iniciar sesion

acceder a una carpeta en sharepoint

 Responder Responder Página  12>
Autor
Mensaje
usuario222 Ver desplegable
Nuevo
Nuevo


Unido: 17/Noviembre/2021
Localización: Las Palmas de G
Estado: Sin conexión
Puntos: 18
Opciones de entrada Opciones de entrada   Gracias (0) Gracias(0)   Cita usuario222 Cita  ResponderRespuesta Enlace directo a este mensaje Tema: acceder a una carpeta en sharepoint
    Enviado: 17/Noviembre/2021 a las 13:07
Buenas, 
Quiero acceder a una carpeta en sharePoint utilizando un usuario y contraseña para subir un archivo a esa carpeta, pero me da un error en el método SaveAs. "Error en el métodoSaveAs".

Adjunto copia de parte del código

ruta = "https://sitiolcom.sharepoint.com/sites/Backupvehculo/Shared%20Documents/General/Copia/"
    ServerShare = "\\sitiocom.sharepoint.com\sites\Backupvehculo\Shared%20Documents\General\Copia"
    UserName = "xxxxx"
    password = "yyyyy"

    Set NetworkObject = CreateObject("WScript.Network")
    NetworkObject.MapNetworkDrive "", ruta, False, UserName, password

    nombrearchivo = Left(ThisWorkbook.Name, Len(ThisWorkbook.Name) - 5) & VBA.Format(VBA.Now, "_dd-mm-yyyy-hh:mm:ss")
            
    ActiveWorkbook.SaveAs filename:= _
        ruta & nombrearchivo & ".xlsm" _
        , FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
            
    
    Set NetworkObject = Nothing
Arriba
Mihura Ver desplegable
Administrador
Administrador
Avatar

Unido: 06/Mayo/2005
Localización: En la dehesa
Estado: Sin conexión
Puntos: 13990
Opciones de entrada Opciones de entrada   Gracias (0) Gracias(0)   Cita Mihura Cita  ResponderRespuesta Enlace directo a este mensaje Enviado: 17/Noviembre/2021 a las 13:15
Yo daría los siguientes pasos:
- en la ventana inmediato de Excel, lanzaría el comando SaveAs en una carpeta local del equipo hasta comprobar que furule como Dios manda
- una vez hecho esto, probaría con la ruta del SharePoint


Jesús Mansilla Castells.
Saludos desde Móstoles.

Access Aplicaciones
Tecsys.es
Arriba
usuario222 Ver desplegable
Nuevo
Nuevo


Unido: 17/Noviembre/2021
Localización: Las Palmas de G
Estado: Sin conexión
Puntos: 18
Opciones de entrada Opciones de entrada   Gracias (0) Gracias(0)   Cita usuario222 Cita  ResponderRespuesta Enlace directo a este mensaje Enviado: 17/Noviembre/2021 a las 13:18
Hola! Ya he intentado.
Si utilizo el método "SaveAs" con la ruta de sharepoint tambien me hace la copia si tengo acceso a esa carpeta.
El problema está en si otro usuario intenta realizar la copia que, como no tiene acceso a la carpeta, tengo que acceder (por código) a ella previamente y luego hacer la copia (save As). Esto es lo que no consigo que funcione y no me pone un error específico que yo pueda intentar arreglar.
Arriba
Mihura Ver desplegable
Administrador
Administrador
Avatar

Unido: 06/Mayo/2005
Localización: En la dehesa
Estado: Sin conexión
Puntos: 13990
Opciones de entrada Opciones de entrada   Gracias (0) Gracias(0)   Cita Mihura Cita  ResponderRespuesta Enlace directo a este mensaje Enviado: 17/Noviembre/2021 a las 13:41
Lo que tienes que solventar es el problema de los permisos, para ello lo mejor es que te pongas en la barra de direcciones del explorador y empieces a trastear con el formato adecuado, para que a ese usuario le deje 'ver' la carpeta ... una vez lo tengas ya puedes 'clavar' la dirección en el VBA de Excel.


Jesús Mansilla Castells.
Saludos desde Móstoles.

Access Aplicaciones
Tecsys.es
Arriba
usuario222 Ver desplegable
Nuevo
Nuevo


Unido: 17/Noviembre/2021
Localización: Las Palmas de G
Estado: Sin conexión
Puntos: 18
Opciones de entrada Opciones de entrada   Gracias (0) Gracias(0)   Cita usuario222 Cita  ResponderRespuesta Enlace directo a este mensaje Enviado: 17/Noviembre/2021 a las 13:48
El problema está en que yo quiero que entren con mi usuario y contraseña en esa carpeta, para que fuera del excel solo yo pueda acceder a ella y los demás solo puedan "acceder" sin darse cuenta al ejecutar esos comandos. Por eso tengo que acceder con código.
Arriba
Mihura Ver desplegable
Administrador
Administrador
Avatar

Unido: 06/Mayo/2005
Localización: En la dehesa
Estado: Sin conexión
Puntos: 13990
Opciones de entrada Opciones de entrada   Gracias (0) Gracias(0)   Cita Mihura Cita  ResponderRespuesta Enlace directo a este mensaje Enviado: 17/Noviembre/2021 a las 13:52
Se puede acceder con formato especifico, en la línea del explorador se pone algo así como:

Ruta@password\contraseña

o algo parecido. Tendrás que hacer las pruebas con un equipo que no esté autorizado hasta que lo consigas, o bien quitas momentáneamente tu autorización.

Ya te advierto que entrar así al sharepoint es una ñoca, además de un agujero de seguridad, en realidad empresas grandes lo tienen 'capado', obligan al 'mapeo' de unidades por tema de seguridad.




Jesús Mansilla Castells.
Saludos desde Móstoles.

Access Aplicaciones
Tecsys.es
Arriba
usuario222 Ver desplegable
Nuevo
Nuevo


Unido: 17/Noviembre/2021
Localización: Las Palmas de G
Estado: Sin conexión
Puntos: 18
Opciones de entrada Opciones de entrada   Gracias (0) Gracias(0)   Cita usuario222 Cita  ResponderRespuesta Enlace directo a este mensaje Enviado: 17/Noviembre/2021 a las 14:02
Ya intento realizar el mapeo con el método:

NetworkObject.MapNetworkDrive "Z:", ServerShare, False, UserName, password

Ahora por ejemplo me salta este error cuando sí tengo el usuario registrado:

Arriba
usuario222 Ver desplegable
Nuevo
Nuevo


Unido: 17/Noviembre/2021
Localización: Las Palmas de G
Estado: Sin conexión
Puntos: 18
Opciones de entrada Opciones de entrada   Gracias (0) Gracias(0)   Cita usuario222 Cita  ResponderRespuesta Enlace directo a este mensaje Enviado: 17/Noviembre/2021 a las 14:03
Arriba
usuario222 Ver desplegable
Nuevo
Nuevo


Unido: 17/Noviembre/2021
Localización: Las Palmas de G
Estado: Sin conexión
Puntos: 18
Opciones de entrada Opciones de entrada   Gracias (0) Gracias(0)   Cita usuario222 Cita  ResponderRespuesta Enlace directo a este mensaje Enviado: 17/Noviembre/2021 a las 14:04
"Se ha producido el error '-2147023652(800704dc) en tiempo de ejecución:
No se autenticó la operación solicitada porque el usuario no ha sido autenticado."
Arriba
Mihura Ver desplegable
Administrador
Administrador
Avatar

Unido: 06/Mayo/2005
Localización: En la dehesa
Estado: Sin conexión
Puntos: 13990
Opciones de entrada Opciones de entrada   Gracias (0) Gracias(0)   Cita Mihura Cita  ResponderRespuesta Enlace directo a este mensaje Enviado: 17/Noviembre/2021 a las 15:15
En el explorador, algo así como:

http(s)://username:password@server/resource.ext


Jesús Mansilla Castells.
Saludos desde Móstoles.

Access Aplicaciones
Tecsys.es
Arriba
Mihura Ver desplegable
Administrador
Administrador
Avatar

Unido: 06/Mayo/2005
Localización: En la dehesa
Estado: Sin conexión
Puntos: 13990
Opciones de entrada Opciones de entrada   Gracias (0) Gracias(0)   Cita Mihura Cita  ResponderRespuesta Enlace directo a este mensaje Enviado: 17/Noviembre/2021 a las 15:19
No abras hilos nuevos, sigue con este.
Jesús Mansilla Castells.
Saludos desde Móstoles.

Access Aplicaciones
Tecsys.es
Arriba
usuario222 Ver desplegable
Nuevo
Nuevo


Unido: 17/Noviembre/2021
Localización: Las Palmas de G
Estado: Sin conexión
Puntos: 18
Opciones de entrada Opciones de entrada   Gracias (0) Gracias(0)   Cita usuario222 Cita  ResponderRespuesta Enlace directo a este mensaje Enviado: 17/Noviembre/2021 a las 15:23
Perdón, era porque ya en el "SaveAs" no está el error. Lo que intento es acceder a la carpeta.

Probé poner la ruta como me dijiste: ruta = " http(s)://xxx.xxx@xx.xxx:yyyy@xxx.sharepoint.com/sites/Backupvehculo/Shared%20Documents/General/Copia.ext"


Pero nada. Se me ejecuta todo y no me salta ningún error pero no me hace la copia



Arriba
Mihura Ver desplegable
Administrador
Administrador
Avatar

Unido: 06/Mayo/2005
Localización: En la dehesa
Estado: Sin conexión
Puntos: 13990
Opciones de entrada Opciones de entrada   Gracias (0) Gracias(0)   Cita Mihura Cita  ResponderRespuesta Enlace directo a este mensaje Enviado: 17/Noviembre/2021 a las 15:41
Probablemente tengas que hacerlo con FTP.

Jesús Mansilla Castells.
Saludos desde Móstoles.

Access Aplicaciones
Tecsys.es
Arriba
usuario222 Ver desplegable
Nuevo
Nuevo


Unido: 17/Noviembre/2021
Localización: Las Palmas de G
Estado: Sin conexión
Puntos: 18
Opciones de entrada Opciones de entrada   Gracias (0) Gracias(0)   Cita usuario222 Cita  ResponderRespuesta Enlace directo a este mensaje Enviado: 17/Noviembre/2021 a las 15:50
De acuerdo investigaré como hacerlo por FTP.
¡Muchas Gracias!
Arriba
Juanmasp Ver desplegable
Habitual
Habitual


Unido: 21/Abril/2006
Estado: Sin conexión
Puntos: 118
Opciones de entrada Opciones de entrada   Gracias (0) Gracias(0)   Cita Juanmasp Cita  ResponderRespuesta Enlace directo a este mensaje Enviado: 18/Noviembre/2021 a las 14:45
Hola, solo un comentario, cuando generas el nombre del Archivo, en esta parte VBA.Format(VBA.Now, "_dd-mm-yyyy-hh:mm:ss")  creo que el carácter ':' no está permitido.

Puede que no te deje por eso.

Saludos.
Arriba
 Responder Responder Página  12>
  Compartir tema   

Ir al foro Permisos de foro Ver desplegable