paulocezarpicos

Caro Osvaldo, Não abandonei o tópico. Simplesmente não sei listar meus tópicos para que eu pudesse mudar para concluido, e segundo já resolvi sobre a ajuda solicitada e pensei que teria que abrir novo tópico para uma nova solicitação de ajuda. Quanto ao modo de impressão, quero imprimir do ListBox por causa do filtro. Diante do exposto, você pode me ajudar em relação ao postado no tópico abaixo: "Peço ajuda dos amigos pra um probleminha que estou enfrentando. Ao rodar um formulário (UserForm1) minha ListBox (listbox1) garrega todas as linhas, marco uma opção e lista normalmente, só que ao desmarcar a opção o listbox fica em branco, sem nenhum conteúdo. Se alguém puder me ajudar agradeceria."

Osvaldo, como seria??? De uma planilha pra imprimir na outra. Me oriente, por favor.

Um abraço Patropi. Isso mesmo. "o ideal é jogar os dados numa planilha para imprimir". Foi o que eu disse: ".....que imprimo com a planilha IMPRIMIR". O problema Patropi é que não consigo listar as 12 colunas no listbox como também não consigo imprimir as referidas 12 colunas através da planilha com nome "IMPRIMIR". Se alguém pudesse me ensinar a fazer esse filtro com checkbox. Ficaria assim: dois textbox e dois checkbox. O que você acha?? Fico no aguardo da ajuda dos senhores.

Galera, Me ajudem nessa parada. Tenho 12 colunas na planilha RELATORIO, mas só consigo carregar 10 colunas no listbox e também quando dou o comando de imprimir no listbox, não consigo imprimir nem as 10 colunas existente no listbox, que imprimo com a planilha IMPRIMIR. Obs.: Planilha em anexo. Agradeceria muito se alguém me ajudasse. Paulo Cezar. PLANILHA IEVG 10.zip

CasaDoHardware, Boa noite. Como ajudou, deu certo. Pra finalizar essa planilha (e eu preciso da sua boa vontade em me ajudar) só precisa duas coisa: 1º Primeiro fazer com que funcione esses dois filtros (data e banco) que já tentei exaustivamente, quando funciona um não funciona o outro, e eu que ria que funcionasse os dois ao mesmo tempo, e a outra coisa que eu nunca vou conseguir fazer é imprimir a planilha "imprimir" com o resultado do filtro do LISTBOX. Obs.: Planilha em anexo. Obrigado pela atenção e a grande ajuda que você está me dando. Paulo Cézar. PLANILHA IEVG - casadohardware.zip

CasaDoHardware, Lamento te decepcionar. Se você inserir nesse código abaixo mais um listbox com valor moeda e um combobox com valor texto, eu desenrolo, e fico muito grato: ........................................................................ Private Sub CommandButton1_Click() Dim w As Worksheet Dim ln As Long Dim valor As Currency Set w = Planilha1 ln = w.Range("A" & Rows.Count).End(xlUp).Offset(1, 0).Row valor = TextBox1.Value w.Cells(ln, 1).Value = valor TextBox1.Value = "" TextBox1.SetFocus End Sub Paulo Cezar ....................................................................................

Bom dia galera, Alguem me ajude nessa parada. Estou tentando há varias semanas gravar de uns textbox em uma planilha como valor moeda e não consigo. Ficaria grato se alguém me ajudasse. (Os textbox's estão no USERFORM1 e a planilha é a RELATORIO) Obs.: Planilha em anexo. Paulo Cezar. PLANILHA IEVG 2.zip

CasaDoHardware, Agora deu no grau, perfeito. Como faço pra botar como "resolvido?"

CasaDoHardware, Só não ficou 100% porque o foco ficou na coluna "C" da linha anterior, isto é, na linha 77 e não na linha 78 da coluna "C". Te agradeço pela paciência.

CasaDoHardware, Você tem razão, é devido as células mescladas nos títulos da planilha, ja corrigi isso. Só que vi agora que me expressei mal, não é selecionar a coluna "C" de cima abaixo. Deixa eu tentar ser o mais claro possível: quando estou digitando na linha 78, que é a que estou digitando no momento, ao clicar em sair no formulário CONTROLE DE OFICIO, a formula apaga as células E78, D78 e C78, parando o foco na célula C78. Minhas desculpas pela displicência.

CasaDoHardware, Fiz do jeito que você disse mas está selecionando toda a planilha ao invés da coluna "C". Obs.: Planilha em anexo. Correspondencias 2018 -1.2.zip

CasaDoHardware, Só pra planilha ficar no grau. Eu sei deixar o foco em determinada célula, mas não sei deixar o foco numa determinada coluna. Eu queria que quando eu clicasse em sair o foco ficasse na coluna "C". Pode ser??? Na certeza de sua ajuda, de já meus agradecimentos. Paulo Cézar.

Perfeito CasaDoHardware, ficou ótimo. Muito obrigado. Paulo Cezar.

Márcio, Você tem razão, era isso que estava dificultando mesmo. Gostaria que você me ajudasse em outra coisa. Me desculpe a minha incompetência, mas tentei de todas as maneiras alterar a formula abaixo pra apagar três as três colunas e não somente uma coluna como você fez e não consegui. Veja a formula abaixo: Private Sub cmd_exit_Click() Cells(lClient, 5).Select ( Eu queria que apagasse as colunas: 3, 4, 5) Selection.ClearContents Unload Me End Sub Faça isso pra mim, por favor. Paulo Cézar.

Márcio, Primeiro muito obrigado por atender minha postagem. Você atendeu 99%. Quando começo a inserção dos dados na coluna "C", toda a linha fica laranja, até ser preenchida a coluna "N", isto é, a obra ser concluída. Só que quando clico em sair (no frm_tradecontrols) apaga o alaranjado da coluna "E" e a célula fica protegida. Fora isso ficou beleza, supipa. Um abraço, Paulo Cezar.

Amigos, Tô precisando de vocês de novo. Queria incrementar numa planilha uma coisa que pra mim é um tanto quanto complexa. Temos uma planilha de controle de ofícios recebidos e eu queria que quando o usuário (uso a planilha em rede) inserir o nome do cliente na coluna "E" aparecesse uma caixa de diálogo dizendo que o nome de JOÃO DE JOSÉ DE SOUSA já tem tantas solicitações sem atendimento e perguntasse se deseja continuar ou não (consultando na coluna M os registros pendentes). Já tentei adaptar alguns códigos que encontrei na net, mas nada dá certo. Se vocês puderem me ajudar, ficaria grato. De já meus agradecimentos. Obs.: Planilha em anexo. Correspondencias 2018.zip

Patropi, Gostei do post, mas como fazer isso num form, tem como??? Paulo Cezar.

Galera, Precisa justamente desse letreiro. Será se alguem pode postar de novo???

CasaDoHardware, não sei se entendi a pergunta, mas, a rotina é "gravar_e_PDF()"

Caros amigos do fórum, Tô com um probleminha que com certeza vocês tiram de letra. É o seguinte, quando executo a macro diretamente ela funciona beleza, mas, quando uso a função CALL dá um erro. Se alguém puder me ajudar ficaria grato. Arquivo em anexo, De já agradecido, Paulo Cezar. Desligamentos Programados.zip

Senhores do Clube do Haardware, Agradeço a todos que tentaram me ajudar. Consegui com muito sofrimento desenrolar o código acima citado, mais uma vez muito obrigado a todos.

Caro Philipp Moreira, Agradecido por se dá ao trabalho de me auxiliar nesse trabalho. Só que tem um detalhe, na coluna "K" não tem nada e a coluna onde cita a UA PICOS é na coluna "F". Faça uma nova leitura pra ver se melhora. Mais uma vez, agradaecido Paulo Cezar.

Boa Tarde amigos do Clube do Hardware, Peço por favor que alguém comente esse código abaixo, estou precisando aplica-lo em outro projeto e não estou conseguindo. Segue código: Sub InsereNomesUAPICOS() Dim LR As Long, k As Long, m As Long, x As Long LR = Sheets("geral").Cells(Rows.Count, "L").End(xlUp).Row Sheets("Recebimento (2)").Range("B10:D27").ClearContents For m = 12 To 13 For k = 10 To LR If Application.CountIf(Sheets("Recebimento (2)").Columns(2), Sheets("geral").Cells(k, m)) < 1 _ And Sheets("geral").Cells(k, 3) = Date And Sheets("Geral").Cells(k, 6) = "UA PICOS" Then Sheets("Recebimento (2)").Cells(x + 10, 2) = Sheets("geral").Cells(k, m) x = x + 1 End If Next k Next m End Sub Para facilitar, estou enviando em anexo o arquivo. De já meus agradecimentos, Paulo Cezar. Desligamentos Programados nº 060-2017.zip

Obrigado galera, consegui resolver por aqui mesmo.

Meus Professores, Me ajudem. Estou há vários dias tentando terminar essa planilha e não consigo. É o seguinte: queria que ao dá um duplo click na linha do listbox1, constante no userform2, preenchesse o userform1. Outra coisa, estou achando que a contagem das linhas no listbox1 está meia doida, não está contando certo. Ficaria grato se vocês me ajudassem. De já meus agradecimentos, Paulo Cezar. Obs.: Planilha em anexo. Cadastramento de TRAFOS Substituidos - ListBox -05-maio.zip