up

Opa Patropi Segue em anexo a planilha. No caso gostaria de replicar a fórmula nas linhas de algum dia do calendário e exibir mais de um atividade par...

Consegui com o seguinte código: Sub print_select() ActiveWindow.RangeSelection.PrintOut End Sub Fica a dica para quem estiver com o mesmo ...

Obrigado Décio. Realmente funcionou no exemplo que você me passou, porém, fiz o mesmo no projeto que estou desenvolvendo e não funciona. E para pior...

decio Claro, segue o anexo

Opa Décio Obrigado pela resposta, mas o "problema" persiste. Se eu proíbo a célula com o link de ser selecionada o link fica inválido por m...

Opa galera. Obrigado a todos pela contribuição e troca de experiências. Consegui resolver da seguinte maneira: Sub AbrirNavegador() Dim browser As ...

Set browser = CreateObject("InternetExplorer.Application") Funcionou certinho, mas tem como mudar a linha acima e usar o navegador p...

No seguinte link tem um tutorial bem completinho e já configurado para envio através do servidor Gmail

Application.OnTime Now + TimeValue(Worksheets("Configurações").Range("C5").Text), "gravar" Funcionou certinho, Mestre....