Configuração para O...
 
Notifications
Clear all

Configuração para Ordem de Serviço

5 Posts
3 Usuários
0 Reactions
1,301 Visualizações
(@filipeb)
Posts: 0
New Member
Topic starter
 

Estou com uma duvida de como faço para programar o sistema de emissão de O.S.
Exemplo: No sistema ele preenche os campos do que ele precisa , e automaticamente ele preenche na planilha os campos correspondentes, e queria que quando fosse salvar o arquivo salvasse em pdf.

Sei que é grande a programação e que não vão me dar de lambuja haha.
Mas se alguem tiver alguma ideia de como faz , eu tento!
Fico agradecido!

Usuário e senha da planilha:
Filipe
456456f

 
Postado : 14/12/2016 11:03 am
(@tnunes34)
Posts: 0
New Member
 

Pera, ficou meio confuso.
Você já tem os comandos para preencher na planilha? Ou só quer o comando para salvar em pdf?

 
Postado : 15/12/2016 1:46 pm
(@filipeb)
Posts: 0
New Member
Topic starter
 

So para salvar em pdf

 
Postado : 19/12/2016 5:42 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Bom dia!!

Veja:
https://cse.google.com.br/cse?cx=partne ... gsc.page=1

Att

 
Postado : 19/12/2016 6:03 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Veja se a rotina abaixo te ajuda:

Sub IMPPDF()
On Error Resume Next

Plan1.Select

    MeuDir = (ThisWorkbook.Path) & ""
    MeuNome = "TESTEGUIMA & " - " "
    'Format(Now, "DD-mm-yy")
    
Range("A2").Select
        
 Thisworkbook.("Plan1").ExportAsFixedFormat Type:=xlTypePDF, Filename:=MeuDir & MeuNome, Quality:= _
        xlQualityMinimum, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
        OpenAfterPublish:=True

Application.CutCopyMode = False

End Sub
 
Postado : 19/12/2016 6:54 am