VBA, Move specific cells to another page

Hi, I have one page for every month. On each page there will be button that runs the VBA code. The VBA code shall look for text in cells O7:037 in the current page and copy the some of the cells to the page "report"

example:
If there is text in cell O7, copy the specific cells to page "report".
the cells are:
O7 --> B8
B7 --> A8
P7 --> D8
Q7 --> E8

If there is text in cell O8, copy the specific cells to page "report".
the cells are:
O8 --> B9
B8 --> A9
P8 --> D9
Q8 --> E9

And so on....
Any help would be appreciated!