Ho iniziato la macro in questo modo:
Codice: Seleziona tutto
oCBox = MioMovimenti.getControl("cmbSottocategoria")
sValCur2 = oCBox.text
SQLXC = "SELECT TBMOVIMENTO.MOVIMENTO, TBSOTTOCATEGORIA.SOTTOCATEGORIA, TBCATEGORIA.CATEGORIA FROM TBCATEGORIA, Sottocategoria, TBSOTTOCATEGORIA, TBMOVIMENTO WHERE TBCATEGORIA.IDCAT = Sottocategoria.IDCAT AND TBSOTTOCATEGORIA.IDSOTCAT = Sottocategoria.IDSOTCAT AND TBMOVIMENTO.IDMOV = Sottocategoria.IDMOV AND TBSOTTOCATEGORIA.SOTTOCATEGORIA = '" & sValCur2 & "' AND TBCATEGORIA.CATEGORIA = '" & sValCur1 & "'"
MioMovimenti.getControl("txtMovimento").text = "Qui vorrei il risultato della SQLXC"
Come si fa?