Graymalkin

Não, sem problemas. O fórum é livre para qualquer pergunta, especialmente de iniciantes. Ah, e tem o meu MSN no meu perfil: washingtonj@openlink.com.br Abraços, Graymalkin

Então, me esclarece uma coisa: qual o código que tem no botão? Abraços, Graymalkin

Faça assim então: RX.Open "Select * from Tabela_Empresa ", Conexao, adOpenDynamic, adLockOptimistic Deve dar certo. Abraços, Graymalkin

O problema é *onde* você declarou a variável (o escopo da mesma): Dim Var1 As String Private Sub cmd1_Click() Var1 = txt1.Text txt1.Text = "Variavel gravada" End Sub Private Sub cmd2_Click() lblvar.Caption = Var1 End Sub Quando você declara a variável dentro de um procedimento ou função, ela só existe ali. No caso cmd1_Click e cmd2_Click são dois procedimentos diferentes e as variáveis criadas em um não existem para o outro. Para ter uma variável em comum para estas (e todas os outros procedimentos do form) você pode declarar a variável lá no topo da tela de código do form (na área denominada General Declarations). Certo? ;) Graymalkin

Poder pode, você só tem é que configurar o roteador para encaminhar para a sua máquina as requisições feitas em uma determinada porta (a que você escolheu para ser a porta de conexão do servidor). Abraços, Graymalkin

E não é só fazer... form2.lblNomedotecnico.Caption = form1.TextBoxDoNomeJogador.Text ...? ;) Graymalkin

Você pode fazer isso através do evento Change do objeto Worksheet: Private Sub Worksheet_Change(ByVal Target As Range) Static valorAnterior As Integer If valorAnterior = 0 Then valorAnterior = Target.Value Else novoValor = Target.Value + valorAnterior valorAnterior = 0 Target.Value = novoValor End If End Sub Certo? ;) Graymalkin

Você pode fazer isso assim: 'No General Declarations do form Dim WithEvents tempo As Timer '---------------------------------------------------- Private Sub Form_Load() Set tempo = Controls.Add("VB.Timer", "tempo") tempo.Interval = 500 End Sub Private Sub tempo_Timer() Debug.Print "a" End Sub Certo? ;) Graymalkin

Se sua intenção é criar uma variável chamada "Variavelqueeuquero" e armazenar o texto da caixa de texto Text1 nela, o código acima está correto. Dê uma procurada por "Manifest" aqui no fórum pois essa dúvida já rolou. Abraços, Graymalkin

E qual é exatamente a sua dúvida? Como carregar a imagem? Se for, dê uma olhada na função LoadPicture(). Abraços, Graymalkin

Vá para o último registro... RX.MoveLast ... e depois pegue o campo correspondente: text1.text = RX.Fields("idEmpresa").Value Certo? ;) Graymalkin

Como assim "passar ícones para o VB6"? Ícone é ícone em qualquer lugar, o que pode variar são as cores e a resolução. Já deu uma olhada no Baixaki (http://www.baixaki.com.br/)? Abraços, Graymalkin

:unsure: Nops... eu ainda não entendi. O que realmente está confuso é que *não* usei a função PROCV em lugar nenhum do código que te passei. Por isso não estou entendendo o que você quer adaptar. Porque se for realmente o código, eu já te passei como fazer (através do objeto Worksheets). Abraços, Graymalkin

A Hierarchical FlexGrid aceita (e ela faz tudo que a Flexgrid comum faz, além de permitir organizar por hierarquia). Abraços, Graymalkin

Já deu uma procurada sobre automação do Word? Acho que aqui mesmo no fórum você vai encontrar exemplos. Abraços, Graymalkin

Não entendi... por que você ainda está usando PROCV? E como ficou o código final? Graymalkin

Talvez no evento MouseMove? Abraços, Graymalkin

O controle MSFlexgrid é mais recomendado neste caso. Abraços, Graymalkin

Sim, você pode se referir a uma determinada planilha obtendo o objeto correspondente na coleção WorkSheets: procurar = Worksheets("Plan2").Range("H3").Value Não tenho nenhuma para recomendar porque tudo que aprendi sobre os objetos disponibilizados pelo VBA foi mesmo utilizando-os (uma vez que a linguagem em si, Visual Basic, eu já conhecia). Abraços, Graymalkin

Não existe nenhum programa com o nome de "dir", sendo este um *comando* do interpretador do DOS (o command.com). No Linux sim, "ls" é um programa. Portanto, o ideal seria você fazer: import os os.system("dir /a") Certo? ;) Graymalkin

Isso não é uma questão de VBA e sim de lógica de programação. Você já sabe que a variável "procurar" é a que possui o valor a ser procurado, então basta colocar nela o valor desejado. Você poderia fazer isso assim... procurar = Range("H3").Value ... para colocar o que estiver na célula H3 em "procurar". Ou você também poderia fazer assim: procurar = InputBox("Digite a letra desejada:") E de qualquer outra maneira desde que "procurar" ficasse com a letra a ser procurada. Abraços, Graymalkin

Onde estão estes dados? Em uma tabela de banco de dados? Em uma matriz ou coleção? Abraços, Graymalkin

Sim, é só definir o valor da variável "procurar" com o valor desejado. Este valor pode provir de uma célula, de uma caixa de texto, de um janela InputBox() etc. O nome é "variável" justamente porque você pode alterar o valor definido. Abraços, Graymalkin

Me parece que não precisa ser um arquivo físico: http://www.velocityreviews.com/forums/t345...ted-images.html Se fosse com a wxPython eu poderia te garantir que não, mas eu nunca usei a classe ImageTk. Abraços, Graymalkin

Se você fizer o teste manualmente, o ping retorna o desejado? (Quando a máquina está off, é claro). Graymalkin