Andrade6854

Boa noite

 

 

Acabo de construir um formulário em access com botão salvar, novo e excluir, o que acontece é durante a inserção das informações, e salva-la, os campos dos dados correspondente fica ativo, permitindo que alguém a modifique e após apertar a tecla enter, ele salva. O que eu gostaria de fazer é:

 

- Apos colocar meus dados no campo, e clicar no botão salvar, ele travasse os campos não permitindo mais digitação à não ser se clicar no botão alterar, em que nesse caso ao pressionar o botão alterar, altero os dados e clico no botão salvar.

 

- Como sou muito leigo nesse programa (só tenho apenas pouca noção), como eu crio o botão alterar.

 

 

Anexo, meu arquivo.

 

Agradeço desde já.

 

 

attn.

 

 

 

 

 

AVALIAÇÃO DE CLIENTE.rar

Sub ExcluiLinhas() Dim LR As Long, i As Long  LR = Cells(Rows.Count, 2).End(xlUp).Row   For i = LR To 2 Step -1    If Not IsNumeric(Cells(i, 1)) Or Cells(i, 1) = "" Then Rows(i).Delete  Next i  LR = Cells(Rows.Count, 2).End(xlUp).Row  Cells(2, 4) = "=IF(C2=""Agosto"",""encerrar contabil"",""analise de BOM"")"  Cells(2, 4).AutoFill Cells(2, 4).Resize(LR - 1)  Range("D2:D" & LR).Copy  [E2].PasteSpecial Paste:=xlPasteValues  Application.CutCopyMode = FalseEnd Sub

Obrigado Osvaldomp, funcionou perfeitamente

Boa noite.

 

 

Tenho uma planilha com mais de 100.000 itens para analise e gostaria de saber se tem como fazer um macro para o caso:

 

 - Para a coluna A, ele excluísse as linha que não contém números (letras e caracteres) e excluísse o que estivesse em branco.

 

- Na coluna D, tem uma fórmula (=SE(C2="Agosto";"encerrar contabil";"analise de BOM"), gostaria que ele executasse em toda a linha, até não ter mais dados, e logo após  ele  tipo copia-se e cola o valor da analise na coluna E sem formula.

 

Apenas faço uma ressalva que o arquivo em anexo foi resumido (exclui parte da informação), pois ele deu 10 MB de tamanho, mas os procedimentos são os mesmo.

 

Desde já, grato.

 

LIVRO CONTABIL - INVENTÁRIO.xlsx

Boa tarde!!

 

Quando você fala 

você diz guias ou arquivos?

 

 

Boa tarde  zinhovba.

 

São arquivos

Boa tarde  zinhovba.

 

São arquivos

BOA NOITE.

 

Preciso de ajuda.

 

Tenho mais de 7.000 planilhas a cada duas horas para fazer analise do calibrador de maquinas stencil para papel carbono, tentei criar uma macro que pudesse gerar uma tabela dinâmica  que conforme quantidade do stancil, ele me desse o total(soma) dos calibradores dele(usei o gerador de macro do excel para automatizar a atividade, mas, enfim, após a segunda planilha ele para de executar e dá erro).

No entanto, a macro executa numa unica vez, em que passado para próxima planilha ele não executa mais. Por acaso, teria a solução para o meu problema, em que a mesma macro pudesse rodar com perfeição (criar tabela dinamica) para as 7.000 planilhas, postei um exemplo da planilha que trabalho, mas apenas faço ressalva que tive que reduzir a quantidade de informação da planilha, pois era quase que dois megabytes e travou a internet da unidade, tirei a macro,pois o antivirus tem diretriz de não enviar nada que contenha macro e quanto a quantidade de informação tem planilhas que vem com 55, 349, 1028 e etc... de itens para analise.

 

Desde já, agradeço.

 

 

fabrica de stencil1-minas gerais.xlsx

fabrica de stencil7- santa catarina.xlsx

Mudei o codigo no post la em cima, ve aí, agora é só você atrelar a macro ao botão.

voce tb pode mudar a pasta inicial de "C:\" para a pasta mais específica onde estão as subpastas.

obrigado Xflapc2, funcionou perfeitamente.

 

Attn

 

essa caixa de texto está na planilha ou em userform?

Qual o nome dela?

 

O código para selecionar diretório:

 

Sub SelecionaDir()    With Application.FileDialog(msoFileDialogFolderPicker)        .InitialFileName = "C:\"        .Title = "Selecione uma pasta"        .Show        If .SelectedItems.Count = 0 Then            MsgBox “Cancelado”            Else            MsgBox .SelectedItems(1)        End If    End WithEnd Sub

 

 

Boa tarde.

 

 

Ele esta em uma Userform, o nome dela é " cadastro de recibos", nome do objeto é "usercad"

 

 

Attn.

Boa noite.

 

 

Gostaria que me ajudasse, quero criar uma " caixa de texto" e um "botão", ao clicar no botão, ele abra uma janela e lá vou procurar um diretório especifico, como exemplo "C: \doc\recibo_2013", ao clicar em ok,  o caixa de texto mostrara apenas o diretório selecionado, como exemplo: C:\doc\recibo_2013.

 

 

Grato.

 

 

Attn.

 

 

 

 

 

 

 

 

Boa noite.

 

Como você quer um office gratuito, e que contenha as mesmas ferramentas do office (Word, Excel, Power-point e Access), recomendo o Libre Office. Este por sua vez é um dos programas que de qualidade, funcionalidade e outros aspectos são identico e até melhor que o Microsoft Office.

Eu uso ele, e não tenho dificuldade em usa-lo, você pode baixar no Baixaki digitando o nome Libre Office. Caso tenha aquela dúvida se todos os arquivos digitado no Office funcionara de forma idêntica no Libre office ou arquivo criado no Libre office funcionara de forma idêntica no Office, fique tranquilo, pois executam de forma identica.

 

Espero ter ajudado.

]Bom dia

 

Tenho uma planilha em que na coluna A o campo da tabela se chama carro é ele vem somente com um tipo de carro escrito "Citroen"  e gostaria de que ele preenchesse automaticamente essa informação sem a necessidade de eu digitar 10,15 ou 200 vezes essa informação. Apenas faço uma ressalva que nem sempre vem escrito "citroen", muitas vezes vem "audi" ou "SEDAN", mas o que gostaria e que digitou uma vez valera para todas as celulas abaixo que necessite informação.

 

Grato.

 

CARRO - VENDAS.xlsx