Offset for VBA

Morning,
Please can some one help me about VBA code.
In fact, I'd like to write a vba script using offset command but I don't know how to implement it:
A6=(3 or 4 or 5 or 6)
in sheet2 I'd like to fill the next cells(on the same line) according to a condition based on the content of the first cell(sheet2!B2) :
Condition :
cas1 A6=3
if sheet2!B2="X" then write X in the 7th cell from the cell B2
if not
if sheet!B3="X" then write X in the third and fourth field from cell B3
if not
if sheet!B4="X" then write X in the sixth and the third and seventh field from cell B4
if not
if sheet!B5="X" then write X in the second cell from B5 and seventh field from cell B4
and so on for each week
end
Cas2 A6=4
if sheet2!B2="X" then write X in the 11th cell from the cell B2
if not
if sheet!B3="X" then write X in the third and fourth field from cell B3
if not
if sheet!B4="X" then write X in the sixth and the third and nineth field from cell B4
if not
if sheet!B5="X" then write X in the second cell from B5 and seventh field from cell B4
and so on for each week
end
Cas3 A6=5
if sheet2!B2="X" then write X in the 15th cell from the cell B2
if not
if sheet!B3="X" then write X in the third and fourth field from cell B3
if not
if sheet!B4="X" then write X in the sixth and the third and nineth field from cell B4
if not
if sheet!B5="X" then write X in the second cell from B5 and seventh field from cell B4
and so on for each week
end
Cas4 A6=6
if sheet2!B2="X" then write X in the 19th cell from the cell B2
if not
if sheet!B3="X" then write X in the third and fourth field from cell B3
if not
if sheet!B4="X" then write X in the sixth and the third and nineth field from cell B4
if not
if sheet!B5="X" then write X in the second cell from B5 and seventh field from cell B4
and so on for each week
end

each week has 28 columns that must be field following this role.
Thanks

Hi!
Attached you've the file as requested.
What I need to do :
1. The other tables take their contents in the first table which are filled from the first sheet(MENU PRINCIPAL)
2. The cells from G6 to AD6 are fiels according to the formula I submited earlier in the forum
case1 : MENU PRINCIIPAL!J5=3
IF C6="X" then I6="X"
ELSEIF D6="X"then G6="X"
elseif E6="X" then H6="X"
elseif F6="X" then M6="X"
Case 2 : MENU PRINCIPAL!J5=4
IF C6="X" then M6="X"
ELSEIF D6="X"then G6="X"
elseif E6="X" then H6="X"
elseif F6="X" then Q6="X"
Case 3 : MENU PRINCIPAL!J5=5
IF C6="X" then Q6="X"
ELSEIF D6="X"then G6="X"
elseif E6="X" then H6="X"
elseif F6="X" then U6="X"
Case 4 : MENU PRINCIPAL!J5=6
IF C6="X" then U6="X"
ELSEIF D6="X"then G6="X"
elseif E6="X" then H6="X"
elseif F6="X" then Y6="X"

3. The other agents take their formula from the first agent
4. The other tables are filled from the formula continuing the formula in the first table(I mean as the cells from G6 to AD6 are filled according to the X in C6, or D6, or E6, or F6; the next table are filled according to the X in the last 4 cells of the previous table(I mean the row under Sanday(Dimanche in french)),

X posted
https://www.mrexcel.com/forum/excel-...ml#post4975253