Você pode usar query-replace-regexp
assim:
M-x query-replace-regexp RET
\"\([^[:space:]]+\)\" RET
\texttt{} RET
A string de consulta pode ser lida como: corresponde uma sequência de um ou mais caracteres não espaciais ao grupo de correspondência 1 (os parênteses são para agrupamento), tudo isso entre aspas.
O na cadeia de substituição insere o agrupamento de correspondências.
A barra invertida dupla antes de texttt
é para escapar do caractere de barra invertida da interpretação.
Se, em vez disso, o que você deseja corresponder for apenas símbolos de várias palavras com sublinhados, será necessário alterar a sequência de correspondência para algo como \(\w+_\w+\)