Ola bom dia Este exemplo acredito que pode ti ajudar. Imprimi toda a planilha e seleção, alterando a configuração para imprimir seleção. Sub Imprimir...

Obrigado Edcronos, o esclarecimento foi muito útil para mim. Resolvido

Tente este código; Sub Salva() On Error GoTo debugs Set objWS = CreateObject("WScript.Shell") ActiveWorkbook.SaveCopyAs Filename&#...

Obrigado srobles, resolvido

'Este código não usa Outlook é direto do Excel, cole o código em um modulo. Sub EnviarEmail() 'VC pode usar HOTMAIL ou GMAIL, se gmail mude as duas c...

Sim reconheço. Tenho uma lista grande onde são acrescentados diariamente às verduras legumes e hortaliça, tudo em uma só lista. Então preciso saber o ...

Achei este código que quase me atende, Private Sub UserForm_Initialize() ListBox1.ColumnCount = 4 ListBox1.RowSource = "Plan1!A1:D40" ListBo...

Boa tarde, Vamos aguardar outro leitor com maior conhecimento do que eu para ti ajuda.

Mais um vez obrigado Mauro Coutinho, simplificou, todos os códigos estão guardado em minha coleção.

Genial, muitíssimo obrigado Mauro Coutinho. Resolvido.

Amigo obrigado pela ajuda, Não é o panejado, más não deixa de ser uma ideia nova. Para adaptar eu preciso de mudar muita coisa em meu projeto, mas agr...