Vanderson Gonçalves

Boa noite galera! Estou com o seguinte "problema": Estou com este código para impressao,(Que inclusive foi nosso amigo Basole que me passou! Mais uma vez obrigado fera!), onde tenho a opção de selecionar a impressora. Porém quando a executo, idependente da opção,"ok"/"cancelar", ela executa a impressao, o que preciso é que se execute conforme opção selecionada. Espero que possam me ajudar. Segue o codigo: Sub imprimir_capa() ' imprimir_capa Macro Application.ScreenUpdating = False If Sheets("RATEIO SIMP.").[C12].Value = "" Then MsgBox "INSIRA A NUMERAÇÃO DGV" Else If Sheets("RATEIO SIMP.").[E13].Value = "" Then MsgBox "INSIRA A DATA DO DGV" Else Sheets(Array("CAPA", "RATEIO")).Select Sheets("CAPA").Activate Application.Dialogs(xlDialogPrinterSetup).Show ActiveWindow.SelectedSheets.PrintOut Copies:=1 Application.ScreenUpdating = True Sheets("RATEIO SIMP.").Select MsgBox "IMPRESSÃO COM SUCESSO!" Application.ScreenUpdating = True End If End If End Sub Está rodando tudo certinho... apenas não me dá a opção!

Fera descobri o erro, tinha alterado o "." do nome da planilha... por isso o erro de tempo de execução, "9". Muito obrigado!!!

Ave... ta díficil brother.. tá dando erro.. você vai ter que desenhar kkkk, Segue o passo a passo de como está! Sub imprimir_capa() ' ' imprimir_capa Macro Application.ScreenUpdating = False If RATEIO SIMP.[E14].value ="" then "O nome da planilha é "RATEIO SIMP." e a célula é "E14". Exit sub Else Sheets(Array("CAPA", "RATEIO")).Select Sheets("CAPA").Activate ExecuteExcel4Macro "PRINT(1,,,1,,,,,,,,2,,,TRUE,,FALSE)" Sheets("RATEIO SIMP.").Select Mgsbox "IMPRESSÃO COM SUCESSO!" Application.ScreenUpdating = True End Sub O que está errado? Erro de sintase no IF por diante!

Prezado Basole, Grato pela atenção, Desculpe meu nivel de ignorância, mais não sei como indexar tal comando dentro da macro criada. segue abaixo como está. Sub imprimir() ' ' imprimir Macro ' ' ExecuteExcel4Macro "PRINT(1,,,1,,,,,,,,2,,,TRUE,,FALSE)" End Sub Obs. Quanto a substituições do nome e célula da planilha eu consegui fazer.

Boa noite pessoal, Sou novo aqui no fórum e com excel também.... Então, tenho apanhado bastante. Preciso de uma ajuda com uma macro bem simples e sei que poderam me ajudar. O que preciso é de um código VBA com uma ou mais condições antes de executa-la, ex: Uma macro para imprimir (que já existe no caso em minha planilha), mais preciso que, esta macro só execute se tal celula não esteja vazia. Desde já agradeço a quem puder me ajudar. Fico no aguardo.