[Resolvidos]Padronizar títulos e propriedades dos objetos do sistema

Olá, bom dia, tem como deixar a legenda dos formularios padrão para todos os forms?
tipo
Sistema versão 1.0

Tem como sim Top
Crie um relatório em branco
vá nas propriedades e coloque como deseja:
Legenda: Sistema Versão 1.0
Botões de Navegação = Não
Seletores de registros = Sim
E outros mais da forma desejada
Salve este relatório com o nome Normal
e pronto
todos os outros relatórios que forem criados virá com as configurações acima
daí um ou outro é só ir nas propriedades e mudar alguma coisa.

Lebrando que isso também vale para o formulário.

Mais um pitaco mais uma bomba;

Num módulo novo cole e salve;

Public Function MudaTituloTodosOsForms()
'By JPaulo Maximo Access
On Error Resume Next
Dim CorrerTodos As Single
Dim frm As AccessObject
Dim openFrm As Access.Form
CorrerTodos = Timer()
For Each frm In CurrentProject.AllForms
DoCmd.OpenForm frm.name, acDesign
Set openFrm = Forms(frm.name)
openFrm.Caption = "Sistema versão 1.0"
DoCmd.Save acForm, frm.name
DoCmd.Close acForm, frm.name
Next frm
CorrerTodos = Timer - CorrerTodos
Exit Function
End Function

Crie uma Macro com o Nome de AutoExec e faça como está neste post para correr a função.

http://maximoaccess.forumeiros.com/macros-f14/macro-correr-funcao-t123.htm

Obrigado JPaulo, criei um botão para fazer isso, valeus!!!