Boa noite Poste a tua planilha num site como: ou depois cole o link ada planilha aqui no fórum. Veja se essa planilha de cartão de crédito que...

Não sei se entendi, mas experimente: Private Sub TextBox1_Change() Dim iRow As Long Dim ws As Worksheet Set ws = Worksheets("Plan1") tp = ...

ao encerrar o cadastramento, essa rotina precisa carregar os dados no listbox. Reexecute a rotina que carrega o list

...Tendo em vista que a pasta com as fotos do programa e o programa estão na mesma pasta... Experimente então: RHFOTO.Picture = LoadPicture(ThisW...

Não tenho certeza de haver entendido a demanda corretamente, experimente: Obs.: Utilza os dados da Plan2 diretamente 'Gerar o arquivo texto Private Su...

. Ao invés de comentário você pode colocar validação, esta fica fixa na célula!! ... Com a vantagem de você poder selecionar um grupo de células e col...

xlarruda Obrigado, Amigo! Obs: Como a coluna é a 5, o certo é: If ListView1.ListItems(I).ListSubItems(4).Text= "FIXO" Then Valeu!!!!!!

. "edcronos2 escreveu: =CÉL("endereço";G25) mostra $G$25 e pq =CÉL("endereço";G25:K30) não mostra $G$25:$K$30 ?" . Eu fa...

Boa noite! Se entendi bem é possível, sim. Se você tivesse anexado uma planilha de exemplo, digitando o resultado esperado, certamente a dúvida já te...

. OPS OPS OPS OPS !!! ... achei um erro ... respostando ... mude o "resolvido" para esta postagem .. .

. argenton, veja o que acha dessa ideia (uma coluna para cada Aba) ... ps: habilite o cálculo automático, ou aperte F9 ... .

. argenton, além de ser exigência das regras do fórum, se você postar o arquivo (ou um exemplo idêntico ao original) facilita o entendimento e a respo...

. Só passando uma dica muito útil ... . =ARRUMAR(A1) ... é bem diferente de ... =SUBSTITUIR($A1;" ";"") . Se você copiar estes n...

Cross Post https://gurudoexcel.com/forum/viewtopic.php?f=9&t=7938