Olá galera, tenho um sistema funcionando perfeitamente com no Access 2003, o problema é que a empresa migrou tudo para office 2007 e com isso meu sistema não está rodando no runtime 2007. Instalei o Access 2007 na minha maquina e salvei meu sistema na versão .accdb(Access 2007). Ele está dando um erro em uma instruçao em que eu habilito as minhas tabelas do sistema.
Segue o código abaixo.
Private Sub B_Hab_Resumo_Click()
If Me.Tab_Resumos.Enabled = False Then
Me.Tab_Resumos.Enabled = True
Me.B_Hab_Resumo.Caption = "Desabilitar Resumo"
Me.Tab_Estatistica.Enabled = True
Me.Tab_Ferias.Enabled = True
Me.Tab_Ferias_Individuais.Enabled = True
Me.Tab_resumo_ferias.Enabled = True
Me.B_Atualiz_Ferias.Enabled = True
Else
Me.Tab_Resumos.Enabled = False
Me.B_Hab_Resumo.Caption = "Habilitar Resumo"
Me.Tab_Estatistica.Enabled = False
Me.Tab_Ferias.Enabled = False
Me.Tab_Ferias_Individuais.Enabled = False
Me.Tab_resumo_ferias.Enabled = False
Me.B_Atualiz_Ferias.Enabled = False
End If
Call B_Atualiz_Ferias_Click
End Sub
Se puderem me ajudar eu agradeço, estou a um bom tempo tentando descobrir uma forma de fazer funcionar.
Obrigado
Segue o código abaixo.
Private Sub B_Hab_Resumo_Click()
If Me.Tab_Resumos.Enabled = False Then
Me.Tab_Resumos.Enabled = True
Me.B_Hab_Resumo.Caption = "Desabilitar Resumo"
Me.Tab_Estatistica.Enabled = True
Me.Tab_Ferias.Enabled = True
Me.Tab_Ferias_Individuais.Enabled = True
Me.Tab_resumo_ferias.Enabled = True
Me.B_Atualiz_Ferias.Enabled = True
Else
Me.Tab_Resumos.Enabled = False
Me.B_Hab_Resumo.Caption = "Habilitar Resumo"
Me.Tab_Estatistica.Enabled = False
Me.Tab_Ferias.Enabled = False
Me.Tab_Ferias_Individuais.Enabled = False
Me.Tab_resumo_ferias.Enabled = False
Me.B_Atualiz_Ferias.Enabled = False
End If
Call B_Atualiz_Ferias_Click
End Sub
Se puderem me ajudar eu agradeço, estou a um bom tempo tentando descobrir uma forma de fazer funcionar.
Obrigado