Attribute VB_Name = "Module35"
Sub Button47_Click()
Attribute Button47_Click.VB_ProcData.VB_Invoke_Func = " \n14"
'
' Button47_Click Macro
'
Dim Path As String
Dim Filename0 As String
Dim Filename1 As String
Dim Filename2 As String
Dim Filename3 As String
Dim Filename4 As String
Dim Filename5 As String
Dim Filename6 As String
Sheets("INPUT").Select
Filename0 = Range("F77").Value
Filename1 = Range("D62").Value
Filename2 = Range("D63").Value
Filename3 = Range("D64").Value
Filename4 = Range("D65").Value
Filename5 = Range("D66").Value
Filename6 = Range("D67").Value
Path = Worksheets("Input").Range("A70").Value
' Filename6 = Range("B36").Value
Workbooks.Open Path & Filename1
Workbooks.Open Path & Filename2
Workbooks.Open Path & Filename3
Workbooks.Open Path & Filename4
Workbooks.Open Path & Filename5
Workbooks.Open Path & Filename6
'
Range("M21").Select
Workbooks.Open Path & Filename1
' Workbooks.Open fileName:="S:\Stat Reporting\Workpapers\2022\4Q22\MT Wings Support\LAH-4Q22-GLICOA-NAIC.xlsx"
Range("C2:D2").Select
Selection.Copy
' Windows("FLASH MACROS.xlsm").Activate
' Windows("4Q22 Master Template.xlsm").Activate
Windows(Filename0).Activate
Sheets("INPUT").Select
Range("A55").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Range("A56").Select
Workbooks.Open Path & Filename2
' Workbooks.Open fileName:="S:\Stat Reporting\Workpapers\2022\4Q22\MT Wings Support\LAH-4Q22-GIAC-NAIC.xlsx"
Range("C2:D2").Select
application.CutCopyMode = False
Selection.Copy
' Windows("FLASH MACROS.xlsm").Activate
' Windows("4Q22 Master Template.xlsm").Activate
Windows(Filename0).Activate
Sheets("INPUT").Select
Range("A56").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Range("A57").Select
Workbooks.Open Path & Filename3
' Workbooks.Open fileName:="S:\Stat Reporting\Workpapers\2022\4Q22\MT Wings Support\LAH-4Q22-BLICOA-NAIC.xlsx"
Range("C2:D2").Select
application.CutCopyMode = False
Selection.Copy
' Windows("FLASH MACROS.xlsm").Activate
' Windows("4Q22 Master Template.xlsm").Activate
Windows(Filename0).Activate
Sheets("INPUT").Select
Range("A57").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Range("A58").Select
Workbooks.Open Path & Filename4
' Workbooks.Open fileName:="S:\Stat Reporting\Workpapers\2022\4Q22\MT Wings Support\LAH-4Q22-PALIC-NAIC.xlsx"
Range("C2:D2").Select
application.CutCopyMode = False
Selection.Copy
' Windows("FLASH MACROS.xlsm").Activate
' Windows("4Q22 Master Template.xlsm").Activate
Windows(Filename0).Activate
Sheets("INPUT").Select
Range("A58").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Range("A59").Select
Workbooks.Open Path & Filename5
' Workbooks.Open fileName:="S:\Stat Reporting\Workpapers\2022\4Q22\MT Wings Support\LAH-4Q22-FSLIC-NAIC.xlsx"
Range("C2:D2").Select
application.CutCopyMode = False
Selection.Copy
' Windows("FLASH MACROS.xlsm").Activate
' Windows("4Q22 Master Template.xlsm").Activate
Windows(Filename0).Activate
Sheets("INPUT").Select
Range("A59").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Range("A60").Select
Workbooks.Open Path & Filename6
' Workbooks.Open fileName:="S:\Stat Reporting\Workpapers\2022\4Q22\MT Wings Support\LAH-4Q22-SALIC-NAIC.xlsx"
Range("C2:D2").Select
application.CutCopyMode = False
Selection.Copy
' Windows("FLASH MACROS.xlsm").Activate
' Windows("4Q22 Master Template.xlsm").Activate
Windows(Filename0).Activate
Sheets("INPUT").Select
Range("A60").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Range("A61").Select
' Windows("4Q22 Master Template.xlsm").Activate
Windows(Filename0).Activate
Sheets("Annual Exhibits - Flash").Select
Range("C31:AG36").Select
Selection.Copy
Range("C5").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Range("C13").Select
Range("C63:I227").Select
Selection.Copy
Range("M63").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Range("C13").Select
Range("K42:M47").Select
Selection.Copy
Range("K15").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Range("C13").Select
Sheets("INPUT").Select
Range("A79").Select
Windows(Filename1).Activate
ActiveWorkbook.Close
Windows(Filename2).Activate
ActiveWorkbook.Close
Windows(Filename3).Activate
ActiveWorkbook.Close
Windows(Filename4).Activate
ActiveWorkbook.Close
Windows(Filename5).Activate
ActiveWorkbook.Close
Windows(Filename6).Activate
ActiveWorkbook.Close
' Windows("BLICOA LAH-2022-A-NAIC-20221214144407_Mult_0.xlsx").Activate
' ActiveWorkbook.Close
End Sub