copy from personal macrobook

This commit is contained in:
Paul Trowbridge 2024-09-24 11:35:18 -04:00
parent 5fe9056aac
commit acfef56c16

17
FL.bas
View File

@ -2108,3 +2108,20 @@ Sub load_index()
End Sub End Sub
Sub DataStyles()
Dim cb As Workbook
Dim cs As Worksheet
Dim sty As Worksheet
Set cb = ActiveWorkbook
Set cs = ActiveSheet
Workbooks("PERSONAL.XLSB").Sheets("Styles").Copy Before:=cs
Set sty = ActiveSheet
sty.Visible = xlSheetHidden
cs.Activate
End Sub