Veja a resposta que dei conforme sua solicitação em outro forum : Alterando a TextBox -

Boa tarde!! Para zipar veja: Email: Att Desculpe a demora, semana de provas na faculdade.... Funcionou perfeito alexandre.. MUITO OBRIGADO!

Boa tarde!! Eu não sei se entendi.. =SOMARPRODUTO(($A$2:$A$8=DATA(ANO($A2);MÊS(DATA.VALOR(C$1&"1"));DIA($A2)))*($B$2:$B$...

Se entendi, a rotina abaixo cria 03 textbox no UserForm1, um abaixo do outro. Private Sub CommandButton2_Click() Dim chb As MSForms.TextBox ...

Boa tarde!! Infelizmente você não vai conseguir (até a versão 2010 assim eu penso), filtrar por cor (usando DUAS cores diferentes) por meio do operad...

Bom dia! Tente assim: =--SUBTOTAL(2;B$1:B2) Arraste até a linha final com dados. dONI

Concordo com O Reinaldo, aproveita e de uma olhada no link abaixo, tem todos os camandos e da para fazer uma simulação do código. SQL Tutorial

Tentar sem conhecer o banco de dados e complicado, mas experimente: SQL="SELECT Distinct or1.*, orv.dtvacina,orv.Vacinado FROM Origem inner join ...

Não sei se ainda tenho cópia daquele arquivo, mas a principio se é só referente a formatação para Moeda, siga a orientação da última mensagem do "...

Boa tarde rcelloni Baixe a planilha e veja se é isto que vc deseja: 14_06_16_Controle de Estoque_Patropi.zip Se foi útil, clique na mãozinha, que ...

Boa tarde!! Mesmo acrescentando essa linha? ThisWorkbook.Sheets.Copy After:=Workbooks(1).Worksheets(Workbooks(1).Worksheets&...

Se pesquisar no forum encontrara outros tópicos sobre o assunto : Formatar Listview para Moeda [Resolvido] viewtopic.php?t=9210&p=48363 []s

. rclone, sugiro que vc poste o arquivo, ou um modelo idêntico ... assim cada um não precisa montar um modelo para testar, e a resposta fica bem mais ...

Boa tarde!! Tente assim... Sub APAGAR() ' APAGAR Macro If WorksheetFunction.CountIf(Range("$D$2:$D$18"), "A PAGAR") >...