Thanks for yout kind answers. Hoever, I am afraid that my loop is complex. This is how my code looks:

For[i = 3, i < countMax + 3, i++,

 Xpos = aaa[[All, 1]]; Ypos = aaa[[All, 2]]; 
 windXVal = aaa[[All, i]]; 
 windXMat = Transpose[{Xpos, Ypos, windXVal}]; 
 Print[ListContourPlot[windXMat //. {x_List} :> x, 
   PlotLegends -> Automatic]]; 
 ifuncEPSX = Interpolation[ windXMat //. {x_List} :> x]; 
 Print[ContourPlot[ifuncEPSX[t, u], {t, -75, 0}, {u, 30, 65}, 
   GridLines -> {{xmin, xmax}, None}, PlotLegends -> Automatic]]; 
 intDataVectorEPSX = 
  Flatten[Table[{t, u, ifuncEPSX[t, u]}, {t, xmin, xmax, dDeltaX}, {u,
      ymin, ymax, dDeltaY}]]; leEPS = Length@intDataVectorEPSX; 
 vectorXintEPS = Table[intDataVectorEPSX[[i]], {i, 1, leEPS - 2, 3}]; 
 vectorYintEPS = Table[intDataVectorEPSX[[i]], {i, 2, leEPS - 1, 3}]; 
 vectorFintEPSX = Table[intDataVectorEPSX[[i]], {i, 3, leEPS, 3}]; 
 interpolatedDataEPSX = 
  Transpose[{vectorXintEPS, vectorYintEPS, vectorFintEPSX}]; 
 shannonIPEPS[t_, u_] = 
  Total[#3* sinc[(t - #1)/dDeltaX]*sinc[(u - #2)/dDeltaY] & @@@ 
    interpolatedDataEPSX];
 Print[shannonIPEPS[t_, u_]]; 
 Print[ContourPlot[
   shannonIPEPS[t, u], {t, xmin, xmax}, {u, ymin, ymax}, 
   GridLines -> {{xmin, xmax}, None}, PlotLegends -> Automatic]]; 
 ShannonSavedX[[All, i - 2]] = shannonIPEPS[t_, u_]]

Since I am working with such a complex operation I don't know where to use the table. Can you please indicate me how to do it?

Thanks again. Jaime.

Thank you so much. The output is just what I need. I will try to understand what you have written. Thank you so much.

Regards.

Jaime.