Excel format (1 Viewer)

giddyhead

Registered User.
Local time
Today, 04:37
Joined
Jul 3, 2014
Messages
88
Good Day,

Is there a website or vba script that you can upload a excel document and it shows the vba formatting of the excel document similar as below? Thanks
Code:
.Range("A1:" & ColumnLetter(RsG.Fields.Count) & "1").Borders(xlEdgeTop).Weight = XlBorderWeight.xlThick
.Range("A1:" & ColumnLetter(RsG.Fields.Count) & "1").Borders(xlInsideVertical).Weight = XlBorderWeight.xlThick
.Range("A1:" & ColumnLetter(RsG.Fields.Count) & "1").Borders(xlInsideHorizontal).Weight = XlBorderWeight.xlThick
.Range("A1:" & ColumnLetter(RsG.Fields.Count) & "1").Borders(xlEdgeBottom).Weight = XlBorderWeight.xlThick
.Range("A1:" & ColumnLetter(RsG.Fields.Count) & "1").Borders(xlEdgeRight).Weight = XlBorderWeight.xlThick
.Range("A1:" & ColumnLetter(RsG.Fields.Count) & "1").Borders(xlEdgeLeft).Weight = XlBorderWeight.xlThick
.Range("A2:" & ColumnLetter(RsG.Fields.Count) & "2").HorizontalAlignment = xlCenter
 

arnelgp

..forever waiting... waiting for jellybean!
Local time
Today, 16:37
Joined
May 7, 2009
Messages
19,169
Record a Macro and format the cells you need.
when you are satisfied, Stop the Macro.
You may now Edit the macro you created to see the code it produced.
 

giddyhead

Registered User.
Local time
Today, 04:37
Joined
Jul 3, 2014
Messages
88
Arnelgp,

Thanks for the info. Will work at it and seek assistance if needed. Thanks
 

Users who are viewing this thread

Top Bottom