Bom dia Agora consigo introduzir todos os itens, mas depois de guardar se quiser alterar dá-me erro 381, no seguinte código: Private Sub ComboBoxPro...

Envio o ficheiro em anexo. Ainda está em fase de iniciação, mas com a vossa ajuda hei-de lá chegar. Já me estava a esquecer, eu já tinha retirado o '...

Private Sub Label9_Click() If txtSaida.Value <> "" Then Label9.Caption = Format(TimeValue(txtHoras.Value) - TimeValue(txtSaida.Value),...

Não resolveu, o que ue quero é que apareça a diferença no label9 (que vou criar), da txtHoras - txtSaida Private Sub cmdAlterar_Click() lsHabili...