Capture Cell Style in VBA

[MrLookout9]

Hello and thank you for your help. I have a workbook with two sheets ("Data", "Dashboard"). I have a drop down list of movies on "Dashboard" that has a list of movies contained on "Data". On "Data" I have Cell Styles associated with each Movie. I would like to pass this Cell Style from Data to Dashboard. I have already built a macro to copy the contents of Dashboard A1 (the list) switch to "Data", search for the contents, return to "Dashboard" and update the Cell Style. The only piece I am missing is code to capture the cell style and store it as a variable. Any suggestions? [TABLE="width: 500"]
<tbody>[TR]
[TD]{Data} Hollowman[/TD]
[TD][/TD]
[/TR]
[TR]
[TD]Titanic[/TD]
[TD][/TD]
[/TR]
[TR]
[TD]Avatar[/TD]
[TD][/TD]
[/TR]
</tbody>[/TABLE]
[TABLE="class: grid, width: 500, align: left"]
<tbody>[TR]
[TD]{Dashboard List} Titanic[/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[/TR]
</tbody>[/TABLE]

 

[shg]

You can copy the cells and paste formats to another cell. You can't copy and paste character-level (rich-text) formatting to another cell.