zinhovba

Bom dia!! Use uma TD para retornar os dados desejados, agrupando por dia, ou algo assim Rótulos de Linha Soma de Moagem 28/04/2015 - 01/05/2015 44844200 02/05/2015 - 05/05/2015 35951390 06/05/2015 - 09/05/2015 30299330 10/05/2015 - 13/05/2015 11986050 14/05/2015 - 17/05/2015 55612540 18/05/2015 - 19/05/2015 16673640 Total Geral 195367150

Bom dia!! Eu te a conselho postar seu arquivo modelo!! Att

Boa tarde!! Tente... http://office.microsoft.com/pt-br/outlook-help/verificar-e-reparar-arquivos-de-dados-corrompidos-do-outlook-HA010075831.aspx http://www.bpiropo.com.br/tt20050113.htm http://www.baixaki.com.br/cats.asp?c=364 Att

Bom dia!! Poste seu código! Att

Bom dia!! Veja um exemplo generico.. Private Sub Worksheet_Calculate() Static OldVal1 As Variant If Range("E4").Value <> OldVal1 Then OldVal1 = Range("B42").Value Call Macro1 '..... End If End Sub Att

Bom dia!! Quer aprender mesmo sobre Worksheet Change Event? http://www.globaliconnect.com/excel/index.php?option=com_content&view=article&id=110:worksheet-change-event-excel-vba&catid=79&Itemid=475 http://dmcritchie.mvps.org/excel/event.htm Att

Bom dia!! Quando se usa Worksheet_Change, espera se que haja alguma alteração em um célula. Mas as formulas retornam resultado, para ter o efeito de mudança ou alteração em uma célula com formulas, usa se outros metodos. Leia: http://pplware.sapo.pt/pessoal/informatica/dicas-de-vba-%E2%80%93-eventos-em-excel/ Att

Bom dia !! Lembre se, caso dependa de um resultado de formula acione uma macro o evento para isso tem que ser o Evento Calculate. Att

Bom dia!!! Eu não entendi, porque não por mais um caso para E4?? Att

Bom dia!! Leia: http://www.ambienteoffice.com.br/officevba/referencias_e_bibliotecas/ http://www.linhadecodigo.com.br/artigo/565/adicionando-referencias-dinamicamente-no-vba.aspx Talvez possa ajuda-lo Att

Boa noite!! Será que o problema não porque tem alguma referência marcada como ausente, caso sim é só desmarcar! Att

Bom dia!! Leia também: http://www.davesexcel.com/selectapicture.htm Att

Bom dia!! Tente adaptar usando meu arquivo! Att

Boa noite!! mande seu arquivo!! Veja um modelo de como fazer isso http://www.4shared.com/office/yV819p2Y/MINUTA_DE_TRANSPORTEII.html

Bom dia!! Perdão mas eu não olhei sua rotina. Sendo assim você consegue criar uma ideia baseada no código abaixo? Private Sub Editar_Click() With Worksheets("SuaGuiaAqui").Columns(1) i = .Find(what:=TextBox4.Value, after:=.Cells(1), LookIn:=xlValues, LookAt:=xlWhole).Row j = i j = Cells.FindNext(after:=ActiveCell).Row UserForm5.TextBox4.Value = .Cells(j, 1).Value UserForm5.TextBox5.Value = .Cells(j, 2).Value UserForm5.TextBox6.Value = .Cells(j, 3).Value UserForm5.TextBox7.Value = .Cells(j, 4).Value UserForm5.TextBox8.Value = .Cells(j, 5).Value UserForm5.TextBox9.Value = .Cells(j, 6).Value UserForm5.TextBox10.Value = .Cells(j, 7).Value UserForm5.TextBox11.Value = .Cells(j, 8).Value UserForm5.TextBox12.Value = .Cells(j, 9).Value UserForm5.TextBox13.Value = .Cells(j, 10).Value UserForm5.TextBox14.Value = .Cells(j, 11).Value UserForm5.ComboBox1.Value = .Cells(j, 12).Value End With End Sub