Tomás Vásquez Fórum

Vega

Jota, Segue a macro simplificada. Caso os únicos textbox do formulário sejam esses, de 17 a 30, dá para tirar a estrutura If Right(Controle.Name, 2) Dim Controle As Object Dim intLinha As Integer intLinha = 0 For Each Controle In Me.Controls If TypeName(Controle) = "TextBox" Then If Right(...

Vega

Rafael, Nas propriedades do controle, basta escrever o texto na propriedade ControlTipText. Dessa forma toda vez que o usuário passar o Mouse sobre o botão/controle, aparecerá o comentário. Sim, mas desenvolvi isso apenas para facilitar a edição e não ter que ficar toda vez abrindo a plataforma de ...

Vega

Rafael,

Nas propriedades do controle, basta escrever o texto na propriedade ControlTipText.

Dessa forma toda vez que o usuário passar o Mouse sobre o botão/controle, aparecerá o comentário.

Vega

Uma boa forma de fazer isso é declarando variáveis Públicas num módulo. p.ex: public strCodigo as string public strTexto as string As declarações acima devem ficar num Módulo e como são variáveis públicas poderão ser acessadas por qualquer outro módulo do projeto. Para atribuir os valores, basta faz...

Vega

No click do combo você pode usar a cláusula WHERE com o valor retornado pelo combo

"select produto from Produto where marca='" & combomarca.value & "'"

Vega

O melhor lugar para consultar é a documentação do VBA.

No editor do VBA basta digitar F1, sobre o objeto ou palavra chave que você queira consultar, que o Help será exibido.

Vega

Essa macro eu fiz no Excel. Como você está usando o Access é preciso fazer alguma adaptação.

Altere As MsForm.Image para As Object e remova o método LoadPicture, deixando apenas o caminho da imagem.

Vega

Jander, Como o parâmetro da função já deve receber o objeto como argumento, não há necessidade de atribuir outra variável do mesmo tipo na função. Na Sub a baixo eu já estou assumindo que o argumento deve ser um objeto do tipo Image, portanto não há necessidade de atribuir outra variável do mesmo ti...

Vega

Basta usar a função GetExtensionName do objeto FileSystemObject para verificar a extensão do arquivo.

Por exemplo

Código: Selecionar todos

If abr.GetExtensionName (FileOpen.Path) = "xls" Then

Na estrutura condicional você define as extensões que deseja procurar

Vega

Talvez exista algum controle adicional (ocx) que faça isso, mas eu não conheço. Mas você pode colocar no formulário uma imagem estática de um gráfico do excel. E nesso caso, o gráfico da planilha pode estar linkado a alguma query do Access. Talvez não seja a forma mais adequada, mas resolve. Os pass...

Pesquisa resultou em 26 ocorrências

Re: Simplificar macro?

Re: Inserir comentário em CommandButton ou Label ?

Re: Inserir comentário em CommandButton ou Label ?

Re: Transferir dados de um formulário para o outro

Re: Usar um if junto com sql select

Re: Função VBA com argumento tipo IMAGE

Re: Função VBA com argumento tipo IMAGE

Re: Função VBA com argumento tipo IMAGE

Re: Macro para abrir vários arquivos do excel, Gostaria de a

Re: Formulário com gráfico vindo do access