9 Criar Recordset a partir de uma tabela comentada em 10/07/2019 10:58 Tecnologia Ricardoch2 em 09/07/19 21:40 comentada em 10/07/2019 10:58 Sub criadatabela() Dim rect As Recordset2 Dim x Set rect = CurrentDb.OpenRecordset("Plcontas") rect.MoveLast x = rect.RecordCount MsgBox x rect.Close CurrentDb.CloseEnd Sub