Olá,
Estou tendo dificuldades em possibilitar que outros usuários do sharepoint da equipe utilizem a macro devido ao local da planilha depender do usuário.
O principal objetivo da planilha é buscar dados em planilhas salvas em uma pasta no sharepoint, abrir, copiá-las, e colar em uma outra planilha final, ontem há todas as formulas e formatação dos relatorios diários.
Porém, como o caminho da pasta é vinculado a um usuário, no caso o meu usuário, quando outro usuário tenta usar o botão, ele recebe uma mensagem de erro, sendo "necessário" criar códigos com os usuários para cada integrante da equipe, o que não é nada prático.
Gostaria de saber se existe uma outra forma de fazer essa busca de dados, abrindo, copiando, colando e fechando planilhas salvas no sharepoint de forma que qualquer usuário possa rodar a macro com um unico código/botão.
Posso adicionar algum if no código para que, caso dê erro, ele tente novamente com outro nome de usuário? Ou existe algum caminho para essas pastas que não possui vinculo com usuário?
Segue exemplo do código:
Sub atualizar_planilha_SharepointMariana()
'Atualizar abas de dados
'abre planilha da pasta específica
Workbooks.Open"\C:\Users\usuário_01\nome_sharepoint\nome_pasta_equipe\nome_pasta_dados\nome_pasta_dados_Relatório01\nome_planilha01.xlsx"
Columns("A:N").Select 'ajuste
Columns("A:N").EntireColumn.AutoFit 'ajuste
Columns("A:N").Select 'seleciona
Selection.Copy 'copia
'Ativa planilha onde os dados serão colados
Windows("Relatório01.xlsm").Activate
'seleciona aba para atualizar
Sheets("nome\_aba01").Select
'seleciona primeira célula de dados
Range("A1").Activate
'cola dados atualizados na aba referida
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks \_
:=False, Transpose:=False
'fecha e salva a base de dados do dia
Workbooks("nome_planilha01.xlsx").Close SaveChanges = True
Ou seja, possuo outros usuários, usuário_02, usuário_03[, usuário_0[...], e gostaria que todos pudessem utilizar a mesma macro.
Obrigada!