MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


3 participantes

    Duplicidade em ComboBox

    avatar
    Joelsonm01
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 28/03/2018

    Duplicidade em ComboBox Empty Duplicidade em ComboBox

    Mensagem  Joelsonm01 13/6/2018, 22:56

    Boa Noite.

    Gostaria que o meu ComboBox não mostrasse nomes repetidos

    Exemplo:

    GRUPO
    DIRETORIA
    DIRETORIA
    HOSPEDAGEM
    HOSPEDAGEM
    VIAGEM
    VIAGEM


    gostaria que esse comboBox apresentasse apenas DIRETORIA; HOSPEDAGEM;VIAGEM


    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4771
    Registrado : 06/11/2009

    Duplicidade em ComboBox Empty Re: Duplicidade em ComboBox

    Mensagem  Assis 13/6/2018, 23:34

    Boa noite

    Use

    SELECT DISTINCT


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    Joelsonm01
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 28/03/2018

    Duplicidade em ComboBox Empty Re: Duplicidade em ComboBox

    Mensagem  Joelsonm01 14/6/2018, 15:13

    Não compreendi, onde coloco? É uma formula, ou só o Proprio Select Distinct
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4771
    Registrado : 06/11/2009

    Duplicidade em ComboBox Empty Re: Duplicidade em ComboBox

    Mensagem  Assis 14/6/2018, 15:41

    Na origem dos dados.
    Ou poste essa parte da sua BD para ser ajudado.


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    Joelsonm01
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 28/03/2018

    Duplicidade em ComboBox Empty Re: Duplicidade em ComboBox

    Mensagem  Joelsonm01 14/6/2018, 17:33

    'OUTRA OPÇÃO (CONGREGAÇÃO)

    ElseIf Me.Opt_Grupo = True Then

    'O MEU SELECT
    StrSql = "SELECT * FROM tbl_Despesas" 'ESSA TBL_DESPESAS É ONDE ESTÁ SE RECEBENDO OS DADOS, SERVINDO ENTÃO COMO BANCO DE DADOS
                                                     'PARA A CBO_GRUPO (COMBOBOX)
    'VOU CONECTAR AO BANCO DE DADOS
    rs.Open StrSql, Cn, adOpenKeyset, adLockOptimistic, adCmdText

    On Error Resume Next
    'LIMPAR A LISTVIEW
    Me.ListView1.ListItems.Clear

    While Not rs.EOF

       Set Lrst = Me.ListView1.ListItems.Add(Text:=rs(0)) 'Id
           Lrst.SubItems(1) = rs(1) 'Data
           Lrst.SubItems(2) = rs(2) 'Ano
           Lrst.SubItems(3) = rs(3) 'IdDesp
           Lrst.SubItems(4) = rs(4) 'Descrição
           Lrst.SubItems(5) = rs(5) 'Grupo
           Lrst.SubItems(6) = rs(6) 'Pagor Por
           Lrst.SubItems(7) = rs(7) 'Recebido Por
           Lrst.SubItems(Cool = FormatCurrency(rs(Cool) 'Valor
           
           
           rs.MoveNext
       
       Wend
      ' Call desconecta
       Me.Cbo_Grupo = ""
       Me.Cbo_Grupo.SetFocus



    O MEU BANCO DE DADOS É EM ACCESS E UTILIZO O GERENCIADOR DE NOMES(EXCEL) PARA DAR FUNCIONAMENTO(ROWSOURCE) A COMBOBOX.

    NÃO ESTOU CONSEGUINDO ENVIAR MEU BD POIS É MUITO GRANDE
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4771
    Registrado : 06/11/2009

    Duplicidade em ComboBox Empty Re: Duplicidade em ComboBox

    Mensagem  Assis 14/6/2018, 20:04

    Teste

    StrSql = "SELECT Distinct * FROM tbl_Despesas"


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    Joelsonm01
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 28/03/2018

    Duplicidade em ComboBox Empty Re: Duplicidade em ComboBox

    Mensagem  Joelsonm01 14/6/2018, 20:33

    NÃO FUNCIONOU.

    TENTEI CRIAR UMA OUTRA FORMA QUE TINHA FEITO EM OUTRO PROJETO, MAIS TAMBEM NÃO FUNCIONOU.

    '____________________________________________________________________________________________________________________________________
    Dim LINHA As Integer
    Dim FIM As Integer
    Dim REGISTRO As String

    LINHA = 1

    Do While Plan1.Cells(LINHA, 15) <> ""
    LINHA = LINHA + 1
    Loop

    FIM = LINHA - 1

    With Plan1

    For LINHA = 1 To FIM

    REGISTRO = Application.WorksheetFunction.CountIf(Range(Cells(1, 15), Cells(LINHA, 1), Cells(LINHA, 1))) ' MAIS DEU PROBLEMA NO RANGE
    If REGISTRO = 1 Then

    Cbo_Grupo.AddItem .Cells(LINHA, 15)

    End If
    Next LINHA
    End With

    ERRO DE COMPILÇÃO: NUMERO DE ARGUMENTOS INCORRETOS OU ATRIBUIÇÃO DE PROPRIEDADE INVALIDA
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4771
    Registrado : 06/11/2009

    Duplicidade em ComboBox Empty Re: Duplicidade em ComboBox

    Mensagem  Assis 15/6/2018, 09:18

    Bom dia

    Poste a BD


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    Joelsonm01
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 28/03/2018

    Duplicidade em ComboBox Empty BANCO DE DADOS

    Mensagem  Joelsonm01 15/6/2018, 15:12

    Não estou conseguindo enviar, não acho o formato..

    o meu banco esta em access, e não estou conseguindo zipar


    Última edição por Joelsonm01 em 15/6/2018, 15:19, editado 2 vez(es)
    Administrador
    Administrador
    Administrador
    Administrador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 425
    Registrado : 02/11/2009

    Duplicidade em ComboBox Empty Re: Duplicidade em ComboBox

    Mensagem  Administrador 15/6/2018, 15:15

    Atente ao item Nº 12, por favor;

    REGRAS DO FÓRUM

    1. Tenha paciência com quem coloca aqui as suas duvidas.
    2. Clareza nos títulos dos tópicos e duvidas, evite a linguagem MSN.
    3. Não colocar diversas vezes a mesma dúvida.
    4. Explicar detalhadamente o problema e informar a versão do seu Office + Sistema Operativo.
    5. Retorne sempre se deu certo, esse retorno é muito importante.
    6. Respeite toda a equipe Staff e demais membros deste fórum.
    7. Use sempre o botão Busca, sempre que tiver uma dúvida e antes de abrir tópicos.
    8. Não usar palavras como "Urgente". O fórum é livre e ninguém é obrigado a responder com urgência.
    9. A publicidade é proíbida e só pode ser feita pelo Administrador ou depois de aprovada pelo Administrador.
    10. Se o seu tópico não for respondido, tem o direito de fazer um Up ao final de 24horas!
    11. A colocação de Códigos ou Exemplos, devem constar sempre os créditos de quem o elaborou.
    12. Fale, não GRITE!   Só letras Maiúsculas, na Internet é o mesmo que gritar!
    13. É proibido tirar duvidas nas Salas de Repositório, devem abrir um novo tópico nas salas de duvidas, relacionando o Exemplo em causa.
    14. É proibido adicionar links externos nos tópicos, que redirecionem para outros sites ("backlinks"), excepto DropBox.
    15. É permitido adicionar links externos, nos códigos VBA dentro das Base de Dados.




    .................................................................................
    Admin
    avatar
    Joelsonm01
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 28/03/2018

    Duplicidade em ComboBox Empty BANCO DE DADOS

    Mensagem  Joelsonm01 15/6/2018, 16:00

    banco
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4771
    Registrado : 06/11/2009

    Duplicidade em ComboBox Empty Re: Duplicidade em ComboBox

    Mensagem  Assis 15/6/2018, 16:50

    Copie o link e cole no navegador.

    Siga os passos do link


    maximoaccess.com/t32003-como-postar-anexos-e-imagens-no-site-maximoaccess-com


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    Joelsonm01
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 28/03/2018

    Duplicidade em ComboBox Empty Re: Duplicidade em ComboBox

    Mensagem  Joelsonm01 15/6/2018, 17:12

    segue....

    desculpe a ignorancia...

    esse é o banco que serve para os Formulario em VBA excel
    Anexos
    Duplicidade em ComboBox AttachmentBD_CONADEN.zip
    bd
    Você não tem permissão para fazer download dos arquivos anexados.
    (36 Kb) Baixado 8 vez(es)
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4771
    Registrado : 06/11/2009

    Duplicidade em ComboBox Empty Re: Duplicidade em ComboBox

    Mensagem  Assis 15/6/2018, 17:35

    Só mandou as tabelas

    Aonde está o formulário que tem a ComboBox da Mensagem Nº 1 ????


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    Joelsonm01
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 28/03/2018

    Duplicidade em ComboBox Empty Re: Duplicidade em ComboBox

    Mensagem  Joelsonm01 15/6/2018, 17:40

    é tudo em excel... bastante coisa...
    vai llá...
    avatar
    Joelsonm01
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 28/03/2018

    Duplicidade em ComboBox Empty Re: Duplicidade em ComboBox

    Mensagem  Joelsonm01 15/6/2018, 17:56

    é tudo em excel... bastante coisa...
    muito grande, mesmo zipado

    Duplicidade em ComboBox Bd_con10

    e so posso enviar no (Tamanho máximo por arquivo: 0.977 Mb)

    posso enviar apenas a parte escrita
    avatar
    Joelsonm01
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 28/03/2018

    Duplicidade em ComboBox Empty Re: Duplicidade em ComboBox

    Mensagem  Joelsonm01 15/6/2018, 18:11

    segue o codigo do formulario

    Código:
    Private Sub Btn_BuscarTudo_Click()

    'DECLAREI AS VARIAVEIS
    Dim Cn As ADODB.Connection
    Dim rs As ADODB.Recordset
    Dim StrSql, Banco As String
    Dim Lrst As ListItem
    '__________________________________________________________________________________________________________________
    'VARIAVEIS PARA OS TOTAIS
    Dim Taxa As Double
    '__________________________________________________________________________________________________________________

    Banco = [Cbanco]
    Set Cn = New ADODB.Connection

        With Cn
        
            .Provider = "Microsoft.ACE.OLEDB.12.0"
          
            .Open Banco
            
        End With

    Set rs = New ADODB.Recordset

    If Me.Opt_Ano = True Then

    'O MEU SELECT
    StrSql = "SELECT * FROM tbl_Despesas"

    'VOU CONECTAR AO BANCO DE DADOS
    rs.Open StrSql, Cn, adOpenKeyset, adLockOptimistic, adCmdText

    On Error Resume Next
    'LIMPAR A LISTVIEW
    Me.ListView1.ListItems.Clear

    While Not rs.EOF

        Set Lrst = Me.ListView1.ListItems.Add(Text:=rs(0)) 'Id
            Lrst.SubItems(1) = rs(1) 'Data
            Lrst.SubItems(2) = rs(2) 'Ano
            Lrst.SubItems(3) = rs(3) 'IdDesp
            Lrst.SubItems(4) = rs(5) 'Grupo
            Lrst.SubItems(5) = rs(4) 'Descrição
            Lrst.SubItems(6) = rs(6) 'Pagor Por
            Lrst.SubItems(7) = rs(7) 'Recebido Por
            Lrst.SubItems(8) = FormatCurrency(rs(8)) 'Valor
            
            
            rs.MoveNext
        
        Wend
       ' Call desconecta
        Me.Cbo_Ano = ""
        Me.Cbo_Ano.SetFocus
            
    '__________________________________________________________________________________________________________________
    'SOMA DOS VALORES CONTIDOS NA LISTVIEW (Valor Taxa)
        
    For I = 1 To ListView1.ListItems.Count
    Taxa = Taxa + ListView1.ListItems.Item(I).SubItems(8)

    Next I

    Txt_ValorTaxa = Format(Taxa, "R$#,##0.00")

    '__________________________________________________________________________________________________________________
    'OUTRA OPÇÃO (CONGREGAÇÃO)

    ElseIf Me.Opt_Grupo = True Then

    'O MEU SELECT
    StrSql = "SELECT * FROM tbl_Despesas"

    'VOU CONECTAR AO BANCO DE DADOS
    rs.Open StrSql, Cn, adOpenKeyset, adLockOptimistic, adCmdText

    On Error Resume Next
    'LIMPAR A LISTVIEW
    Me.ListView1.ListItems.Clear

    While Not rs.EOF

        Set Lrst = Me.ListView1.ListItems.Add(Text:=rs(0)) 'Id
            Lrst.SubItems(1) = rs(1) 'Data
            Lrst.SubItems(2) = rs(2) 'Ano
            Lrst.SubItems(3) = rs(3) 'IdDesp
            Lrst.SubItems(4) = rs(5) 'Grupo
            Lrst.SubItems(5) = rs(4) 'Descrição
            Lrst.SubItems(6) = rs(6) 'Pagor Por
            Lrst.SubItems(7) = rs(7) 'Recebido Por
            Lrst.SubItems(8) = FormatCurrency(rs(8)) 'Valor
            
            
            rs.MoveNext
        
        Wend
       ' Call desconecta
        Me.Cbo_Grupo = ""
        Me.Cbo_Grupo.SetFocus
            
    '__________________________________________________________________________________________________________________
    'SOMA DOS VALORES CONTIDOS NA LISTVIEW (Valor Taxa)
        
    For I = 1 To ListView1.ListItems.Count
    Taxa = Taxa + ListView1.ListItems.Item(I).SubItems(8)

    Next I

    Txt_ValorTaxa = Format(Taxa, "R$#,##0.00")

    End If

    End Sub

    Private Sub Btn_Consultar_Click()

    'DECLAREI AS VARIAVEIS
    Dim Cn As ADODB.Connection
    Dim rs As ADODB.Recordset
    Dim StrSql, Banco As String
    Dim Lrst As ListItem
    '__________________________________________________________________________________________________________________
    'VARIAVEIS PARA OS TOTAIS
    Dim Taxa As Double
    '__________________________________________________________________________________________________________________

    Banco = [Cbanco]
    Set Cn = New ADODB.Connection

        With Cn
        
            .Provider = "Microsoft.ACE.OLEDB.12.0"
          
            .Open Banco
            
        End With

    Set rs = New ADODB.Recordset

    If Me.Opt_Ano = True Then

    'O MEU SELECT
    StrSql = "SELECT * FROM Tbl_Despesas WHERE ANO_DESPESA = '" & Cbo_Ano & "'"

    'VOU CONECTAR AO BANCO DE DADOS
    rs.Open StrSql, Cn, adOpenKeyset, adLockOptimistic, adCmdText

    On Error Resume Next
    'LIMPAR A LISTVIEW
    Me.ListView1.ListItems.Clear

    While Not rs.EOF

        Set Lrst = Me.ListView1.ListItems.Add(Text:=rs(0)) 'Id
            Lrst.SubItems(1) = rs(1) 'Data
            Lrst.SubItems(2) = rs(2) 'Ano
            Lrst.SubItems(3) = rs(3) 'IdDesp
            Lrst.SubItems(4) = rs(5) 'Grupo
            Lrst.SubItems(5) = rs(4) 'Descrição
            Lrst.SubItems(6) = rs(6) 'Pagor Por
            Lrst.SubItems(7) = rs(7) 'Recebido Por
            Lrst.SubItems(8) = FormatCurrency(rs(8)) 'Valor
            
            
            rs.MoveNext
        
        Wend
       ' Call desconecta
        Me.Cbo_Ano = ""
        Me.Cbo_Ano.SetFocus
            
    '__________________________________________________________________________________________________________________
    'SOMA DOS VALORES CONTIDOS NA LISTVIEW (Valor Taxa)
        
    For I = 1 To ListView1.ListItems.Count
    Taxa = Taxa + ListView1.ListItems.Item(I).SubItems(8)

    Next I

    Txt_ValorTaxa = Format(Taxa, "R$#,##0.00")

    '__________________________________________________________________________________________________________________
    'OUTRA OPÇÃO (CONGREGAÇÃO)

    ElseIf Me.Opt_Grupo = True Then

    'O MEU SELECT
    StrSql = "SELECT * FROM tbl_Despesas WHERE GRUPO = '" & Cbo_Grupo & "'"

    'VOU CONECTAR AO BANCO DE DADOS
    rs.Open StrSql, Cn, adOpenKeyset, adLockOptimistic, adCmdText

    On Error Resume Next
    'LIMPAR A LISTVIEW
    Me.ListView1.ListItems.Clear

    While Not rs.EOF

        Set Lrst = Me.ListView1.ListItems.Add(Text:=rs(0)) 'Id
            Lrst.SubItems(1) = rs(1) 'Data
            Lrst.SubItems(2) = rs(2) 'Ano
            Lrst.SubItems(3) = rs(3) 'IdDesp
            Lrst.SubItems(4) = rs(5) 'Grupo
            Lrst.SubItems(5) = rs(4) 'Descrição
            Lrst.SubItems(6) = rs(6) 'Pagor Por
            Lrst.SubItems(7) = rs(7) 'Recebido Por
            Lrst.SubItems(8) = FormatCurrency(rs(8)) 'Valor
            
            
            rs.MoveNext
        
        Wend
       ' Call desconecta
        Me.Cbo_Grupo = ""
        Me.Cbo_Grupo.SetFocus
            
    '__________________________________________________________________________________________________________________
    'SOMA DOS VALORES CONTIDOS NA LISTVIEW (Valor Taxa)
        
    For I = 1 To ListView1.ListItems.Count
    Taxa = Taxa + ListView1.ListItems.Item(I).SubItems(8)

    Next I

    Txt_ValorTaxa = Format(Taxa, "R$#,##0.00")

    End If

    End Sub

    Private Sub btn_fechar_Click()

    Unload Me

    FrmMenuDespesa.Show

    End Sub




    Private Sub ListView1_ItemClick(ByVal Item As MSComctlLib.ListItem)

    If chk_multipla = False Then
    ListView1.ListItems(Item.Index).Selected = True 'seleciona o item marcado
        For I = 1 To ListView1.ListItems.Count
            If ListView1.ListItems(I).Selected = True Then 'se o item estiver selecionado o check também ficará marcado
            ListView1.ListItems.Item(I).Checked = True
            Else
            ListView1.ListItems.Item(I).Checked = False 'se não vai desmarcar o item
        End If
    Next I
    End If





    End Sub

    Private Sub Opt_Grupo_Click()

        If Opt_Grupo = True Then
        
            Me.Cbo_Ano.Visible = False
            Me.Cbo_Grupo.Visible = True
            
            Me.Cbo_Ano.Left = 420
            Me.Cbo_Grupo.Left = 280
            
            Me.Cbo_Grupo.SetFocus
            
            Me.Cbo_Ano.Text = ""
            
            Me.Lbl_Descricao.Visible = True
            
            Me.Lbl_Descricao.Caption = "Grupo"
        End If

    End Sub
    Private Sub Opt_Ano_Click()

        If Opt_Ano = True Then
        
            Me.Cbo_Ano.Visible = True
            Me.Cbo_Grupo.Visible = False
            
            Me.Cbo_Ano.Left = 280
            Me.Cbo_Grupo.Left = 420
            
            Me.Cbo_Ano.SetFocus
            
            Me.Cbo_Grupo.Text = ""
            
            Me.Lbl_Descricao.Visible = True
            
            Me.Lbl_Descricao.Caption = "Ano"
        End If
    End Sub

    Private Sub UserForm_Initialize()

             With Me.ListView1
            
            .View = lvwReport
            .Gridlines = True
            .FullRowSelect = True
            .ColumnHeaders.Add Text:="Id", Width:=27
            .ColumnHeaders.Add Text:="Data", Width:=52, Alignment:=2
            .ColumnHeaders.Add Text:="Ano", Width:=30, Alignment:=2
            .ColumnHeaders.Add Text:="IdDesp", Width:=35, Alignment:=2
            .ColumnHeaders.Add Text:="Grupo", Width:=80, Alignment:=2
            .ColumnHeaders.Add Text:="Descrição", Width:=115, Alignment:=2
            .ColumnHeaders.Add Text:="Pago Por", Width:=100, Alignment:=2
            .ColumnHeaders.Add Text:="Recebido Por", Width:=100, Alignment:=2
            .ColumnHeaders.Add Text:="Valor", Width:=60, Alignment:=2
            
            End With
            
            Me.Lbl_Descricao.Visible = False
            Me.Cbo_Grupo.Visible = False
            Me.Cbo_Ano.Visible = False
            
            PesquisaAno
            PesquisaGrupo
    End Sub

    avatar
    Joelsonm01
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 28/03/2018

    Duplicidade em ComboBox Empty Re: Duplicidade em ComboBox

    Mensagem  Joelsonm01 15/6/2018, 18:30

    Dividi apenas o formulario que está em questão

    Anexos
    Duplicidade em ComboBox AttachmentSISTEMA CONADEN1.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (18 Kb) Baixado 8 vez(es)
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4771
    Registrado : 06/11/2009

    Duplicidade em ComboBox Empty Re: Duplicidade em ComboBox

    Mensagem  Assis 15/6/2018, 18:51

    Amigo
    Excel não, nem o tenho instalado no meu Portatil.

    Espero que alguém o possa ajudar, mas este fórum é Access.

    Boa sorte


    .................................................................................
    *** Só sei que nada sei ***

    Conteúdo patrocinado


    Duplicidade em ComboBox Empty Re: Duplicidade em ComboBox

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 21:47