Appendix Thread. ( Codes for other Threads, ( Avinash ).)

Corresponding Sheet1 for the data Sheet2 of the last 3 posts:

_____ Workbook: Data Sheet v3.xls ( Using Excel 2007 32 bit )

Row\Col	A	B	C	D
1	Date	Channels	start time	New Time
2	11.15.2017	A NEWS	20:07:00
3	11.15.2017	A NEWS	20:14:00
4	11.15.2017	A NEWS	20:21:00
5	11.15.2017	A NEWS	20:28:00
6	11.15.2017	A NEWS	20:35:00
7	11.15.2017	A NEWS	20:42:00
8	11.15.2017	A NEWS	20:49:00
9	11.15.2017	A NEWS	20:56:00
10	11.15.2017	A NEWS	22:49:00
11	11.15.2017	A NEWS	22:56:00
12	11.18.2017	A NEWS	23:15:00
13	11.18.2017	A NEWS	23:30:00
14	11.18.2017	A NEWS	23:45:00
15	11.16.2017	B NEWS	20:29:00
16	11.16.2017	B NEWS	20:59:00
17	11.18.2017	B NEWS	21:10:00
18	11.18.2017	B NEWS	21:20:00
19	11.18.2017	B NEWS	21:30:00
20	11.18.2017	B NEWS	21:40:00
21	11.18.2017	B NEWS	21:50:00
22	11.17.2017	C NEWS	22:13:00
23	11.17.2017	C NEWS	22:26:00
24	11.17.2017	C NEWS	22:39:00
25	11.17.2017	C NEWS	22:52:00
26	11.17.2017	D NEWS	23:13:00
27
28

Worksheet: Sheet1v3

Full data Sheet1 data ( part 1)

Code:

---

Channel        Date        AdStart        MidBreak        Break_Start        Break_End        Hour
A NEWS        15.11.2017        20:19:12        Mid Break-1        20:19:08        20:24:07        20
A NEWS        15.11.2017        20:19:32        Mid Break-1        20:19:08        20:24:07        20
A NEWS        15.11.2017        20:19:49        Mid Break-1        20:19:08        20:24:07        20
A NEWS        15.11.2017        20:20:01        Mid Break-1        20:19:08        20:24:07        20
A NEWS        15.11.2017        20:20:47        Mid Break-1        20:19:08        20:24:07        20
A NEWS        15.11.2017        20:21:10        Mid Break-1        20:19:08        20:24:07        20
A NEWS        15.11.2017        20:21:20        Mid Break-1        20:19:08        20:24:07        20
A NEWS        15.11.2017        20:21:30        Mid Break-1        20:19:08        20:24:07        20
A NEWS        15.11.2017        20:21:46        Mid Break-1        20:19:08        20:24:07        20
A NEWS        15.11.2017        20:22:55        Mid Break-1        20:19:08        20:24:07        20
A NEWS        15.11.2017        20:23:07        Mid Break-1        20:19:08        20:24:07        20
A NEWS        15.11.2017        20:23:42        Mid Break-1        20:19:08        20:24:07        20
A NEWS        15.11.2017        20:23:57        Mid Break-1        20:19:08        20:24:07        20
A NEWS        15.11.2017        20:24:52        Mid Break-2        20:24:52        20:27:26        20
A NEWS        15.11.2017        20:25:07        Mid Break-2        20:24:52        20:27:26        20
A NEWS        15.11.2017        20:25:52        Mid Break-2        20:24:52        20:27:26        20
A NEWS        15.11.2017        20:26:52        Mid Break-2        20:24:52        20:27:26        20
A NEWS        15.11.2017        20:27:03        Mid Break-2        20:24:52        20:27:26        20
A NEWS        15.11.2017        20:42:50        Mid Break-3        20:42:46        20:50:06        20
A NEWS        15.11.2017        20:43:02        Mid Break-3        20:42:46        20:50:06        20
A NEWS        15.11.2017        20:43:32        Mid Break-3        20:42:46        20:50:06        20
A NEWS        15.11.2017        20:43:57        Mid Break-3        20:42:46        20:50:06        20
A NEWS        15.11.2017        20:44:12        Mid Break-3        20:42:46        20:50:06        20
A NEWS        15.11.2017        20:44:24        Mid Break-3        20:42:46        20:50:06        20
A NEWS        15.11.2017        20:44:40        Mid Break-3        20:42:46        20:50:06        20
A NEWS        15.11.2017        20:44:56        Mid Break-3        20:42:46        20:50:06        20
A NEWS        15.11.2017        20:45:27        Mid Break-3        20:42:46        20:50:06        20
A NEWS        15.11.2017        20:46:36        Mid Break-3        20:42:46        20:50:06        20
A NEWS        15.11.2017        20:47:36        Mid Break-3        20:42:46        20:50:06        20
A NEWS        15.11.2017        20:47:46        Mid Break-3        20:42:46        20:50:06        20
A NEWS        15.11.2017        20:48:21        Mid Break-3        20:42:46        20:50:06        20
A NEWS        15.11.2017        20:48:36        Mid Break-3        20:42:46        20:50:06        20
A NEWS        15.11.2017        20:48:59        Mid Break-3        20:42:46        20:50:06        20
A NEWS        15.11.2017        20:49:35        Mid Break-3        20:42:46        20:50:06        20
A NEWS        15.11.2017        20:49:47        Mid Break-3        20:42:46        20:50:06        20
A NEWS        15.11.2017        20:57:23        Casual        20:57:14        20:59:57        20
A NEWS        15.11.2017        20:57:34        Casual        20:57:14        20:59:57        20
A NEWS        15.11.2017        20:57:45        Casual        20:57:14        20:59:57        20
A NEWS        15.11.2017        20:58:00        Casual        20:57:14        20:59:57        20
A NEWS        15.11.2017        20:58:07        Casual        20:57:14        20:59:57        20
A NEWS        15.11.2017        20:58:16        Casual        20:57:14        20:59:57        20
A NEWS        15.11.2017        20:58:33        Casual        20:57:14        20:59:57        20
A NEWS        15.11.2017        20:58:42        Casual        20:57:14        20:59:57        20
A NEWS        15.11.2017        20:59:01        Casual        20:57:14        20:59:57        20
A NEWS        15.11.2017        22:26:58        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:27:18        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:27:36        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:28:06        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:28:31        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:28:46        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:29:03        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:30:03        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:30:18        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:30:38        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:30:53        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:31:02        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:31:18        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:31:53        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:32:09        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:32:39        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:32:54        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:33:06        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:33:31        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:47:06        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:47:51        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:48:51        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:49:21        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:49:33        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:49:48        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:50:08        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:50:28        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:50:44        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:51:14        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:51:51        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:52:26        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:52:42        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:53:03        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:53:18        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:53:42        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:57:15        Casual        22:57:11        23:00:05        22
A NEWS        15.11.2017        22:57:30        Casual        22:57:11        23:00:05        22
A NEWS        15.11.2017        22:58:00        Casual        22:57:11        23:00:05        22
A NEWS        15.11.2017        22:58:14        Casual        22:57:11        23:00:05        22
A NEWS        15.11.2017        22:58:24        Casual        22:57:11        23:00:05        22
A NEWS        15.11.2017        22:58:41        Casual        22:57:11        23:00:05        22
A NEWS        15.11.2017        22:58:48        Casual        22:57:11        23:00:05        22
A NEWS        15.11.2017        22:59:08        Casual        22:57:11        23:00:05        22
A NEWS        18.11.2017        23:01:21        Mid Break-1        23:01:17        23:03:21        23
A NEWS        18.11.2017        23:01:37        Mid Break-1        23:01:17        23:03:21        23
A NEWS        18.11.2017        23:01:57        Mid Break-1        23:01:17        23:03:21        23
A NEWS        18.11.2017        23:02:27        Mid Break-1        23:01:17        23:03:21        23
A NEWS        18.11.2017        23:02:57        Mid Break-1        23:01:17        23:03:21        23
A NEWS        18.11.2017        23:16:35        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:16:56        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:17:20        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:17:37        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:17:52        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:18:02        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:18:17        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:18:26        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:18:38        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:19:13        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:19:43        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:19:53        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:20:00        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:20:25        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:21:00        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:21:17        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:21:47        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:21:54        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:22:09        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:22:19        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:33:57        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:34:28        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:34:43        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:34:53        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:35:01        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:35:11        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:35:46        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:36:01        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:36:11        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:36:23        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:36:38        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:36:53        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:37:03        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:37:15        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:37:52        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:37:59        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:39:00        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:39:24        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:39:39        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:40:10        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:41:10        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:41:20        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:41:35        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:42:10        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:42:20        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:42:51        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:43:10        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:43:40        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:44:39        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:57:21        Casual        23:57:21        23:59:58        23
A NEWS        18.11.2017        23:57:31        Casual        23:57:21        23:59:58        23
A NEWS        18.11.2017        23:57:39        Casual        23:57:21        23:59:58        23
A NEWS        18.11.2017        23:57:57        Casual        23:57:21        23:59:58        23
A NEWS        18.11.2017        23:58:13        Casual        23:57:21        23:59:58        23
A NEWS        18.11.2017        23:58:23        Casual        23:57:21        23:59:58        23
A NEWS        18.11.2017        23:58:39        Casual        23:57:21        23:59:58        23
A NEWS        18.11.2017        23:58:46        Casual        23:57:21        23:59:58        23
A NEWS        18.11.2017        23:59:06        Casual        23:57:21        23:59:58        23
B NEWS        16.11.2017        20:01:24        Mid Break-2        20:01:24        20:01:50        20
B NEWS        16.11.2017        20:15:08        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:15:33        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:15:43        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:15:58        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:16:33        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:16:48        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:17:04        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:17:19        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:17:34        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:17:44        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:18:02        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:18:27        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:18:42        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:19:12        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:19:32        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:19:47        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:31:41        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:32:12        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:32:37        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:32:52        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:33:02        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:33:22        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:33:32        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:33:57        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:34:12        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:34:49        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:35:34        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:36:04        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:36:19        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:36:39        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:36:54        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:37:13        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:37:44        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:38:09        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:38:24        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:38:49        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:38:59        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:39:39        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:40:04        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:40:49        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:41:04        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:41:34        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:41:49        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:42:04        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:42:14        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:42:29        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:42:49        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:53:38        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:54:03        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:54:14        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:54:29        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:54:43        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:55:03        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:55:13        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:55:28        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:55:38        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:55:48        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:56:18        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:56:33        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:56:58        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:57:13        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:57:28        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:57:43        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:57:53        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:58:13        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:58:54        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:59:29        Casual        20:53:38        21:00:02        20
B NEWS        18.11.2017        21:07:03        Mid Break-2        21:07:03        21:07:29        21
B NEWS        18.11.2017        21:23:41        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:24:26        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:24:36        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:24:57        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:25:07        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:25:17        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:25:47        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:26:12        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:26:27        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:26:52        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:27:02        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:27:32        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:27:47        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:36:02        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:36:37        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:36:56        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:37:26        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:37:36        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:37:51        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:38:28        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:38:43        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:38:53        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:39:18        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:39:38        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:40:08        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:40:33        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:41:25        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:45:02        Mid Break-6        21:44:41        21:45:33        21
B NEWS        18.11.2017        21:46:22        Mid Break-7        21:46:22        21:49:35        21
B NEWS        18.11.2017        21:46:48        Mid Break-7        21:46:22        21:49:35        21
B NEWS        18.11.2017        21:47:08        Mid Break-7        21:46:22        21:49:35        21
B NEWS        18.11.2017        21:47:23        ..................................cont. in next post

---

Full data input sheet2 cont........

Code:

---

....................................................                Casual        20:57:14        20:59:57        20
A NEWS        15.11.2017        20:58:33        Casual        20:57:14        20:59:57        20
A NEWS        15.11.2017        20:58:42        Casual        20:57:14        20:59:57        20
A NEWS        15.11.2017        20:59:01        Casual        20:57:14        20:59:57        20
A NEWS        15.11.2017        22:26:58        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:27:18        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:27:36        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:28:06        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:28:31        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:28:46        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:29:03        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:30:03        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:30:18        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:30:38        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:30:53        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:31:02        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:31:18        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:31:53        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:32:09        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:32:39        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:32:54        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:33:06        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:33:31        Mid Break-1        22:26:54        22:33:55        22
A NEWS        15.11.2017        22:47:06        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:47:51        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:48:51        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:49:21        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:49:33        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:49:48        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:50:08        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:50:28        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:50:44        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:51:14        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:51:51        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:52:26        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:52:42        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:53:03        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:53:18        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:53:42        Mid Break-2        22:47:02        22:54:02        22
A NEWS        15.11.2017        22:57:15        Casual        22:57:11        23:00:05        22
A NEWS        15.11.2017        22:57:30        Casual        22:57:11        23:00:05        22
A NEWS        15.11.2017        22:58:00        Casual        22:57:11        23:00:05        22
A NEWS        15.11.2017        22:58:14        Casual        22:57:11        23:00:05        22
A NEWS        15.11.2017        22:58:24        Casual        22:57:11        23:00:05        22
A NEWS        15.11.2017        22:58:41        Casual        22:57:11        23:00:05        22
A NEWS        15.11.2017        22:58:48        Casual        22:57:11        23:00:05        22
A NEWS        15.11.2017        22:59:08        Casual        22:57:11        23:00:05        22
A NEWS        18.11.2017        23:01:21        Mid Break-1        23:01:17        23:03:21        23
A NEWS        18.11.2017        23:01:37        Mid Break-1        23:01:17        23:03:21        23
A NEWS        18.11.2017        23:01:57        Mid Break-1        23:01:17        23:03:21        23
A NEWS        18.11.2017        23:02:27        Mid Break-1        23:01:17        23:03:21        23
A NEWS        18.11.2017        23:02:57        Mid Break-1        23:01:17        23:03:21        23
A NEWS        18.11.2017        23:16:35        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:16:56        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:17:20        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:17:37        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:17:52        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:18:02        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:18:17        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:18:26        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:18:38        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:19:13        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:19:43        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:19:53        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:20:00        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:20:25        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:21:00        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:21:17        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:21:47        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:21:54        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:22:09        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:22:19        Mid Break-2        23:16:35        23:22:43        23
A NEWS        18.11.2017        23:33:57        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:34:28        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:34:43        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:34:53        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:35:01        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:35:11        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:35:46        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:36:01        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:36:11        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:36:23        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:36:38        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:36:53        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:37:03        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:37:15        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:37:52        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:37:59        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:39:00        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:39:24        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:39:39        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:40:10        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:41:10        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:41:20        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:41:35        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:42:10        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:42:20        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:42:51        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:43:10        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:43:40        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:44:39        Mid Break-3        23:33:53        23:44:55        23
A NEWS        18.11.2017        23:57:21        Casual        23:57:21        23:59:58        23
A NEWS        18.11.2017        23:57:31        Casual        23:57:21        23:59:58        23
A NEWS        18.11.2017        23:57:39        Casual        23:57:21        23:59:58        23
A NEWS        18.11.2017        23:57:57        Casual        23:57:21        23:59:58        23
A NEWS        18.11.2017        23:58:13        Casual        23:57:21        23:59:58        23
A NEWS        18.11.2017        23:58:23        Casual        23:57:21        23:59:58        23
A NEWS        18.11.2017        23:58:39        Casual        23:57:21        23:59:58        23
A NEWS        18.11.2017        23:58:46        Casual        23:57:21        23:59:58        23
A NEWS        18.11.2017        23:59:06        Casual        23:57:21        23:59:58        23
B NEWS        16.11.2017        20:01:24        Mid Break-2        20:01:24        20:01:50        20
B NEWS        16.11.2017        20:15:08        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:15:33        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:15:43        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:15:58        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:16:33        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:16:48        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:17:04        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:17:19        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:17:34        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:17:44        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:18:02        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:18:27        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:18:42        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:19:12        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:19:32        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:19:47        Mid Break-1        20:15:08        20:20:20        20
B NEWS        16.11.2017        20:31:41        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:32:12        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:32:37        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:32:52        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:33:02        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:33:22        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:33:32        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:33:57        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:34:12        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:34:49        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:35:34        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:36:04        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:36:19        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:36:39        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:36:54        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:37:13        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:37:44        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:38:09        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:38:24        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:38:49        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:38:59        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:39:39        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:40:04        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:40:49        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:41:04        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:41:34        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:41:49        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:42:04        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:42:14        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:42:29        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:42:49        Mid Break-2        20:31:41        20:43:24        20
B NEWS        16.11.2017        20:53:38        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:54:03        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:54:14        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:54:29        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:54:43        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:55:03        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:55:13        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:55:28        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:55:38        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:55:48        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:56:18        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:56:33        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:56:58        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:57:13        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:57:28        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:57:43        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:57:53        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:58:13        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:58:54        Casual        20:53:38        21:00:02        20
B NEWS        16.11.2017        20:59:29        Casual        20:53:38        21:00:02        20
B NEWS        18.11.2017        21:07:03        Mid Break-2        21:07:03        21:07:29        21
B NEWS        18.11.2017        21:23:41        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:24:26        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:24:36        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:24:57        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:25:07        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:25:17        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:25:47        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:26:12        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:26:27        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:26:52        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:27:02        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:27:32        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:27:47        Mid Break-3        21:23:41        21:28:06        21
B NEWS        18.11.2017        21:36:02        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:36:37        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:36:56        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:37:26        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:37:36        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:37:51        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:38:28        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:38:43        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:38:53        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:39:18        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:39:38        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:40:08        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:40:33        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:41:25        Mid Break-5        21:36:02        21:42:00        21
B NEWS        18.11.2017        21:45:02        Mid Break-6        21:44:41        21:45:33        21
B NEWS        18.11.2017        21:46:22        Mid Break-7        21:46:22        21:49:35        21
B NEWS        18.11.2017        21:46:48        Mid Break-7        21:46:22        21:49:35        21
B NEWS        18.11.2017        21:47:08        Mid Break-7        21:46:22        21:49:35        21
B NEWS        18.11.2017        21:47:23        Mid Break-7        21:46:22        21:49:35        21
B NEWS        18.11.2017        21:47:58        Mid Break-7        21:46:22        21:49:35        21
B NEWS        18.11.2017        21:48:23        Mid Break-7        21:46:22        21:49:35        21
B NEWS        18.11.2017        21:48:43        Mid Break-7        21:46:22        21:49:35        21
B NEWS        18.11.2017        21:48:58        Mid Break-7        21:46:22        21:49:35        21
B NEWS        18.11.2017        21:49:10        Mid Break-7        21:46:22        21:49:35        21
B NEWS        18.11.2017        21:49:20        Mid Break-7        21:46:22        21:49:35        21
B NEWS        18.11.2017        21:52:48        Casual        21:52:48        21:59:58        21
B NEWS        18.11.2017        21:53:08        Casual        21:52:48        21:59:58        21
B NEWS        18.11.2017        21:53:23        Casual        21:52:48        21:59:58        21
B NEWS        18.11.2017        21:53:58        Casual        21:52:48        21:59:58        21
B NEWS        18.11.2017        21:54:53        Casual        21:52:48        21:59:58        21
B NEWS        18.11.2017        21:55:13        Casual        21:52:48        21:59:58        21
B NEWS        18.11.2017        21:55:28        Casual        21:52:48        21:59:58        21
B NEWS        18.11.2017        21:55:40        Casual        21:52:48        21:59:58        21
B NEWS        18.11.2017        21:56:40        Casual        21:52:48        21:59:58        21
B NEWS        18.11.2017        21:56:56        Casual        21:52:48        21:59:58        21
B NEWS        18.11.2017        21:57:10        Casual        21:52:48        21:59:58        21
B NEWS        18.11.2017        21:57:53        Casual        21:52:48        21:59:58        21
B NEWS        18.11.2017        21:59:03        Casual        21:52:48        21:59:58        21
B NEWS        18.11.2017        21:59:25        Casual        21:52:48        21:59:58        21
C NEWS        17.11.2017        22:01:33        Casual        22:01:33        22:03:11        22
C NEWS        17.11.2017        22:02:01        Casual        22:01:33        22:03:11        22
C NEWS        17.11.2017        22:02:16        Casual        22:01:33        22:03:11        22
C NEWS        17.11.2017        22:02:51        Casual        22:01:33        22:03:11        22
C NEWS        17.11.2017        22:18:46        Mid Break-1        22:18:46        22:20:31        22
C NEWS        17.11.2017        22:18:56        Mid Break-1        22:18:46        22:20:31        22
C NEWS        17.11.2017        22:19:32        Mid Break-1        22:18:46        22:20:31        22
C NEWS        17.11.2017        22:41:24        Mid Break-2        22:41:24        22:47:44        22
C NEWS        17.11.2017        22:41:34        Mid Break-2        22:41:24        22:47:44        22
C NEWS        17.11.2017        22:42:01        Mid Break-2        22:41:24        22:47:44        22
C NEWS        17.11.2017        22:42:31        Mid Break-2        22:41:24        22:47:44        22
C NEWS        17.11.2017        22:43:06        Mid Break-2        22:41:24        22:47:44        22
C NEWS        17.11.2017        22:43:16        Mid Break-2        22:41:24        22:47:44        22
C NEWS        17.11.2017        22:43:26        Mid Break-2        22:41:24        22:47:44        22
C NEWS        17.11.2017        22:44:07        Mid Break-2        22:41:24        22:47:44        22
C NEWS        17.11.2017        22:44:49        Mid Break-2        22:41:24        22:47:44        22
C NEWS        17.11.2017        22:45:26        Mid Break-2        22:41:24        22:47:44        22
C NEWS        17.11.2017        22:46:24        Mid Break-2        22:41:24        22:47:44        22
C NEWS        17.11.2017        22:46:34        Mid Break-2        22:41:24        22:47:44        22
C NEWS        17.11.2017        22:46:44        Mid Break-2        22:41:24        22:47:44        22
C NEWS        17.11.2017        22:47:25        Mid Break-2        22:41:24        22:47:44        22
C NEWS        17.11.2017        22:58:10        Casual        22:57:26        22:59:55        22

---

Version 3 code for Haider, for this post:
http://www.excelfox.com/forum/showth...ll=1#post11148

Code:

---

Option Explicit '
Sub HaiderAdSlots_v3() ' http://www.excelfox.com/forum/showthread.php/2330-Fill-Column-Based-on-Actual-Time?p=11124&viewfull=1#post11124
Rem 1 Worksheets info
Dim Ws1 As Worksheet, Ws2 As Worksheet
 Set Ws1 = ThisWorkbook.Worksheets("Sheet1v3"): Set Ws2 = ThisWorkbook.Worksheets("Sheet2v3")
Dim Lr1 As Long, Lr2 As Long
 Let Lr1 = Ws1.Range("A" & Ws1.Range("A" & Ws1.Rows.Count & "").End(xlUp).Row & "").Row: Let Lr2 = Ws1.Range("A" & Ws2.Range("A" & Ws2.Rows.Count & "").End(xlUp).Row & "").Row
'1b) data arrays, original data
Dim arrInSht2() As Variant, arrOutSht1() As Variant
 Let arrInSht2() = Ws2.Range("A1:G" & Lr2 + 1 & "").Value2 ' !!! I need +1 as a "bodge workaroung to prevent an index out of range error  --- here
 Let arrOutSht1() = Ws1.Range("A1:C" & Lr1 & "").Value2
'1b)(ii) extra "column" for outout
ReDim Preserve arrOutSht1(1 To Lr1, 1 To 4) ' we may add a last dimension, but must keep the others the same as they were
Rem 2 Group ident arrays, for convenience
'2a) an array of the idents for all data rows in output sheet1
Dim arrOutId() As String
 ReDim arrOutId(1 To Lr1)
Dim cnt As Long
    For cnt = 2 To Lr1 '      Channel            Date in Long number form              Hour as number
    Let arrOutId(cnt) = arrOutSht1(cnt, 2) & " | " & arrOutSht1(cnt, 1) & " | " & CLng(Hour(arrOutSht1(cnt, 3))) ' add to array of all idents in rows 2 to last row
    Next cnt
'2b) idents for input historical data, includung an additonal arrray of just the unique ident values
Dim arrInId() As String
 ReDim arrInId(1 To Lr2 + 1)
    For cnt = 2 To Lr2 '      Channel          Date in Long number form          Hour as number
    Let arrInId(cnt) = arrInSht2(cnt, 1) & " | " & arrInSht2(cnt, 2) & " | " & CLng(arrInSht2(cnt, 7))          ' add to array of all idents in rows 2 to last row
    Dim strEnucsIds As String:  ' a string of unique idents to be used to create an additonal arrray of just the unique ident values
        If InStr(1, strEnucsIds, arrInId(cnt), vbBinaryCompare) = 0 Then Let strEnucsIds = strEnucsIds & arrInId(cnt) & "####"
    Next cnt
 Let strEnucsIds = Left(strEnucsIds, Len(strEnucsIds) - 4) ' takes off last "####"
Dim arrEnucsIds() As String: Let arrEnucsIds() = Split(strEnucsIds, "####", -1, vbBinaryCompare) ' additonal arrray of just the unique ident values
Dim CntIds As Long: Let CntIds = UBound(arrEnucsIds()) + 1 ' +1 because the index numbers of array generated by Split function goes like  0 1 2 3 4 ... etc.  So the total number of elements is 1 more than the ubound: .... (Ubound gives the index number of the last element, not necerssarily the numberr of elements)
 'Debug.Print strEnucsIds
'2c) We know the number of unique idents , so can assign an array, a groupings array, to hold each group of times
Dim arrGrpTimes() As Variant ' I must use variant, as that is the only thing that can hild an array - i will be putting arrasy of the AdStart times in the second dimension ("second column")
 ReDim arrGrpTimes(1 To CntIds, 1 To 2) ' The first column has the unique ID, and the second column will be itself an array of the historical AdStart times for that group
Rem 3 Looping to build groupings array
Dim HisCnt As Long  '  MAIN LOOP Count for rows of historical data ================================================
 Let HisCnt = 1    ' this is so +1 gives the start at row 2, so as not to consider the header                ....**
    Do While HisCnt < Lr2
    Dim GrpCnt As Long ' this will be used for the first dimension("row") of our
    Dim strTimes As String: Let strTimes = " " ' reset for next group of AdStart times
    Let GrpCnt = GrpCnt + 1 ' reset to index/first dimension("row") next group of AdStart times
        Do ' This INNER LOOP will be repeated for each group -------------------------INNER LOOP
        Let HisCnt = HisCnt + 1 ' this effectively "goes down" each row in data Sheet2  - starting at row 2 ....**
        Let strTimes = strTimes & arrInSht2(HisCnt, 3) & " "
       
        Loop While arrInId(HisCnt + 1) = arrInId(HisCnt)    ' !!!        ---here    --INNER LOOP
    Let strTimes = Trim(strTimes) ' takes off leading and trailing spaces
    'Debug.Print strTimes
    ' at the end of each inner loop, we have the data needed to add the AdStart data for this group
    Let arrGrpTimes(GrpCnt, 1) = arrEnucsIds(GrpCnt - 1) ' -1 is because arrEnucsIds() starts at index number 0 , like index numbers go 0 1 2 3 4 ... etc.
    Dim arrTemp() As String ' temporary array to build each array of AdStart times
    Let arrTemp() = Split(strTimes, " ", -1, vbBinaryCompare)
    Let arrGrpTimes(GrpCnt, 2) = arrTemp()
    Loop '            MAIN LOOP Count for rows of historical data ================================================

Rem 4 Going through ("down") the output, Sheet1, data ,  and adding a New Time at each "row"
    For cnt = 2 To Lr1 ' MAIN LOOP for Count for rows in Sheet1 ===================================================
    '4b) determine to which group the "row" belongs
    Dim MtchRes As Variant ' The next line will either return a whole number of the "position along" that it fids a match, or it will return a VBA error type. So a variant for the Variable must be used
    Let MtchRes = Application.Match(arrOutId(cnt), arrEnucsIds(), 0) ' return the position along of a match  ( looking for arrOutId(cnt) ,  in the array of unique Ids arrEnucsIds()  , 0 indicates excact match )  ....._- note the array of unique Ids is determined from the Ids in input historical data
        If Not IsError(MtchRes) Then '4b)(i) - time to get a time, form the array { "20:19:12" , "20:19:32" , "20:49:12" , ….etc } of times for this Id group
        Dim arrTempTimes() As String ' for the array , { "20:19:12" ,........ } , of times
        Let arrTempTimes() = arrGrpTimes(MtchRes, 2) ' I can assign a dynamic array to any other array, as long as the types, ( String) in this case are the same. The wanted array is in the second column of the array, arrGrpTimes()
        Rem 5 "Getting the random times bit"...
        Dim RndIndx As Long: Randomize: Let RndIndx = Int(Rnd() * (UBound(arrTempTimes()) + 1)) ' like  IntegerOf(Rnd()*(N+1))
        Let arrOutSht1(cnt, 4) = arrTempTimes(RndIndx)
        Else '4b(ii). This is the case of no unique Id as determined from the Ids in input historical data, arrEnucsIds()  ....._- so this may occur if ..." if in any case there is no spot aired in Sheet2 on a specific channel, date and timeslot then New Time will be same as start time...."
        Let arrOutSht1(cnt, 4) = arrOutSht1(cnt, 3) '  ...".....if in any case there is no spot aired in Sheet2 on a specific channel, date and timeslot then New Time will be same as start time....."
        End If
   
    Next cnt ' MAIN LOOP for Count for rows in Sheet1 =============================================================

Rem 6 Output test
 Let ThisWorkbook.Worksheets("OutputTestv3").Range("A1").Resize(UBound(arrOutSht1(), 1), 4).Value = arrOutSht1()
 
End Sub

---

A typical test run of the last routine gives this, ( using the test data from the last few posts , #158 - #163 )

_____ Workbook: Data Sheet v3.xls ( Using Excel 2007 32 bit )

Row\Col	A	B	C	D	E	F
1	Date	Channels	start time	New Time
2	11.15.2017	A NEWS	20:07:00	20:21:20
3	11.15.2017	A NEWS	20:14:00	20:20:01
4	11.15.2017	A NEWS	20:21:00	20:44:24	Duplicate
5	11.15.2017	A NEWS	20:28:00	20:58:33
6	11.15.2017	A NEWS	20:35:00	20:42:50
7	11.15.2017	A NEWS	20:42:00	20:44:24	Duplicate
8	11.15.2017	A NEWS	20:49:00	20:58:07
9	11.15.2017	A NEWS	20:56:00	20:21:10
10	11.15.2017	A NEWS	22:49:00	22:30:03
11	11.15.2017	A NEWS	22:56:00	22:47:51
12	11.18.2017	A NEWS	23:15:00	23:57:31
13	11.18.2017	A NEWS	23:30:00	23:57:57
14	11.18.2017	A NEWS	23:45:00	23:16:35
15	11.16.2017	B NEWS	20:29:00	20:32:12
16	11.16.2017	B NEWS	20:59:00	20:18:27
17	11.18.2017	B NEWS	21:10:00	21:52:48
18	11.18.2017	B NEWS	21:20:00	21:24:26
19	11.18.2017	B NEWS	21:30:00	21:38:43
20	11.18.2017	B NEWS	21:40:00	21:53:58
21	11.18.2017	B NEWS	21:50:00	21:26:12
22	11.17.2017	C NEWS	22:13:00	22:02:01
23	11.17.2017	C NEWS	22:26:00	22:46:34
24	11.17.2017	C NEWS	22:39:00	22:42:31
25	11.17.2017	C NEWS	22:52:00	22:43:26
26	11.17.2017	D NEWS	23:13:00	23:13:00
27
28

Worksheet: OutputTestv3

File: "Data Sheet v3.xls" : https://app.box.com/s/pym52m1gslq5cynqgob8izltu6ztesim

Notes in support of these excelfox Threads and posts:
http://www.excelfox.com/forum/showth...ista-and-Excel
http://www.excelfox.com/forum/showth...r-CMS-Software
https://www.ebay.de/itm/323782698418?ul_noapp=true , _ https://imgur.com/Xq2hih2

---

First Cloud attempts.

Tests Friday, 7th June 2019.

OK I make Today two tries on one computer : Computer Acer Aspire 4810TZG Vista Operating System
_1 Try one: My computer is connected to the internet using the same router as that to which the Sannce 1080N Receiver is successfully connected . (German Telekom Speedport W504V Router LAN RJ45 Internet connection)
Delete a desktop "Deinstaller CMS" icon

Notes in support of these main Threads and posts:
http://www.excelfox.com/forum/showth...t-new-range-in
https://excel.tips.net/T002042_Inser...ying_Rows.html
*** see refs also


I tend to think of the Excel VBA Range.Insert method*** as primarily something that …… makes a space to put new range in ……( https://tinyurl.com/y2cup4o8 )
If something happens to be in the clipboard when you use this code line, then VBA makes some assumption that you wanted what is in the clipboard put in the space. Exactly what it decides to do takes a book of explanation, ( http://www.excelfox.com/forum/showth...ll=1#post10441 ). It is left for us to figure out as there is no documentation that I know of
In the simplest case of having a single row in the clipboard, and using the Range.Insert to make a whole row as a space, then the results are as you expect, since the obvious choice that Excel makes is to assume you want to put that copied row in the new row space.
That is what Allen Wyatt's*** first routine does. It inserts a new empty row at the active row ( or row containing the active cell ) , but also what is in the clipboard, ( the original row ) , is put into this new row. What actually is happening is that the original row has been shifted down. A copy of that original ( which was firstly made ) , is put in the new row space
In the second routine, he uses the Range.Insert method with nothing in the clipboard so that it just makes the row space, ( this time he inserts that space one row down ). Then he copies the row and pastes it into the new row space.
So his two routines demonstrate well the points I am trying to make.

To copy just some of a row to a new row:
Using something similar to the second routine is the better alternative for only copying some of the original row to the new row space. ( The other alternative of trying to manipulate and then predict how the Range.Insert will handle a modified clipboard content is certainly possible and academically interesting, but might be a little advanced if you are VBA beginner, especially as the various Bugs and unknowns in the various Microsoft clipboards has been proven in recent years to be beyond the understanding of the Microsoft programmers themselves!! )
So, for example, the general idea would be
_1,
ActiveCell.Offset(1, 0).EntireRow.Insert Shift:=xlDown
Or, as example
ActiveCell.Offset(1, 0).EntireRow.Resize(1, 14).Insert Shift:=xlDown
_2, The simplest way, or first idea that springs to mind for me, is to copy the row info you want to a simple array, and then manipulate it to remove/ leave blank the info that you do not want, then paste that into the space.

Here is a couple of routine examples, here I want just columns A to F from a row A to H

Code:

---

Sub Testies2a()
Rem 1 make a space by moving ( Shift -ing )  the rows down
 ActiveCell.Offset(1, 0).EntireRow.Resize(1, 8).Insert Shift:=xlDown ' when I Re size a range, it starts at the top left of the range, which will be in the first column either for a row or for a range starting in column 1
Rem 2 put the current active row in an array
Dim arrAH() As Variant ' The reason I need Variant is that the next line allows me to capture an entire range in one go, using the .Value property which returns the values in Variant type elements. So the type definition must match.
 Let arrAH() = ActiveCell.EntireRow.Resize(1, 8).Value ' so my array now holds cell values from columns A-H ( columns 1-8 )
'2b  remove the values you do not want
 Let arrAH(1, 7) = "": Let arrAH(1, 8) = ""
Rem 3 paste out modified array
 Let ActiveCell.Offset(1, 0).EntireRow.Resize(1, 8).Value = arrAH() ' VBA lets me do the opposite of the capture to paste out array values in oone go
End Sub
Sub Testies2b()
Rem 1 make a space by moving ( Shift -ing )  the rows down
 ActiveCell.Offset(1, 0).EntireRow.Resize(1, 8).Insert Shift:=xlDown ' when I Re size a range, it starts at the top left of the range, which will be in the first column either for a row or for a range starting in column 1
Rem 2 put the current active row in an array
Dim arrAH() As Variant ' The reason I need Variant is that the next line allows me to capture an entire range in one go, using the .Value property which returns the values in Variant type elements. So the type definition must match.
 Let arrAH() = ActiveCell.EntireRow.Resize(1, 6).Value ' so my array now holds cell values from columns A-F ( columns 1-6 )
Rem 3 paste out modified array
 Let ActiveCell.Offset(1, 0).EntireRow.Resize(1, 6).Value = arrAH() ' VBA lets me do the opposite of the capture to paste out array values in oone go
End Sub

---

As example, if you start with this, with say cell B2 selected:

Row\Col	A	B	C	D	E	F	G	H	I
1	A1	B1	C1	D1	E1	F1	G1	H1	I1
2	A2	B2	C2	D2	E2	F2	G2	H2	I2
3	A3	B3	C3	D3	E3	F3	G3	H3	I3
4	A4	B4	C4	D4	E4	F4	G4	H4	I4

Then using that test data, after running either routine you will get this:

Row\Col	A	B	C	D	E	F	G	H	I
1	A1	B1	C1	D1	E1	F1	G1	H1	I1
2	A2	B2	C2	D2	E2	F2	G2	H2	I2
3	A2	B2	C2	D2	E2	F2			I3
4	A3	B3	C3	D3	E3	F3	G3	H3	I4

_._________________________________


The next routine, I think will do something close to your specific question, the row to be copied is columns A-N , and you want G and H left blank

Code:

---

Sub Testies3()
Rem 1 make a space by moving ( Shift -ing )  the rows down
 ActiveCell.Offset(1, 0).EntireRow.Resize(1, 14).Insert Shift:=xlDown '
Rem 2 put the current active row in an array
Dim arrAH() As Variant '
 Let arrAH() = ActiveCell.EntireRow.Resize(1, 14).Value ' so my array now holds cell values from columns A-N ( columns 1-14 )
'2b  remove the values you do not want
 Let arrAH(1, 7) = "": Let arrAH(1, 8) = ""
Rem 3 paste out modified array
 Let ActiveCell.Offset(1, 0).EntireRow.Resize(1, 14).Value = arrAH() '
End Sub

---

ref:
Allen Wyatt *** https://excel.tips.net/T002042_Inser...ying_Rows.html
*** https://docs.microsoft.com/en-us/off...l.range.insert

Hi Alan... Thank you so much for the code... It does exactly what I wanted..

Also, thank you for your explanation as this has helped be understand more of what the code does... sometime this is more important than the solution itself.

Keep up the good work.

Thanks again

Paul

You're welcome , Paul , thanks for the feedback
:)

In support of this Thread in main Forums:
http://www.excelfox.com/forum/showth...d-on-condition

A macro recording example to get some coding to help answer this……

Quote:

---

Originally Posted by rider@1234

all files are located in desktop
vba is placed ........

---

all files are located in desktop
vba is placed in seperate file
only 1 file is opened and that is vba code placed file so for this process we have to open the file as per condition and after the process completed all files should be saved and closed except vba placed file
If column R of 1.xls file is not in minus(-1,-0.5 or xyz any negative number) then see the column E data of 1.xls and open 2.xlsx and match column E of 1.xls with column A of 2.xlsx
and if it matches then look for any highlighted colour in that row and if any highlighted cell in that row is found then remove the highlighted colour and save the file and close all the file

---

Open Excel. ( I have Office 2007 ).

Turn on the macro recorder
Turn On Macro Recorder.jpg : https://imgur.com/uZkZWg1
( I use the default macro name and place for the coding to be stored )
Use default macro name and place where macro is stored.jpg : https://imgur.com/rR8UkT1

I open a new file.
Open new file.jpg : https://imgur.com/10pnrBL
( I am in Excel 2007, so I end up with a .xlsx file
New xlsx File.JPG : https://imgur.com/vvqEC1w

I save this file on the desktop, giving it the name "MainMacroFile"
Save As.jpg : https://imgur.com/PrnZhAW
Save As xlsx.JPG : https://imgur.com/PrnZhAW

I resave as a file to hold macros:
Save As xlsm.JPG https://imgur.com/5hVZAld


I open a new file
Open new file.jpg : https://imgur.com/vvqEC1w
( I am in Excel 2007, so I end up with a .xlsx file
New xlsx File.JPG : https://imgur.com/vvqEC1w
I save this file on the desktop, giving it the name "1"
Save As.jpg : https://imgur.com/PrnZhAW
Save As 1_xlsx.JPG https://imgur.com/y2uMg0i
I resave as a 1.xls
Save As.jpg : https://imgur.com/PrnZhAW
Save As 1_xls.JPG : https://imgur.com/iylw8r7

I close the file "1.xls"
Close 1_xls.jpg : https://imgur.com/vJtdLHo
I open the file "1.xls"
Open 1_xls.jpg : https://imgur.com/de2MGkt
Open 1_xls.jpg : https://imgur.com/zafLOTd

I now take some actions, …. which are similar to your …. If column R of 1.xls file is not in minus(-1,-0.5 or xyz any negative number) then see the column E data of 1.xls and open 2.xlsx and match column E of 1.xls with column A of 2.xlsx
and if it matches then look for any highlighted colour in that row and if any highlighted cell in that row is found …..
What I actually did was
_ Put some positive numbers in column R
_ Put some letters in column E
_ Put some highlight in column E
Add some numbers letters and highlighting.JPG : https://imgur.com/6ZYeaxU
_ I take some of the highlighting off
Take some highlighting off.jpg : https://imgur.com/Z1Rk9HD
I save the file "1.xls"
Save 1_xls.jpg : https://imgur.com/FmLrhjZ
I close the file "1.xls"
Close 1_xls.jpg : https://imgur.com/R6eqv1m

I make a new file, "2.xlsx" , on the desktop
New xlsx File.JPG : https://imgur.com/vvqEC1w
Save As 2_xlsx.JPG : https://imgur.com/mHacZ74

I close the file and open it
Close 2_xlsx.jpg : https://imgur.com/tReoAJG
Open 2_xlsx.jpg : https://imgur.com/jmsqNY1
Open 2_xlsx.jpg : https://imgur.com/J3XPhz5

I put a letter in column A of "2.xlsx"
Put a letter in column A of 2_xlsx.JPG : https://imgur.com/9o8PTYQ
I save the file "2.xlsx"
Save 2_xlsx.jpg : https://imgur.com/ehSxG6b
I close the file "2.xlsx"
Close 2_xlsx.jpg : https://imgur.com/YyRmhfW

I now stop the macro recorder
Stop macro recorder.JPG : https://imgur.com/NrcDQS4
Stop macro recorder.JPG : https://imgur.com/WRgy3mB


Find the macro just recorded and click on Step Into
Find macro just recorded.JPG : https://imgur.com/xK3abHT
Find macro just recorded.JPG : https://imgur.com/34U5nm3
( Alternatively hit Alt+F8 )

You can then see the recorded macro
Recorded Macro.JPG : https://imgur.com/Mo0vfHi


I include the code below, but have also added some 'Comments ( ' Rems) to show the steps which I manually made above

Code:

---

Sub Makro1()
'
' Makro1 Makro
'

'
' Rem I open a  new file.
    Workbooks.Add
' Rem I save this file on the desktop, giving it the name "MainMacroFile"
    ChDir "C:\Users\Elston\Desktop"
    ActiveWorkbook.SaveAs Filename:="C:\Users\Elston\Desktop\MainMacroFile.xlsx" _
        , FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
' Rem I resave as a file to hold macros
    ActiveWorkbook.SaveAs Filename:="C:\Users\Elston\Desktop\MainMacroFile.xlsm" _
        , FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
   
' Rem I open a  new file.
    Workbooks.Add
' Rem I save this file on the desktop, giving it the name "1"
    ActiveWorkbook.SaveAs Filename:="C:\Users\Elston\Desktop\1.xlsx", FileFormat _
        :=xlOpenXMLWorkbook, CreateBackup:=False
' Rem I resave as a 1.xls
    ActiveWorkbook.SaveAs Filename:="C:\Users\Elston\Desktop\1.xls", FileFormat _
        :=xlExcel8, Password:="", WriteResPassword:="", ReadOnlyRecommended:= _
        False, CreateBackup:=False
' Rem I close the file "1.xls"
    ActiveWorkbook.Close
' Rem I open the file "1.xls"
    Workbooks.Open Filename:="C:\Users\Elston\Desktop\1.xls"
   
' Rem I now take some actions, ….      .......  If column R of 1.xls file is not in minus(-1,-0.5 or xyz any negative number) then see the column E data of 1.xls and open 2.xlsx and match column E of 1.xls with column A of 2.xlsx
    Range("R1").Select
    ActiveCell.FormulaR1C1 = "1"
    Range("R2").Select
    ActiveCell.FormulaR1C1 = "2"
    Range("R3").Select
    ActiveCell.FormulaR1C1 = "3"
    Range("E1").Select
    ActiveCell.FormulaR1C1 = "a"
    Range("E2").Select
    ActiveCell.FormulaR1C1 = "b"
    Range("E3").Select
    ActiveCell.FormulaR1C1 = "c"
    Range("E4").Select
    ActiveCell.FormulaR1C1 = "d"
    Range("E1:E4").Select
    With Selection.Interior
        .Pattern = xlSolid
        .PatternColorIndex = xlAutomatic
        .Color = 65535
        .TintAndShade = 0
        .PatternTintAndShade = 0
    End With
' Rem  _ I take some of the highlighting off
    Range("E2").Select
    With Selection.Interior
        .Pattern = xlNone
        .TintAndShade = 0
        .PatternTintAndShade = 0
    End With
    Range("E3").Select
    With Selection.Interior
        .Pattern = xlNone
        .TintAndShade = 0
        .PatternTintAndShade = 0
    End With
' Rem I save the file "1.xls"
    ActiveWorkbook.Save
' Rem I close the file "1.xls"
    ActiveWorkbook.Close
   
' Rem I make a new file, "2.xlsx" , on the desktop
    Workbooks.Add
    ActiveWorkbook.SaveAs Filename:="C:\Users\Elston\Desktop\2.xlsx", FileFormat _
        :=xlOpenXMLWorkbook, CreateBackup:=False
' Rem I close the file and open it
    ActiveWorkbook.Close
    Workbooks.Open Filename:="C:\Users\Elston\Desktop\2.xlsx"
   
' Rem I put a letter in column A of "2.xlsx"
    Range("A4").Select
    ActiveCell.FormulaR1C1 = "d"
    Range("A5").Select
' Rem I save the file "2.xlsx"
    ActiveWorkbook.Save
' Rem I close the file "2.xlsx"
    ActiveWorkbook.Close


' Rem I now stop the macro recorder
End Sub

---