Tomás Vásquez Fórum

Basole

Nao sei qual é exatamente o modelo que voce esta se referindo. Mas se for o que estou pensando, nao suporta mais de um usuario utilizar o banco de dados, ao mesmo tempo. Minha sugestao seria fazer algumas adaptaçoes para abrir o banco, somente no momento da gravação dos dados, incluindo uma verifica...

Basole

Amigo, veja se é isso que precisa. Sub ColorirValorEncontradoOutraColunaOutraAba() 'Como comparar a Coluna A, com a Coluna A de outra aba, colorir as células da coluna A 'Caso encontre o mesmo na coluna A de outra Aba. Dim rFind As Range, Cel, sAddr As String, ws1 As Worksheet, ws2 As Worksheet, i&a...

Basole

Pra mim este codigo nao funcionou. O que tenho usado é este: Sub Check_Printer_Status() Dim strComputer As String Dim objWMIService Dim colInstalledPrinters Dim objPrinter strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\...

Basole

Amigo, coloquei uma condicao para a coluna 9 (i) para formatar os valores como hora, veja se atende

Basole

Amigo, minha sugestão seria limpar todos os dados do listbox, após chamar a rotina "Calc_Afetacoes", em seguida carregar novamente; Tomando como exemplo o seu listbox "lstDeslocacao", segue o codigo: Sub lstDeslocacao_Click() Call Calc_Afetacoes With lstDeslocacao 'K1 - Deslocaçã...

Basole

Amigo com o office 64 isso nao é possivel.

Veja este ink abaixo a opção de calendario que roda na plataforma do seu office.

https://sites.google.com/site/e90e50/ca ... trol-class

Basole

O banco é o mesmo do download do modelo e não fiz alterações na estrutura.

Segue anexo.

Basole

thl.silva, Criei uma variavel publica Public AtualRegistro As String Que 'garda' o "nome da empresa", o ultimo registro, quando é alterado, ou inserido como novo. Quando clicar no botao OK uma rotina, pesquisa o AtualRegistro (ultimo alterado ou inserido) e retorna os dados no Frmcadastro ...

Basole

Experimente colocar Vba antes das funções: Date, Time, TimeSerial, Now, Format, etc :

ex.:

Código: Selecionar todos

 vba.Date

Basole

Veja este esemplo se lhe atende:

Pesquisa resultou em 67 ocorrências

Re: COMPARTILHAR NA REDE - URGENTE

Re: Colorir Valor Duplicado Comparando com outra Coluna

Re: Verificar se impressora padrão está desligada

Re: Configurar coluna do ListBox como hora "usando método array"

Re: "Unselect" não funciona na ListBox

Re: MSCOMCT2.OCX

Re: Frmcadastro aparecer a última tela de dados inserida/alterada após gravar.

Re: Frmcadastro aparecer a última tela de dados inserida/alterada após gravar.

Re: Registro de ponto

Re: Macro Enviar Planilha por email (não a pasta toda)