Notifications
Clear all

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

10 Posts
3 Usuários
0 Reactions
1,251 Visualizações
(@kaleo_rs)
Posts: 0
New 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: 0
New 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
 
Postado : 13/04/2016 3:04 pm
(@kaleo_rs)
Posts: 0
New 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: 0
New 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.

 
Postado : 13/04/2016 3:26 pm
(@kaleo_rs)
Posts: 0
New 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: 0
New 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

 
Postado : 13/04/2016 4:18 pm
(@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

 
Postado : 13/04/2016 6:50 pm
(@kaleo_rs)
Posts: 0
New 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
(@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

 
Postado : 14/04/2016 1:43 pm
(@mprudencio)
Posts: 0
New 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

 
Postado : 14/04/2016 1:57 pm