[Resolvido]Campos em uma Tabela: qual quantidade recomendada?

Pesquisei a dúvida e quase não encontrei muitos comentários.
Uma tabela com mais de 20 campos pode comprometer o funcionamento de um banco de dados?

Uma outra dúvida:
em meus projetos uso relacionamentos entre tabelas. Na tabela Trabalhadores, por exemplo, tenho o campo Cod.Empregador, ligado a tabela Empregador. Este campo tem formato numérico e o transformei numa caixa de combinação retornando o CódEmpregador e Nome. A dúvida é: usar a caixa de combinação apenas no formulário Trabalhador, deixando o campo da tabela CodEmpregador como caixa de texto (com formato numérico), melhora o desempenho do banco de dados?

Elas (as caixas de combinação) podem diminuir o desempenho se colocadas em tabelas?

Boa informação. Era uma dúvida sobre a qual não tinha nenhum esclarecimento.
Recentemente dividi uma tabela de um banco de dados Folha de Pagamento. Ela possuía informações de 6 tipos de folhas (mensal, férias, 13º salário, rescisão, pró-labore, pag. autônomos). A dividi em 3:

1º) mensal, férias, 13º salário;
2º) rescisão;
3º) pró-labore, pag. autônomos;

A 1º) e a 2º) não podem coincidir no mesmo mês: caso haja a 1ª)Mensal..., a 2ª)Rescisão pode existir no mesmo mês; e vice-versa. Quando estas informações estavam na mesma tabela, conseguia facilmente fazer a busca e informar se já havia uma ou outra através do formulário. Fazia isso através do operador AntesDeInserir do formulário.

Agora como estão em tabelas separadas, não sei como (e se é possível) identificar o "registro duplicado".

A decisão de dividi-la, veio por causa da quantidade de campos: quase 50!

A estrutura é assim:

>> tab_Competência (datas mês-a-mês com formato mês/ano);
>> tab_Movimento (para cada empregador incluído numa determinada competência (mês/ano), é criado um novo registro em Movimento);
>> tab_Folha (para cada trabalhador incluído no Movimento de seu empregador, é criado um novo registro em Folha).

A tabela Folha foi dividida em três partes, como descrevi acima:
1º) Folha Mensal, Férias, 13º Salário;
2º) Rescisão;
3º) Pró-Labore e Recibo de Autônomo (essa apenas para não empregados: sócio/dirigentes e trab. autônomos).

O denominador comum delas é a tabela Movimento (com o campo CodMovimento, que há nas três).

Para identificar se o registro é duplicado, uso um filtro. Para tentar criar, por exemplo, uma nova Folha Mensal, faço isso através do formulário Movimento (onde há os campos CodMovimento, CodTrabalhador e TipoFolha). Seleciono um trabalhador e, ao escolher o tipo de folha, é aberto um novo formulário. Através dos 03 campos, é feita uma tentativa de filtragem. Caso haja os registros, uma mensagem informa que não é possível criar o registro. Caso a busca seja nula, o novo registro é criado e as informações dos três campos é copiada para a Folha.
Desta maneira, ele faz a pesquisa na tabela de origem do formulário.
Seria melhor juntar as 03 folhas numa única tabela e subdividi-la através de consultas?

O sistema de filtragem funciona assim:

1) No formulário Movimento, há os campos CodMovimento, CodEmpregador, CodTrabalhador(caixa de listagem). Escolho um trabalhador e clique no botão correspondente ao que quero: 1.Folha Mensal/Férias/13ºSal -- 2.Rescisão -- 3.Pró-Labore/Pag.Autônomo.

2) Ao clicar em um dos botões, o formulário é aberto e os campos CodMovimento & CodTrabalhador são usados, primeiro, para procurar um registro igual. Caso não encontre, cria um novo registro copiando os dados do critério de busca para para o formulário que foi aberto.

Exemplo com o botão botFolha Mensal/Férias/13ºSalário.

Private Sub botFolha_Click()
Dim stDocName As String
Dim stLinkCriteria As String
Dim strTexto As String
Dim strTítulo As String
Dim intRetVal As Integer
Dim Cancel As Integer

stLinkCriteria = "[CodMovimento]&[CodTrabalhador] = " & Me![CodMovimento] & Me![CodTrabalhador]
stDocName = "FolhaMensal_Férias_13Salário"

DoCmd.OpenForm stDocName, , , stLinkCriteria

If IsNull(Forms![FolhaMensal_Férias_13Salário]!CodFolha) Then
strTexto = "Trabalhador ainda não cadastrado neste movimento. Confirma a inclusão?"
strTítulo = "Novo Registro!"
intRetVal = MsgBox(strTexto, vbYesNo + vbQuestion + vbDefaultButton2, strTítulo)
Select Case intRetVal
Case vbYes
Forms![FolhaMensal_Férias_13Salário]!CodMovimento = Me!CodMovimento
Forms![FolhaMensal_Férias_13Salário]!CodTrabalhador = Me!CodTrabalhador
Case vbNo
Cancel = True
DoCmd.Close
End Select
Else
strTexto = "Trabalhador já cadastrado neste movimento. Deseja alterar o registro? "
strTítulo = "Alterar Registro?"
intRetVal = MsgBox(strTexto, vbYesNo + vbQuestion + vbDefaultButton1, strTítulo)
Select Case intRetVal
Case vbNo
Cancel = True
DoCmd.Close
End Select
End If
End Sub

Meu problema é: uma nova FolhaMensal/Férias/13ºSal só pode ser aberta se não houver nenhuma Rescisão para o trabalhador selecionado no formulário Movimento. E nenhuma Rescisão poderá ser criada se já houver uma Folha. Esse código só faz a pesquisa no formulário que está sendo aberto.

Vou enviar o arquivo BD. Ele está grande e vou tirar o que está fora desta dúvida especifica para melhorar a transmissão e facilitar sua ajuda.

Norbs, estou enviando o banco de dados (formato 2003).

Não consegui deixar apenas o que está em debate aqui. Mas direi os formulários:

>> Lista_Movimentos (formulário inicial): através dele é possível abrir Movimento.
>> Movimento: através dele é que são abertos os formulários Folha Mensal/Av. Férias, Rescisão, Pró-Labore, RPA.

Ok, Norbs. Vou testar e retorno. Muito Obrigado pela atenção.

Com tua licença Norberto, vou traduzir o que você disse:

O Norberto disse que o "Cancel" tem que estar dentro do parênteses do evento.

Por exemplo:
Private Sub Form_DblClick(Cancel As Integer)

Note que o "Cancel" não aparece no evento click().

E não adianta tentar colocar ele ali dentro, que o Access vai "berrar".

Abraços

Ao invés de Cancel = True seria DoCmd.CancelEvent?

Noberto, muito bom o layout dos relacionamentos. Valeu, camarada.

Noberto, nada no access pode cancelar AoClicar???

Continuando com a aula, se me permite Norberto:

o evento clique acontece com o conjunto de dois outros eventos:
- mouse down (ao apertar o mouse)e
- mouse up (ao liberar o mouse)

Ai estão dois eventos que você pode cancelar com CancelEvent dito pelo Norberto.

Vá na folha de propriedade de um controle que tenha esses eventos clique em um deles e aperte F1

Como alguém diz sempre aqui:

Bom estudo

obs. Depois que respondi, li novamente o tópico todo e percebi que estamos fugindo do escopo do tópico.

Abraços

Vou continuar a dúvida em outro tópico. Se puderem ajudar fico muito grato.