¿Cómo asociar los parámetros de la celda a la consulta SQL?

periodo1 = Sheets("Instrucciones").Range("a1").Valueperiodo2 = Sheets("Instrucciones").Range("a2").Valueperiodo3 = Sheets("Instrucciones").Range("a3").Value

Select'Observación'=Observacion_NoImpresa,'Observación IMP'=Observacion_ImpresaFrom justiec.dbo.M_Documentos AInner Join justiec.dbo.M_Documentos_Encabezado BOn A.IdDocumento=B.IdDocumentoWhereB.Periodo_Contable in (201312,20101,201402)