DE3.Cn3.Execute "SELECT * FROM tabella1" & "Where _
Cognome_nome='PIPPO'"
manca uno spazio prima del where:

codice:
DE3.Cn3.Execute "SELECT * FROM tabella1" & [G]" Where[/G] _
Cognome_nome='PIPPO'"