Atividade
 
Notifications
Clear all
Miguel 70
@miguel-70
Estimable Member
Entrou: jul 4, 2014
Last seen: maio 15, 2023
Tópicos: 54 / Respostas: 153
Responder
Re: Enviar email com Macro

Você pode enviar diretamente do Excel sem usar o Outlook. Esclarece mais a sua dúvida, enviar e-mail com macro, pelo que entendi vc quer enviar a pas...

9 anos atrás
Responder
Re: CRIAR MENU

Conseguir resolver. Obrigado

9 anos atrás
Tópico
9 anos atrás
Replies: 2
Views: 821
Responder
Re: Excluir Nome ListBox e Planilha

Ótimo amigo, obrigado. Resolvido.

9 anos atrás
Tópico
Replies: 2
Views: 775
Responder
Re: Formula para substituir macro

100% Patropi. Resolvido obrigado Mauro Coutinho pela dica

9 anos atrás
Responder
Re: Formula para substituir macro

Obrigado pela atenção, Minha planilha são acrescentados dados diário na coluna J, e gostaria de uma formula que pegasse a ultima célula da coluna J e ...

9 anos atrás
Tópico
Replies: 5
Views: 1031
Responder
Re: Macro para Salvar Como .xlsm

Sub Salva_Cópia_Planilha_Com_Macros() 'Excel 2010 On Error Resume Next Set objWS = CreateObject("WScript.Shell") ActiveWorkbook.Sav...

9 anos atrás
Responder
Re: Geração de relatorios

Não tenho conhecimento se é possível abrir no formato pdf sem primeiro ser salvo no pc. Veja os exemplos em anexo e modifique para te atender. Fico g...

9 anos atrás
Responder
Re: Geração de relatorios

Talvez seja porque a data esta em outro formato então da erro na pesquisa, toda pesquisa se baseia pela data. Segue modelo em anexo Ótica.rar

9 anos atrás
Responder
Re: Geração de relatorios

A linha de grade se baseá na ultima célula preenchida da ultima coluna

9 anos atrás
Responder
Re: Geração de relatorios

Apague tudo dentro do Userform depois Copie todo o código abaixo e cole dentro do userform1 'USERFORM1 Private Sub btExecutar_Click() Application.Scre...

9 anos atrás
Responder
Re: Geração de relatorios

Veja este modelo, gera relatório entre as duas datas e salva no formato PDF na área de trabalho, falta redefinir as margens. Ótica.rar

9 anos atrás
Responder
Re: Imprimir intervalo...

Também, Sub Imprimir() Range("a10:L" & Range("L" & Cells.Rows.Count).End(xlUp).Row).Select SendKeys "^{p}", True...

9 anos atrás
Página 9 / 14