VBA Code for add formulas and vlookup into workbook

[CuteLeo]

Good morning. How are you all? Hope you all are doing great.

I'm looking for some urgent assistance in VBA codes. I have to make one VBA programme .xlsm. I've two files. One is my main file and other one is my lookup file.
I want that when I run program, it ask me about my required file and I tell about file (b/c file changes every month). After it receives given file it will apply 2 formulas, gross amount and net amount (after finding their required columns for formula) and day part lookup from lookup file. All these columns will be added at the end of the last available empty column. Below are the formulas:

gross amount = (unit rate/60) * duration
net amount = (gross amount/duration) * 30
Day part lookup from lookup file
Note: Column position isn't fixed and column heading names are fixed.

I've tried by myself to write a code, few lines are there and need assistance for a complete code according with my requirement. Below are few lines and 2 files are also attached.

Private Sub Daypartandgrossandnetamount()

    'my Variables
    Dim ws1 As Worksheet, ws2 As Worksheet
    Dim lastrow  As Long
    Dim lastcolumn  As Long
   
    'Asking for opening required file
    If ws1 Is Nothing Then
        ChDrive ThisWorkbook.Path: ChDir ThisWorkbook.Path
        fn = Application.GetOpenFilename("ExcelBooks,*.xlsx", , "Select [Required File.xlsx]")
        If fn = "False" Then Exit Sub
        Set ws1 = Workbooks.Open(fn, False).Sheets("Sheet1")
    End If

    With ws1
   
    'Defined my last row & column
        lastrow = .Range("A" & .Rows.Count).End(xlUp).Row
        lastcolumn = Cells(1, Columns.Count).End(xlToLeft).Column
       
    End With
       

End Sub

I hope you understand what I mean. My english isn't good. If you have any problem then you may ask me about that. Thanks in advance for helping me.

Raw file.xlsx
	K
11
Sheet1

Lookups.xlsx
	I
11
Lookups

 

[CuteLeo]

Sorry my files weren't attached properly. Below are proper attached files.

Raw File:

Raw file.xlsx
	A	B	C	D	E	F	G	H	I	J
1	Time	Duration	Slot_Position	Slot_Count	Slot_Position2	Slot_Count2	Slot_Position_All	Slot_Count_All	Ad_Slot	Unit Rate
2	03:30:45	10	3	39	3	40	3	41	Third	41
3	03:37:45	10	31	39	32	40	32	41	Other	41
4	03:39:23	10	38	39	39	40	39	41	Second last	41
5	04:03:56	10	2	12	2	12	2	17	Second	17
6	04:23:04	9	9	17	10	18	12	20	Other	20
7	01:03:31	5	0	0	0	0	17	17	0	17
8	01:32:41	8	0	0	0	0	5	23	0	23
9	05:25:05	7	0	0	0	0	6	33	0	33
10	05:30:09	5	0	0	0	0	32	33	0	33
11	06:46:40	8	0	0	0	0	17	36	0	36
12	07:17:55	8	0	0	0	0	12	29	0	29
13	09:05:14	5	0	0	0	0	17	17	0	17
14	14:36:36	6	0	0	0	0	21	24	0	24
15	17:07:14	7	0	0	0	0	17	17	0	17
16	08:11:35	2	0	0	0	0	2	7	0	7
17	08:14:00	10	0	0	0	0	3	18	0	18
18	08:14:43	10	0	0	0	0	5	18	0	18
19	08:16:23	11	0	0	0	0	10	18	0	18
20	08:17:34	11	0	0	0	0	13	18	0	18
21	08:35:41	30	17	58	18	60	18	60	Other	60
22	08:45:04	30	41	58	42	60	42	60	Other	60
23	09:34:48	30	13	14	14	15	14	15	Second last	15
24	09:45:25	30	13	16	13	17	13	17	Other	17
25	10:37:01	30	7	10	8	11	8	11	Other	11
26	10:47:21	30	7	9	8	11	8	11	Third last	11
27	11:08:49	3	0	0	0	0	8	8	0	8
28	11:47:34	10	0	0	0	0	6	18	0	18
29	11:47:51	11	0	0	0	0	7	18	0	18
30	11:49:52	11	0	0	0	0	15	18	0	18
31	11:50:08	11	0	0	0	0	16	18	0	18
32	11:58:33	10	3	5	5	8	5	10	Third	10
33	12:58:10	10	7	10	9	13	9	16	Other	16
34	13:09:39	2	0	0	0	0	2	7	0	7
35	13:58:15	10	12	15	12	16	12	19	Other	19
36	14:19:20	10	0	0	0	0	3	14	0	14
37	14:20:54	11	0	0	0	0	10	14	0	14
38	14:21:16	10	0	0	0	0	12	14	0	14
39	14:21:37	11	0	0	0	0	14	14	0	14
40	14:58:25	11	9	12	11	15	11	18	Other	18
41	15:58:03	10	8	11	10	14	10	17	Other	17
42	16:31:49	11	0	0	0	0	5	23	0	23
43	16:32:01	10	0	0	0	0	6	23	0	23
44	16:33:38	10	0	0	0	0	14	23	0	23
45	16:34:51	10	0	0	0	0	21	23	0	23
46	16:58:20	10	26	29	27	31	29	36	Other	36
47	17:58:17	10	12	15	13	17	13	20	Other	20
48	19:58:36	10	11	14	11	15	11	18	Other	18
49	20:58:45	10	26	28	27	30	29	36	Third last	36
50	21:30:01	2	0	0	0	0	2	10	0	10
51	00:27:40	10	3	7	3	11	3	13	Third	13
52	01:29:15	10	5	8	5	14	7	16	Other	16
53	01:30:19	10	8	8	9	14	11	16	last	16
54	03:26:25	10	14	24	15	29	15	32	Other	32
55	03:40:33	10	3	23	3	25	3	29	Third	29
56	04:24:14	10	2	22	2	29	2	35	Second	35
57	04:26:14	10	8	22	9	29	10	35	Other	35
58	04:31:02	10	20	22	25	29	28	35	Third last	35
59	04:48:12	10	10	13	11	17	11	22	Other	22
60	08:37:22	6	0	0	0	0	2	2	0	2
61	08:38:19	10	2	2	2	2	2	2	Second	2
62	09:30:40	7	0	0	0	0	22	22	0	22
63	09:31:33	10	2	2	2	2	2	2	Second	2
64	10:32:17	7	0	0	0	0	19	19	0	19
65	10:33:28	10	2	7	2	8	2	8	Second	8
66	11:39:29	5	0	0	0	0	2	2	0	2
67	11:40:39	11	2	8	2	10	2	10	Second	10
68	12:32:27	6	0	0	0	0	14	14	0	14
69	12:33:39	18	2	5	2	6	2	7	Second	7
70	13:31:45	6	0	0	0	0	21	21	0	21
71	13:32:50	18	2	7	2	8	2	8	Second	8
72	14:31:10	6	0	0	0	0	10	10	0	10
73	14:32:21	18	2	3	2	3	2	3	Second	3
74	16:31:35	6	0	0	0	0	22	22	0	22
75	16:32:45	16	2	11	2	12	2	12	Second	12
76	17:31:10	7	0	0	0	0	40	40	0	40
77	17:32:25	14	2	6	2	7	2	9	Second	9
78	18:51:35	10	10	14	12	18	12	24	Other	24
79	00:40:01	10	5	5	5	5	5	5	last	5
80	12:30:52	10	7	7	7	7	7	7	last	7
81	16:56:09	18	4	12	4	14	5	17	Other	17
82	17:17:55	17	5	14	5	14	5	14	Other	14
83	20:06:49	10	3	6	4	7	4	7	Third	7
84	20:22:19	20	7	7	7	7	7	7	last	7
85	20:40:53	9	2	7	2	7	2	7	Second	7
86	20:57:55	9	2	8	2	8	2	9	Second	9
87	03:38:42	10	31	36	32	37	34	39	Other	39
88	03:39:17	10	34	36	35	37	37	39	Third last	39
89	04:02:03	10	3	11	3	11	3	11	Third	11
90	04:03:14	10	8	11	8	11	8	11	Other	11
91	20:21:06	10	19	41	19	42	20	45	Other	45
92	20:27:23	6	0	0	41	42	44	45	0	45
93	20:38:14	10	20	37	20	38	21	40	Other	40
94	20:44:42	6	0	0	37	38	39	40	0	40
95	21:16:03	10	14	37	14	38	15	41	Other	41
96	21:20:46	6	0	0	27	38	30	41	0	41
97	21:51:31	6	0	0	12	13	13	14	0	14
98	22:25:45	10	13	25	13	26	14	29	Other	29
99	22:27:32	6	0	0	20	26	22	29	0	29
100	22:45:12	10	6	10	6	10	7	11	Other	11
Sheet1

Lookup File:

Lookups.xlsx
	B	C
4	Daypart
5	Hour	Daypart
6	0	Late Night
7	1	Late Night
8	2	Late Night
9	3	Late Night
10	4	Late Night
11	5	Late Night
12	6	Morning
13	7	Morning
14	8	Morning
15	9	Morning
16	10	Morning
17	11	Morning
18	12	Afternoon
19	13	Afternoon
20	14	Afternoon
21	15	Afternoon
22	16	Afternoon
23	17	Afternoon
24	18	Evening
25	19	Evening
26	20	Evening
27	21	Night
28	22	Night
29	23	Night
Lookups

 

[CuteLeo]

Hi, Good day,
No one Is there to help me out kindly? If you don't understand my problem then I will explain. I request please consider answering my query.