Aprende en Comunidad
Avalados por :
Como ativar a guia Desenvolvedor no Excel para usar o LibreOffice com o SAP B1
- Creado 01/03/2024
- Modificado 01/03/2024
- 30 Vistas
0
Cargando...
Bom dia,
Agradeço muito a ajuda do post de charles.jenkins , sem ele não teria conseguido usar o LibreOffice com o SAP B1.
Este documento explica passo a passo como inserir o código em Visual Basic explicado no post AutoOpen.xls e LibreOffice ou OpenOffice criado pelo autor acima.
É necessário fazer as alterações usando Excel (usei o Excel 2013 para explicar a alteração do arquivo).
1) Ativando a guia Desenvolvedor.
- Abra o Excel.
- Clique em Arquivo .
- Clique em Opções .
- Clique em Personalizar Faixa de Opções .
- Em Personalizar Faixa de Opções e em Guias Principais , marque a caixa de seleção Developer .
http://office.microsoft.com/pt-br/excel-help/mostrar-a-guia-desenvolvedor-HA101819080.aspx
Será ativada uma guia chamada Desenvolvedor.
2) Alterando o AutoOpen.XLS
- Abra o arquivo AutoOpen.XLS no Excel
- Pressione a guia Desenvolvedor, Exibir Código
- Clique duas vezes no Module2, será apresentado o código em Visual Basic que faz a abertura do arquivo texto exportado pelo SAP.
Rotina Original.
- Substitua o código fonte inteiro pelo código abaixo, podemos ver que foi criada uma nova sub-rotina para abertura do LibreOffice
Public Sub OpenExlFile(ExcelPath As String)
Attempt1:
On Error GoTo Fail1
' Assume we're running Microsoft Excel
' Inicio: Rotina original
Workbooks.OpenText FileName:=ExcelPath, _
Origin:=xlWindows, StartRow:=1, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, Semicolon:=False, Comma:=False, Space:=False, Other:""", FieldInfo:Array("1", "2", "3", "4")
End Sub
Pedro Pascal
Se unió el 07/03/2018
Facebook
Twitter
Pinterest
Telegram
Linkedin
Whatsapp
Sin respuestas
No hay respuestas para mostrar
Se el primero en responder
contacto@primeinstitute.com
(+51) 1641 9379
(+57) 1489 6964
© 2024 Copyright. Todos los derechos reservados.
Desarrollado por Prime Institute
Hola ¿Puedo ayudarte?