从单元格到行的高亮显示

This might be a very dumm question. I would like to point out that I am pretty new to VBA. By looking in the internet here and there, I managed to create the following code, which I use to highlight all the cells containing a certain date. I would like now to tweak my code and extend the highlighnt to the rows of the cell containing a certain date, so that later I could easily copy and past them into a new tab.This might be a very dumm question. I would lik