\begin{tikzpicture} [scale=0.4,baseline,
  cell/.style={minimum size=0.35cm}]
\fill (0.65,0.65) rectangle (8.35,8.35);
\foreach \p/\c in%
{{(1,8)/red},{(2,8)/red},{(3,8)/red},{(4,8)/red},{(5,8)/red},{(6,8)/red},{(7,8)/blue},{(8,8)/blue}%
,{(1,7)/red},{(2,7)/red},{(3,7)/red},{(4,7)/red},{(5,7)/red},{(6,7)/red},{(7,7)/blue},{(8,7)/blue}%
,{(1,6)/red},{(2,6)/red},{(3,6)/blue},{(4,6)/blue},{(5,6)/red},{(6,6)/red},{(7,6)/blue},{(8,6)/blue}%
,{(1,5)/red},{(2,5)/red},{(3,5)/red},{(4,5)/blue},{(5,5)/red},{(6,5)/red},{(7,5)/blue},{(8,5)/blue}%
,{(1,4)/red},{(2,4)/red},{(3,4)/red},{(4,4)/red},{(5,4)/red},{(6,4)/red},{(7,4)/red},{(8,4)/red}%
,{(1,3)/blue},{(2,3)/red},{(3,3)/red},{(4,3)/red},{(5,3)/red},{(6,3)/red},{(7,3)/red},{(8,3)/red}%
,{(1,2)/blue},{(2,2)/blue},{(3,2)/blue},{(4,2)/blue},{(5,2)/blue},{(6,2)/red},{(7,2)/red},{(8,2)/blue}%
,{(1,1)/blue},{(2,1)/blue},{(3,1)/blue},{(4,1)/blue},{(5,1)/blue},{(6,1)/red},{(7,1)/red},{(8,1)/blue}}
\node[cell,fill=\c,draw=white,line width=1pt] at \p {};

\draw[thick,red, ->] (-1,9) to [out=-90,in=180] node[auto,swap] {Active ($A$)} (0.5,6.5);
\draw[thick,blue,->] (10,9) to [out=-90,in=0  ] node[auto] {Quiescent ($Q$)} (8.5,6.5);
\end{tikzpicture}