Na consulta abaixo eu estou somando o campo Quantidade de uma determinada nota fiscal. Só que eu gostaria que a consulta primeiro verificasse se os registros do campo Unidade da tabela tblEmNF1 são todos iguais ai sim executava a soma caso contrario não somaria. Não sei se deu para entender.
rstSoma.Open "SELECT SUM(Quantidade) As Total FROM tblEmNF1 WHERE NrNotaFiscal LIKE '" & frmInserirNF.txtNrNF & "' ;", dbSoma, adOpenKeyset, adLockPessimistic, adCmdText