Error concatenar access vba

Cordial Saludo

Tengo esta linea de código en vba access:

strSql = "SELECT * FROM Usuario_Roles where rol='Admin LAN' and Usuario ='" & sBuffer & "';"

sin embargo la varia Sbuffer no queda como string; pues da como resultado al inicio una comilla comilla pero al final no tiene la comilla que cierra el enunciado String quisiera saber que debo hacer gracias