Notifications
Clear all

Deixando a Célula em modo de edição via MACRO

10 Posts
3 Usuários
0 Reactions
1,264 Visualizações
Kaleo_rs
(@kaleo_rs)
Posts: 0
Trusted Member
Topic starter
 

Boa tarde,

Pessoal criei uma MACRO que localiza e seleciona a última célula vazia de uma coluna especifica, e ao tentar atribuir um texto inicial tipo "PEDIDO N. ", não consigo deixar a célula em modo de edição, ou seja, ela fica selecionada e ao digitar o número do pedido o Excel apaga o texto inserido pela MACRO.

Portanto, preciso selecionar a célula, inserir um texto inicial e o cursor ativo dentro da célula para permitir a continuação da digitação do resto da informação.

 
Postado : 13/04/2016 2:42 pm
(@mprudencio)
Posts: 2749
Famed Member
 

Pq nao coloca o numero do pedido em outra celula, ou insere o numero do pedido automaticamente

Esse codigo gera um contador automatico para a celula A1

Sub Contador()

Range("A1").Value = Range("A1").Value
Range("A1").Value = Range("A1").Value + 1

End Sub

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 13/04/2016 3:04 pm
Kaleo_rs
(@kaleo_rs)
Posts: 0
Trusted Member
Topic starter
 

Não é um contador automático que preciso.

Essa numeração é fornecida pelo pedido gerado em um sistema.

 
Postado : 13/04/2016 3:17 pm
(@mprudencio)
Posts: 2749
Famed Member
 

Mais facil ainda basta declarar uma variavel para receber o numero do pedido e lançar direto na planilha.

Pq deixar editavel acho que nao acontece.

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 13/04/2016 3:26 pm
Kaleo_rs
(@kaleo_rs)
Posts: 0
Trusted Member
Topic starter
 

Sim, entretanto a estrutura que a planilha foi concebida eu teria que alterar muitas coisas já desenvolvida no VB.

 
Postado : 13/04/2016 3:50 pm
(@mprudencio)
Posts: 2749
Famed Member
 

Nao entendi qual a dificuldade

Adeque o codigo a planilha

Sub suamacro()

dim cont as intenger

cont = informação retirada do sistema

range ("A1").value = "Pedido Nº" & " " & cont

seu codigo

end sub

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 13/04/2016 4:18 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Não é um contador automático que preciso.

Essa numeração é fornecida pelo pedido gerado em um sistema.

O ideal seria ter mais detalhes e se possivel um modelo de como são efetuados os passos, então pelo que entendi, montei um modelo, onde ao ser executado a macro, é exibido um imputbox para se digitar o numero do pedido depois localiza a ultima celula vazia na coluna "A" e insere o texto mais o numero digitado.

Veja se é isto :
Manter texto mais o numero pedido

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 13/04/2016 6:50 pm
Kaleo_rs
(@kaleo_rs)
Posts: 0
Trusted Member
Topic starter
 

Mauro Coutinho,

Muito bom o seu exemplo, mas infelizmente precisaria mudar toda lógica, pois existe um controle sobre a faixa de célula, ou seja, quando algo é digitado ó vb executa alguns procedimento de validação e outras coisinha. Por isso que para mim seria muito interessante que fosse da forma que eu expus o meu problema.

 
Postado : 14/04/2016 1:07 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Muito bom o seu exemplo, mas infelizmente precisaria mudar toda lógica, pois existe um controle sobre a faixa de célula, ou seja, quando algo é digitado ó vb executa alguns procedimento de validação e outras coisinha. Por isso que para mim seria muito interessante que fosse da forma que eu expus o meu problema.

Kaleo, como eu disse na msg anterior, precisaria de mais detalhes e se possivel um modelo e o passo a passo que faz.

Pessoal criei uma MACRO que localiza e seleciona a última célula vazia de uma coluna especifica
Não sei qual a estrutura da Macro e nem qual coluna se refere

e ao tentar atribuir um texto inicial tipo "PEDIDO N"
Estou supondo que que é somente este texto, já que não citou outro, então ele seria fixo.

não consigo deixar a célula em modo de edição, ou seja, ela fica selecionada e ao digitar o número do pedido o Excel apaga o texto inserido pela MACRO.
Entendi que atraves da Macro é inserido o texto "PEDIDO N" na celula selecionada e a intensão é digtar na mesma sem apagar o texto, então fiz direto na rotina, mas com o texto sendo inserido junto com o numero do pedido digitado.
Deixar uma celula "editavel" da forma que pretende não tem como, o que dá para fazer é ajustar esta rotina adaptando para rodar no evento Change da Planilha, onde capturamos e armazenamos em uma variável o valor que se encontra na celula selecionada e apos digitar armazenamos em outra variável e depois juntamos as duas.

Fico no aguardo de mais detalhes.

Editei só para complementar o que o Marcelo disse, acima você diz :
"mas infelizmente precisaria mudar toda lógica, pois existe um controle sobre a faixa de célula, ou seja, quando algo é digitado ó vb executa alguns procedimento de validação e outras coisinha."

Poste ou o seu modelo ou as rotinas que está utilizando, sem elas vamos ficar só em suposições.

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 14/04/2016 1:43 pm
(@mprudencio)
Posts: 2749
Famed Member
 

A melhor solução é a que o Mauro apresentou...

Assim vc tem a condição de inserir o numero do pedido manualmente como precisa.

Editar o seu codigo para utilizar a rotina que o Mauro lhe sugeriu, não deveria ser um problema, ja que isso vai ser inevitavel, mesmo vc disponibilizando seu arquivo completo sua macro sera editada, seja por voce ou por qualquer um que venha lhe ajudar. Se vc não possui conhecimento para isso (não estou dizendo que nao tem), sugiro que vc disponibilize seu arquivo com o codigo que esta usando para que seja editado e ajustado para que sua planilha funcione como vc deseja.

Qto a sua pretenção deixar a celula Editavel, como se o ultimo comando fosse um F2 sem nenhuma outra condição (a inputbox, e o caso da condição), NAO EXISTE, simplesmente pq ao finalizar a macro o comando F2 vai finalizar

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 14/04/2016 1:57 pm