Vídeo recomendado
https://youtu.be/diWPPPhW-9E

Pesquisa resultou em 805 ocorrências

por srobles
Qui Ago 13, 2020 5:14 pm
Fórum: VBA Básico
Tópico: Bloqueio de Células Condicional
Respostas: 6
Exibições: 5933

Re: Bloqueio de Células Condicional

CAMILO, Primeiramente, experimente bloquear as células desejadas da guia em questão, e, no evento Change da guia, adicione : If Not Intersect(Range("G5"), Target) Is Nothing Then If LCase(Target.Value) = LCase("encerrada") Or LCase(Target.Value) = LCase("cancelada") The...
por srobles
Qui Ago 13, 2020 5:11 pm
Fórum: VBA Básico
Tópico: Cadastro e relatorio.
Respostas: 9
Exibições: 8458

Re: Cadastro e relatorio.

kjaty,

Veja se as alterações feitas em seu modelo, atendem sua necessidade.
por srobles
Ter Ago 11, 2020 2:53 am
Fórum: VBA Básico
Tópico: Passar um controle ActiveX da Planilha como parâmetro para uma rotina
Respostas: 2
Exibições: 3471

Re: Passar um controle ActiveX da Planilha como parâmetro para uma rotina

Wagner,

Favor se a forma abordada atende sua necessidade.
por srobles
Seg Ago 03, 2020 9:46 pm
Fórum: VBA Básico
Tópico: transportar dados de um form para outro - Arquivos diferente
Respostas: 1
Exibições: 2418

Re: transportar dados de um form para outro - Arquivos diferente

ANDERSONMOREIRA,

Favor, veja se a opção adotada, atende sua necessidade.
por srobles
Qui Jul 23, 2020 5:00 pm
Fórum: VBA Básico
Tópico: Cria labels a partir de array dinâmico
Respostas: 3
Exibições: 2820

Re: Cria labels a partir de array dinâmico

Adonias,

Experimente alterar esta linha para :

Código: Selecionar todos

For Each lblCtl In .Controls
   If TypeName(lblCtl) = "Label" And Left(lblCtl.Name,7)="lblTemp"Then .Controls.Remove (lblCtl.Name)
Next
por srobles
Qua Jul 22, 2020 10:14 pm
Fórum: VBA Básico
Tópico: Cria labels a partir de array dinâmico
Respostas: 3
Exibições: 2820

Re: Cria labels a partir de array dinâmico

Adonias,

Veja se a opção adotada, atende sua necessidade.
por srobles
Qui Jun 04, 2020 3:43 am
Fórum: VBA Básico
Tópico: soma e subtração em textbox [RESOLVIDO]
Respostas: 4
Exibições: 5740

Re: soma e subtração em textbox

Wagner,

Estude o modelo em anexo e veja se o mesmo atende sua necessidade.

Como não disponibilizou um modelo contendo dados ficticios, elaborei um que, acredito eu, possa ajudar.

Adapte o mesmo conforme seu cenário.
por srobles
Sex Mai 01, 2020 10:24 pm
Fórum: Excel + Access
Tópico: Ultimo Registro [Resolvido]
Respostas: 2
Exibições: 3146

Re: Ultimo Registro

AVGSantos, Já experimentou utilizar o que se segue abaixo: Sub UltimoCadastro() Dim proximoID As String ConectDB rs.Open "select *from Tab_Vendas ", db, 3, 3 While not rs.EOF proximoID = rs.Field(0).Value rs.MoveNext Wend Me.CodigoVendas.Caption = proximoID + 1 FechaDB End Sub Acredito que...
por srobles
Ter Abr 21, 2020 6:31 pm
Fórum: VBA Básico
Tópico: Integração Listbox e Userform (RESOLVIDO)
Respostas: 6
Exibições: 11377

Re: Integração Listbox e Userform

july_onda,

Veja se as alterações feitas, se aproximam da sua necessidade.
por srobles
Dom Mar 29, 2020 6:19 pm
Fórum: VBA Básico
Tópico: inserir dados em células em sequencia, e limitar a quantidade de linhas[RESOLVIDO]
Respostas: 2
Exibições: 7013

Re: inserir dados em células em sequencia, e limitar a quantidade de linhas

kikoehu,

Veja se o modelo em anexo atende sua necessidade.

Aguardo retorno.