Page 14 of 55 FirstFirst ... 4121314151624 ... LastLast
Results 131 to 140 of 541

Thread: Appendix Thread. App Index Rws() Clms() Majic code line Codings for other Threads, Tables etc.)

  1. 04-02-2019, 03:17 PM #131
    DocAElstein
    DocAElstein is offline
    Fuhrer, Vierte Reich DocAElstein's Avatar
    Join Date
    Aug 2014
    Posts
    9,402
    Rep Power
    10
    There is a second argument to Dir. It is not used much. https://docs.microsoft.com/en-us/off...ction#settings
    One option will make it return folder names as well. For our example we can change Dir(strWB) to any if these: Dir(strWB, vbDirectory) ; Dir(PathName:=strWB, Attributes:=vbDirectory) ; Dir(PathName:=strWB, Attributes:=16) ; Dir(strWB, 16)
    Running the routine with the previous example, seems to slip the folder names in the appropriate place to once again have everything in alphabetical order
    Code:
    Folder used is
F:\Excel0202015Jan2016\ExcelForum\wbSheetMakerClsdWbADOMsQueery
wbSheetMakerClsdWbADOMsQueery

First got by  Dir(F:\Excel0202015Jan2016\ExcelForum\wbSheetMakerClsdWbADOMsQueery\*)
is             .

Use 1 in loop of unargumented   Dir   gives   ".."
Use 2 in loop of unargumented   Dir   gives   "83DB8900"
Use 3 in loop of unargumented   Dir   gives   "aaa.xlsm"
Use 4 in loop of unargumented   Dir   gives   "ACDC"
Use 5 in loop of unargumented   Dir   gives   "Amar321.xls.xlsx"
Use 6 in loop of unargumented   Dir   gives   "ApparantlyApparantIs_Change.JPG"
Use 7 in loop of unargumented   Dir   gives   "Aufzeichnen.JPG"
Use 8 in loop of unargumented   Dir   gives   "Bad Files"
Use 9 in loop of unargumented   Dir   gives   "Book1.xls"
Use 10 in loop of unargumented   Dir   gives   "Book1.xlsm.zip"
Use 11 in loop of unargumented   Dir   gives   "CA930CD8.tmp"
Use 12 in loop of unargumented   Dir   gives   "ClosedWorkbook.xlsm"
Use 13 in loop of unargumented   Dir   gives   "ClsdWbs"
Use 14 in loop of unargumented   Dir   gives   "CopyASheet.JPG"
Use 15 in loop of unargumented   Dir   gives   "CressieFolder"
Use 16 in loop of unargumented   Dir   gives   "CresssieFiles.JPG"
Use 17 in loop of unargumented   Dir   gives   "DB2IssJfürELProAbDec2014.xlsm"
Use 18 in loop of unargumented   Dir   gives   "EFFldr.xlsm"
Use 19 in loop of unargumented   Dir   gives   "EFldr1_1"
Use 20 in loop of unargumented   Dir   gives   "EFldr1_1 Download.JPG"
Use 21 in loop of unargumented   Dir   gives   "Eileens Fldr.zip"
Use 22 in loop of unargumented   Dir   gives   "EileensFldr"
Use 23 in loop of unargumented   Dir   gives   "EileensFldr Contents Copy.JPG"
Use 24 in loop of unargumented   Dir   gives   "EileensFldr Contents Paste.JPG"
Use 25 in loop of unargumented   Dir   gives   "EileensFldr Make Empty Folder.JPG"
Use 26 in loop of unargumented   Dir   gives   "EileensFldr zip  Download.JPG"
Use 27 in loop of unargumented   Dir   gives   "EileensFldr.zip"
Use 28 in loop of unargumented   Dir   gives   "EileensFolderExplainedOutput.JPG"
Use 29 in loop of unargumented   Dir   gives   "Example Folder and Macro File in same Folder.JPG"
Use 30 in loop of unargumented   Dir   gives   "FBandData.xlsm"
Use 31 in loop of unargumented   Dir   gives   "FBandDataNorie.xlsm"
Use 32 in loop of unargumented   Dir   gives   "FBandDataNorie.xlsx"
Use 33 in loop of unargumented   Dir   gives   "FormulaBarClosedWB.JPG"
Use 34 in loop of unargumented   Dir   gives   "GetData_ClosedBook+LINKS.xlsx"
Use 35 in loop of unargumented   Dir   gives   "GetData_ClosedBook.xls"
Use 36 in loop of unargumented   Dir   gives   "HimanshuktwCode.JPG"
Use 37 in loop of unargumented   Dir   gives   "Kill Stuff"
Use 38 in loop of unargumented   Dir   gives   "KissMyClosedWB.JPG"
Use 39 in loop of unargumented   Dir   gives   "MacroRecording"
Use 40 in loop of unargumented   Dir   gives   "Mappe2.xlsm"
Use 41 in loop of unargumented   Dir   gives   "MazanDikCollectionWonk.xlsm"
Use 42 in loop of unargumented   Dir   gives   "mellowtangSummarySheets.xlsm"
Use 43 in loop of unargumented   Dir   gives   "MsQueerOptions.JPG"
Use 44 in loop of unargumented   Dir   gives   "MsQueeryADO"
Use 45 in loop of unargumented   Dir   gives   "myFileToClose.xlsm"
Use 46 in loop of unargumented   Dir   gives   "MyNewWorkbook.xlsx"
Use 47 in loop of unargumented   Dir   gives   "MySameFolder.JPG"
Use 48 in loop of unargumented   Dir   gives   "Neuer Ordner"
Use 49 in loop of unargumented   Dir   gives   "NeuProAktuelleMakros.xlsm"
Use 50 in loop of unargumented   Dir   gives   "NormalThisWorkbookCodeModule.JPG"
Use 51 in loop of unargumented   Dir   gives   "NutritionalValues2016.xlsx"
Use 52 in loop of unargumented   Dir   gives   "OnlyGets8810RowsInAQuerrListObjectTableThingyAnyways.JPG"
Use 53 in loop of unargumented   Dir   gives   "Plop.xlsm"
Use 54 in loop of unargumented   Dir   gives   "poo.xlsm"
Use 55 in loop of unargumented   Dir   gives   "RudyMSRAllSubFldrsFndRep.xlsm"
Use 56 in loop of unargumented   Dir   gives   "Sample.zip"
Use 57 in loop of unargumented   Dir   gives   "SchemaIniErrorPipe.JPG"
Use 58 in loop of unargumented   Dir   gives   "SrangeThisWorkbookCodeModule.JPG"
Use 59 in loop of unargumented   Dir   gives   "StopClosing.xlsm"
Use 60 in loop of unargumented   Dir   gives   "Summary sheet.xlsm"
Use 61 in loop of unargumented   Dir   gives   "template test.xlsm"
Use 62 in loop of unargumented   Dir   gives   "Top100MsQuery.JPG"
Use 63 in loop of unargumented   Dir   gives   "ViskasVerticalsMaster dataMjoza.xlsm"
Use 64 in loop of unargumented   Dir   gives   "wb2.csv"
Use 65 in loop of unargumented   Dir   gives   "wb2.xlsm"
Use 66 in loop of unargumented   Dir   gives   "wb2.xlsx"
Use 67 in loop of unargumented   Dir   gives   "WBAccessTimeTestData.xlsx"
Use 68 in loop of unargumented   Dir   gives   "WBAccestTimeTest.xlsm"
Use 69 in loop of unargumented   Dir   gives   "wbCodes.xls"
Use 70 in loop of unargumented   Dir   gives   "wbCodes.xlsb"
Use 71 in loop of unargumented   Dir   gives   "wbCodes.xlsm"
Use 72 in loop of unargumented   Dir   gives   "WBOpenRenameKlaredog.xls"
Use 73 in loop of unargumented   Dir   gives   "WBOpenRenameKlaredog.xlsm"
Use 74 in loop of unargumented   Dir   gives   "Wb_with_5Sheets_4Worksheets.xlsm"
Use 75 in loop of unargumented   Dir   gives   "WillyWonks.JPG"
Use 76 in loop of unargumented   Dir   gives   "WonkBook"
Use 77 in loop of unargumented   Dir   gives   "workbook2.xlsm"
Use 78 in loop of unargumented   Dir   gives   "WorkbookOpenMsgBox.JPG"
Use 79 in loop of unargumented   Dir   gives   "WorksheetNames.JPG"
Use 80 in loop of unargumented   Dir   gives   "Worksheet_Change.JPG"
Use 81 in loop of unargumented   Dir   gives   "XYT"
Use 82 in loop of unargumented   Dir   gives   ""
    Here is the folder used for the last two tests: wbFolder.JPG : https://imgur.com/MMydq7n



    https://www.youtube.com/channel/UCnxwq2aGJRbjOo_MO54oaHA
    https://www.youtube.com/watch?v=2oT4qrHmDMY&lc=UgyG714V_k7odQMrTz14AaABAg.9h740K6COOA9iHOYYpaA bC
    https://www.youtube.com/watch?v=2oT4qrHmDMY&lc=UgxuL6YCUckeUIh9hoh4AaABAg
    https://www.youtube.com/watch?v=2oT4qrHmDMY&lc=UgwGTEyefOX7msIh1wZ4AaABAg.9h4sd6Vs4qE9h7G-bVm8_-
    https://www.youtube.com/watch?v=2oT4qrHmDMY&lc=Ugw3nF0C04AGt73H1BB4AaABAg.9h6VhNCM-DZ9h7EqbG23kg
    https://www.youtube.com/watch?v=2oT4qrHmDMY&lc=UgwGTEyefOX7msIh1wZ4AaABAg.9h4sd6Vs4qE9h7KvJXmK 8o
    https://www.youtube.com/watch?v=2oT4qrHmDMY&lc=Ugw3nF0C04AGt73H1BB4AaABAg.9h6VhNCM-DZ9h7E1gwg4Aq
    https://www.youtube.com/watch?v=2oT4qrHmDMY&lc=UgywFtBEpkHDuK55r214AaABAg
    https://www.youtube.com/watch?v=2oT4qrHmDMY&lc=UgwviLabd7r_3KpP6wh4AaABAg.9h5lFRmix1R9h79hNGvJ bu
    https://www.youtube.com/watch?v=2oT4qrHmDMY&lc=UgwviLabd7r_3KpP6wh4AaABAg.9h5lFRmix1R9h79YAfa2 4T
    https://www.youtube.com/watch?v=2oT4qrHmDMY&lc=UgwviLabd7r_3KpP6wh4AaABAg.9h5lFRmix1R9h79M1SYH 1E
    https://www.youtube.com/watch?v=2oT4qrHmDMY&lc=UgwviLabd7r_3KpP6wh4AaABAg.9h5lFRmix1R9h78SxhXT nR
    https://www.youtube.com/channel/UCnxwq2aGJRbjOo_MO54oaHA
    Last edited by DocAElstein; 07-09-2023 at 10:51 PM.
    ….If you are my competitor, I will try all I can to beat you. But if I do, I will not belittle you. I will Salute you, because without you, I am nothing.
    If you are my enemy, we will try to kick the fucking shit out of you…..
     Winston Churchill, 1939
    Save your Forum..._
    _...KILL A MODERATOR!!
    Reply With Quote Reply With Quote
  2. 04-02-2019, 03:19 PM #132
    DocAElstein
    DocAElstein is offline
    Fuhrer, Vierte Reich DocAElstein's Avatar
    Join Date
    Aug 2014
    Posts
    9,402
    Rep Power
    10

    Deafault item to use if empty column

    In support of answer to this excelfox Thread:
    http://www.excelfox.com/forum/showth...ll=1#post11090


    Code:
    Option Explicit
Sub DefaultItem()
Rem 1 data range info
Dim rngIn As Range, Lr As Long, ClmCnt As Long
 Let ClmCnt = 3 '                                                                                                     : Let ClmCnt = Worksheets("Sheet2").Range("A1").CurrentRegion.Columns.Count
 Let Lr = Worksheets("Sheet2").Range("A1").CurrentRegion.Rows.Count
 Set rngIn = Worksheets("Sheet2").Range("A1:C" & Lr & "")
Rem 2 Data to array
Dim arrDtaIn() As Variant '  I need Variant type as the  .Value  in the next line returns a field of Variant type elements
 Let arrDtaIn() = rngIn.Value
Rem 3 Determine default values
' 3a) Number of groups
Dim arrGp() As Variant: Let arrGp() = Application.Index(rngIn, 0, 1).Value ' http://www.excelfox.com/forum/showthread.php/1111-VBA-Trick-of-the-Week-Slicing-an-Array-Without-Loop-%E2%80%93-Application-Index         Highlight arrGp and Hit F9.JPG : https://imgur.com/PZF0oXE
Dim strGps As String: Let strGps = " " ' For a string like " 1 2 3 "
Dim cnt As Long
    For cnt = 2 To Lr ' looking at all rows from the second in our input data
        If InStr(1, strGps, " " & arrGp(cnt, 1) & " ") = 0 Then ' This looks for the positiopn along ( starting from character 1  ,  in  strGps  ,  of  each row element arrGp(cnt, 1)  )    if it is not found then Instr retourns  0   as a n indication that it was not there
         Let strGps = strGps & arrGp(cnt, 1) & " "              ' Because it is not there, we now put it in
        Else
        End If
    Next cnt
' At this point we should have like  strGps = " 1 2 3 "
' 3b) Array of unique groups
 Let strGps = Trim(strGps) ' This takes off the first and last trailing spaces
Dim arrGps() As String     ' The string split function below returns a fiels of String elements : Highlight arrGps  Hit F9.JPG : https://imgur.com/LT9dgHk
 Let arrGps() = Split(strGps, " ", -1, vbBinaryCompare)      ' this splits the (  strgps  ,  using  " " as denominator  ,  and returns all elemants in an array,  using exact binary computer match on the " "  )
' 3c) Array for output
Dim arrOut() As String ' A dynamic array is needed as I can only use variables in the  ReDim  method - I cannot use varable in the declaration (Dim) statement
 ReDim arrOut(1 To UBound(arrGps()) + 2, 1 To 2) ' I  want +1 rows for the header   I also need +1 because split retouns a 1 dimensional array stating at indicie 0 - so the Ubound of arrGps() will give a numbe 1 less than I might expect - in our example we have 3 elements with  indicies of 0 1 2, ( and values in our example of 1 2 3 - for example  arrGps(0)=1  )  so the Ubound returns 2 - but we want 3 elements
' 3d) fill my arrOut()
Dim Stear As Variant ' I want to use a  For ´Each  loop below   VBA must have an object varaible or a variable of variant type to hold each  item  in a collection of something. Our arrGps() can be considered a collection of numbers  1 2 3
Dim ArrOutRw As Long: Let ArrOutRw = 1 ' Our row number in the outout array  : I use 1 initially, for the header
 Let arrOut(ArrOutRw, 1) = arrDtaIn(1, 1): Let arrOut(ArrOutRw, 2) = "Deafault item"
    For Each Stear In arrGps() ' This outer loop goes throug each unique group number =============== - For each number in  { 1, 2, 3 }
        For cnt = 2 To Lr ' An Inner loop to go through all data rows ' -----------------------------
            If CStr(arrDtaIn(cnt, 1)) = CStr(Stear) Then ' This will catch the first use of our group number, Stear is our group number taken from the array  1 2 3
             Let ArrOutRw = ArrOutRw + 1                 ' Our next row to fill in arrOut()
             Let arrOut(ArrOutRw, 1) = Stear             ' First column in our output array
             Let arrOut(ArrOutRw, 2) = arrDtaIn(cnt, 2)  ' Second column in our output array will be given the first item in column B of our data for this group number, Stear
             Exit For                                    ' I only want to get the first item for a group number
            Else
            End If
        Next cnt ' ----------------------------------------------------------------------------------
    Next Stear ' ====================================================================================
' at this point we have an array for output of default : Select ArrOut   then Hit F9.JPG : https://imgur.com/CNMeYV9
Rem 4 Demo Output
Let rngIn.Offset(0, ClmCnt).Resize(UBound(arrOut(), 1), 2).Value = arrOut() ' In the range which offset to the right of the input, of the dimension size of the output array, I paste my values out
 
End Sub
    Attached Files Attached Files
    Reply With Quote Reply With Quote
  3. 04-06-2019, 01:15 PM #133
    DocAElstein
    DocAElstein is offline
    Fuhrer, Vierte Reich DocAElstein's Avatar
    Join Date
    Aug 2014
    Posts
    9,402
    Rep Power
    10
    Coding in suport of these excelfox Threads and posts:
    http://www.excelfox.com/forum/showthread.php/2056-Appendix-Thread-(-Codes-for-other-Threads-HTML-Tables-etc-)?p=11089&viewfull=1#post11089
    https://www.excelforum.com/excel-pro...-the-file.html

    Code:
    Sub DirOrder()  '  http://www.excelfox.com/forum/showthread.php/2056-Appendix-Thread-(-Codes-for-other-Threads-HTML-Tables-etc-)?p=11092&viewfull=1#post11092
Dim strWB As String
Rem 1 get the full string, strWB, for a Folder to use in the  Dir(Fullpath&FileName, __ )        ( strWB=Fullpath&FileName - FileName )
'1a) use the asking pop up thing, File dialogue folder picker
'   With Application.FileDialog(msoFileDialogFolderPicker)
'    .Title = "Folder Select"
'    .AllowMultiSelect = False
'        If .Show <> -1 Then
'         Exit Sub
'        Else
'        End If
'    Let strWB = .SelectedItems(1)  '  & "\"
'   End With
'
'1b) Using a test Folder, named  Folder  in the same Folder as the workbook in which this code is
 Let strWB = ThisWorkbook.Path & "\Folder"
'1c) Hard code instead
'Let strWB = "F:\Excel0202015Jan2016\ExcelForum\wbSheetMakerClsdWbADOMsQueery\Kill Stuff\Folder"
 Debug.Print "Folder used is" & vbCrLf & strWB & vbCrLf & "" & Right(strWB, (Len(strWB) - InStrRev(strWB, "\", -1, vbTextCompare)))
 Debug.Print
 Let strWB = strWB & "\"
Rem 2 add last file bit for use in the  Dir(Fullpath&FileName, __ ) , but include wild cards...    http://www.excelfox.com/forum/showthread.php/2056-Appendix-Thread-(-Codes-for-other-Threads-HTML-Tables-etc-)?p=11089&viewfull=1#post11089 :  _(i) You can use wild cards in the full path and file name string that you give it, so it will look for a file matching your given string. ( So typically you might give a string like “C:\myFolder\*.xl*”, which would look for any excel file: In this bit *.xl* , the first * allows for any file name, and the second * will allow for extensions such as .xls , .xlsm, .xlsx, .. etc… )      _(ii) After you use like Dir(Fullpath&FileName, __ ) once, then any use after of just _ Dir __ without any arguments, will give the next file it finds based on the string you gave in the first use with arguments
'2a)  Excel files
 Let strWB = strWB & "*.xls*"
Dim File As String: Let File = Dir(strWB)
 Debug.Print "First got by  Dir(" & strWB & ")" & vbCrLf & "is             " & File
 Debug.Print
    Do '                  '_- I want to keep going in a Loop while I still get a file name returned by  Dir
    Dim Cnt As Long: Let Cnt = Cnt + 1
     Let File = Dir: Debug.Print "Use " & Cnt & " in loop of unargumented   Dir   gives   """ & File & """"
    Loop While File <> "" '_- I want to keep going in a Loop while I still get a file name returned by  Dir
 Debug.Print
 Debug.Print
End Sub
    Here last routine in form to allow user selection of folder to search for files
    Code:
    Sub DirOrder()  '   http://www.excelfox.com/forum/showthread.php/2056-Appendix-Thread-(-Codes-for-other-Threads-HTML-Tables-etc-)?p=11093&viewfull=1#post11093
Dim strWB As String
Rem 1 get the full string, strWB, for a Folder to use in the  Dir(Fullpath&FileName, __ )        ( strWB=Fullpath&FileName - FileName )
'1a) use the asking pop up thing, File dialogue folder picker
   With Application.FileDialog(msoFileDialogFolderPicker)
    .Title = "Folder Select"
    .AllowMultiSelect = False
        If .Show <> -1 Then
         Exit Sub
        Else
        End If
    Let strWB = .SelectedItems(1)  '  & "\"
   End With

'1b) Using a test Folder, named  Folder  in the same Folder as the workbook in which this code is
'Let strWB = ThisWorkbook.Path & "\Folder"
'1c) Hard code instead
'Let strWB = "F:\Excel0202015Jan2016\ExcelForum\wbSheetMakerClsdWbADOMsQueery\Kill Stuff\Folder"
 Debug.Print "Folder used is" & vbCrLf & strWB & vbCrLf & "" & Right(strWB, (Len(strWB) - InStrRev(strWB, "\", -1, vbTextCompare)))
 Debug.Print
 Let strWB = strWB & "\"
Rem 2 add last file bit for use in the  Dir(Fullpath&FileName, __ ) , but include wild cards...    http://www.excelfox.com/forum/showthread.php/2056-Appendix-Thread-(-Codes-for-other-Threads-HTML-Tables-etc-)?p=11089&viewfull=1#post11089 :  _(i) You can use wild cards in the full path and file name string that you give it, so it will look for a file matching your given string. ( So typically you might give a string like “C:\myFolder\*.xl*”, which would look for any excel file: In this bit *.xl* , the first * allows for any file name, and the second * will allow for extensions such as .xls , .xlsm, .xlsx, .. etc… )      _(ii) After you use like Dir(Fullpath&FileName, __ ) once, then any use after of just _ Dir __ without any arguments, will give the next file it finds based on the string you gave in the first use with arguments
'2a)  Excel files
 Let strWB = strWB & "*"
Dim File As String: Let File = Dir(strWB)
 Debug.Print "First got by  Dir(" & strWB & ")" & vbCrLf & "is             " & File
 Debug.Print
    Do '                  '_- I want to keep going in a Loop while I still get a file name returned by  Dir
    Dim Cnt As Long: Let Cnt = Cnt + 1
     Let File = Dir: Debug.Print "Use " & Cnt & " in loop of unargumented   Dir   gives   """ & File & """"
    Loop While File <> "" '_- I want to keep going in a Loop while I still get a file name returned by  Dir
 Debug.Print
 Debug.Print
End Sub
    Reply With Quote Reply With Quote
  4. 04-20-2019, 03:10 PM #134
    DocAElstein
    DocAElstein is offline
    Fuhrer, Vierte Reich DocAElstein's Avatar
    Join Date
    Aug 2014
    Posts
    9,402
    Rep Power
    10
    Initial coding for solution to this Thread
    http://www.excelfox.com/forum/showth...ll=1#post11124


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

    Code:
    Option Explicit '
Sub HaiderAdSlots1() ' 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("Sheet1"): Set Ws2 = ThisWorkbook.Worksheets("Sheet2")
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 & "").Value2: 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 arrays to identify rows ... " Channel Name &  Date & Time "
Dim arrInId() As String
 ReDim arrInId(1 To Lr2)
Dim cnt As Long
    For cnt = 2 To Lr2
     Let arrInId(cnt) = arrInSht2(cnt, 1) & " | " & arrInSht2(cnt, 2) & " | " & arrInSht2(cnt, 3)
    Next cnt
Dim arrOutId() As String
 ReDim arrOutId(1 To Lr1)
    For cnt = 2 To Lr1
     Let arrOutId(cnt) = arrOutSht1(cnt, 2) & " | " & arrOutSht1(cnt, 1) & " | " & arrOutSht1(cnt, 3)
    Next cnt
Rem 3 match up rows in data sheets
    For cnt = 2 To Lr1
    Dim MtchRes As Variant
     Let MtchRes = Application.Match(arrOutId(cnt), arrInId(), 1) ' return the position along of a match   ( looking for arrOutId(cnt) ,   in arrInId()   , 1 indicates approximate match )
        If Not IsError(MtchRes) Then
        '3b)
         Let arrOutSht1(cnt, 4) = arrInSht2(MtchRes, 3)
        Else
        End If
    Next cnt
Rem 4
 Let ThisWorkbook.Worksheets("OutputTest").Range("A1").Resize(UBound(arrOutSht1(), 1), 4).Value = arrOutSht1()
 
End Sub
    Reply With Quote Reply With Quote
  5. 04-21-2019, 03:06 PM #135
    DocAElstein
    DocAElstein is offline
    Fuhrer, Vierte Reich DocAElstein's Avatar
    Join Date
    Aug 2014
    Posts
    9,402
    Rep Power
    10
    In support of answer to this Thread
    http://www.excelfox.com/forum/showth...chedule-scores

    _____ Workbook: NFL 2019 Schedule.xlsx ( Using Excel 2007 32 bit )
    Row\Col
    A
    B
    C
    D
    E
    F
    G
    H
    I
    J
    K
    L
    M
    N
    O
    P
    Q
    R
    S
    1
    Week # 1
    09.08.19
    2
    		 V Team GB LAR WAS BUF ATL BAL KC TEN IND CIN SF NYG DET PIT HOU DEN
    TOTAL
    3
    		 V Score
    0
    4
    		 H Score
    5
    		 H Team CHI CAR PHI NYJ MIN MIA JAX CLE LAC SEA TB DAL ARI NE NO OAK
    6
    		 BYES
    7
    8
    Week # 2
    09.15.19
    9
    		 V Team TB ARI DAL IND SEA BUF SF LAC MIN JAX NE KC NO CHI PHI CLE
    10
    		 V Score
    0
    11
    		 H Score
    12
    		 H Team CAR BAL WAS TEN PIT NYG CIN DET GB HOU MIA OAK LAR DEN ATL NYJ
    13
    		 BYES
    14
    Worksheet: 2019


    _____ Workbook: NFL 2019 Schedule.xlsx ( Using Excel 2007 32 bit )
    Row\Col
    A
    B
    C
    D
    E
    F
    G
    H
    I
    J
    K
    L
    M
    N
    O
    P
    Q
    R
    S
    1
    Week # 1
    09.08.19
    2
    		 V Team GB LAR WAS BUF ATL BAL KC TEN IND CIN SF NYG DET PIT HOU DEN
    TOTAL
    3
    		 V Score
    =SUM(B3:Q4)
    4
    		 H Score
    5
    		 H Team CHI CAR PHI NYJ MIN MIA JAX CLE LAC SEA TB DAL ARI NE NO OAK
    6
    		 BYES
    7
    8
    Week # 2
    09.15.19
    9
    		 V Team TB ARI DAL IND SEA BUF SF LAC MIN JAX NE KC NO CHI PHI CLE
    10
    		 V Score
    =SUM(B10:Q11)
    11
    		 H Score
    12
    		 H Team CAR BAL WAS TEN PIT NYG CIN DET GB HOU MIA OAK LAR DEN ATL NYJ
    13
    		 BYES
    14
    Worksheet: 2019
    Attached Files Attached Files
    Reply With Quote Reply With Quote
  6. 04-24-2019, 11:34 AM #136
    DocAElstein
    DocAElstein is offline
    Fuhrer, Vierte Reich DocAElstein's Avatar
    Join Date
    Aug 2014
    Posts
    9,402
    Rep Power
    10
    In support of this thread
    http://www.excelfox.com/forum/showth...ll=1#post11134

    Sheet2v3.JPG : Attachment 2245

    _____ Workbook: Data Sheet v3.xls ( Using Excel 2007 32 bit )
    Row\Col A B C D E F G
    1 Channel Date AdStart MidBreak Break_Start Break_End Hour
    2 A NEWS 15.11.2017 20:19:12 Mid Break-1 20:19:08 20:24:07 20
    3 A NEWS 15.11.2017 20:19:32 Mid Break-1 20:19:08 20:24:07 20
    4 A NEWS 15.11.2017 20:19:49 Mid Break-1 20:19:08 20:24:07 20
    5 A NEWS 15.11.2017 20:20:01 Mid Break-1 20:19:08 20:24:07 20
    6 A NEWS 15.11.2017 20:20:47 Mid Break-1 20:19:08 20:24:07 20
    7 A NEWS 15.11.2017 20:21:10 Mid Break-1 20:19:08 20:24:07 20
    8 A NEWS 15.11.2017 20:21:20 Mid Break-1 20:19:08 20:24:07 20
    42 A NEWS 15.11.2017 20:58:16 Casual 20:57:14 20:59:57 20
    43 A NEWS 15.11.2017 20:58:33 Casual 20:57:14 20:59:57 20
    44 A NEWS 15.11.2017 20:58:42 Casual 20:57:14 20:59:57 20
    45 A NEWS 15.11.2017 20:59:01 Casual 20:57:14 20:59:57 20
    46 A NEWS 15.11.2017 22:26:58 Mid Break-1 22:26:54 22:33:55 22
    Worksheet: Sheet2v3

    _......... continued in next posts due to post size limitations ( 10,000 characters incl. BB code )
    Attached Images Attached Images
    Reply With Quote Reply With Quote
  7. 04-24-2019, 11:36 AM #137
    DocAElstein
    DocAElstein is offline
    Fuhrer, Vierte Reich DocAElstein's Avatar
    Join Date
    Aug 2014
    Posts
    9,402
    Rep Power
    10
    _____ Workbook: Data Sheet v3.xls ( Using Excel 2007 32 bit )
    Row\Col A B C D E F G
    45 A NEWS 15.11.2017 20:59:01 Casual 20:57:14 20:59:57 20
    46 A NEWS 15.11.2017 22:26:58 Mid Break-1 22:26:54 22:33:55 22
    47 A NEWS 15.11.2017 22:27:18 Mid Break-1 22:26:54 22:33:55 22
    48 A NEWS 15.11.2017 22:27:36 Mid Break-1 22:26:54 22:33:55 22
    49 A NEWS 15.11.2017 22:28:06 Mid Break-1 22:26:54 22:33:55 22
    78 A NEWS 15.11.2017 22:53:03 Mid Break-2 22:47:02 22:54:02 22
    79 A NEWS 15.11.2017 22:53:18 Mid Break-2 22:47:02 22:54:02 22
    80 A NEWS 15.11.2017 22:53:42 Mid Break-2 22:47:02 22:54:02 22
    81 A NEWS 15.11.2017 22:57:15 Casual 22:57:11 23:00:05 22
    87 A NEWS 15.11.2017 22:58:48 Casual 22:57:11 23:00:05 22
    88 A NEWS 15.11.2017 22:59:08 Casual 22:57:11 23:00:05 22
    89 A NEWS 18.11.2017 23:01:21 Mid Break-1 23:01:17 23:03:21 23
    90 A NEWS 18.11.2017 23:01:37 Mid Break-1 23:01:17 23:03:21 23
    91 A NEWS 18.11.2017 23:01:57 Mid Break-1 23:01:17 23:03:21 23
    140 A NEWS 18.11.2017 23:43:10 Mid Break-3 23:33:53 23:44:55 23
    141 A NEWS 18.11.2017 23:43:40 Mid Break-3 23:33:53 23:44:55 23
    142 A NEWS 18.11.2017 23:44:39 Mid Break-3 23:33:53 23:44:55 23
    143 A NEWS 18.11.2017 23:57:21 Casual 23:57:21 23:59:58 23
    144 A NEWS 18.11.2017 23:57:31 Casual 23:57:21 23:59:58 23
    145 A NEWS 18.11.2017 23:57:39 Casual 23:57:21 23:59:58 23
    146 A NEWS 18.11.2017 23:57:57 Casual 23:57:21 23:59:58 23
    150 A NEWS 18.11.2017 23:58:46 Casual 23:57:21 23:59:58 23
    151 A NEWS 18.11.2017 23:59:06 Casual 23:57:21 23:59:58 23
    152 B NEWS 16.11.2017 20:01:24 Mid Break-2 20:01:24 20:01:50 20
    153 B NEWS 16.11.2017 20:15:08 Mid Break-1 20:15:08 20:20:20 20
    196 B NEWS 16.11.2017 20:42:04 Mid Break-2 20:31:41 20:43:24 20
    197 B NEWS 16.11.2017 20:42:14 Mid Break-2 20:31:41 20:43:24 20
    198 B NEWS 16.11.2017 20:42:29 Mid Break-2 20:31:41 20:43:24 20
    199 B NEWS 16.11.2017 20:42:49 Mid Break-2 20:31:41 20:43:24 20
    200 B NEWS 16.11.2017 20:53:38 Casual 20:53:38 21:00:02 20
    Worksheet: Sheet2v3
    Reply With Quote Reply With Quote
  8. 04-24-2019, 11:47 AM #138
    DocAElstein
    DocAElstein is offline
    Fuhrer, Vierte Reich DocAElstein's Avatar
    Join Date
    Aug 2014
    Posts
    9,402
    Rep Power
    10
    _____ Workbook: Data Sheet v3.xls ( Using Excel 2007 32 bit )
    Row\Col A B C D E F G H
    199 B NEWS 16.11.2017 20:42:49 Mid Break-2 20:31:41 20:43:24 20
    200 B NEWS 16.11.2017 20:53:38 Casual 20:53:38 21:00:02 20
    201 B NEWS 16.11.2017 20:54:03 Casual 20:53:38 21:00:02 20
    202 B NEWS 16.11.2017 20:54:14 Casual 20:53:38 21:00:02 20
    203 B NEWS 16.11.2017 20:54:29 Casual 20:53:38 21:00:02 20
    217 B NEWS 16.11.2017 20:58:13 Casual 20:53:38 21:00:02 20
    218 B NEWS 16.11.2017 20:58:54 Casual 20:53:38 21:00:02 20
    219 B NEWS 16.11.2017 20:59:29 Casual 20:53:38 21:00:02 20
    220 B NEWS 18.11.2017 21:07:03 Mid Break-2 21:07:03 21:07:29 21
    221 B NEWS 18.11.2017 21:23:41 Mid Break-3 21:23:41 21:28:06 21
    222 B NEWS 18.11.2017 21:24:26 Mid Break-3 21:23:41 21:28:06 21
    256 B NEWS 18.11.2017 21:48:58 Mid Break-7 21:46:22 21:49:35 21
    257 B NEWS 18.11.2017 21:49:10 Mid Break-7 21:46:22 21:49:35 21
    258 B NEWS 18.11.2017 21:49:20 Mid Break-7 21:46:22 21:49:35 21
    259 B NEWS 18.11.2017 21:52:48 Casual 21:52:48 21:59:58 21
    260 B NEWS 18.11.2017 21:53:08 Casual 21:52:48 21:59:58 21
    269 B NEWS 18.11.2017 21:57:10 Casual 21:52:48 21:59:58 21
    270 B NEWS 18.11.2017 21:57:53 Casual 21:52:48 21:59:58 21
    271 B NEWS 18.11.2017 21:59:03 Casual 21:52:48 21:59:58 21
    272 B NEWS 18.11.2017 21:59:25 Casual 21:52:48 21:59:58 21
    273 C NEWS 17.11.2017 22:01:33 Casual 22:01:33 22:03:11 22
    274 C NEWS 17.11.2017 22:02:01 Casual 22:01:33 22:03:11 22
    275 C NEWS 17.11.2017 22:02:16 Casual 22:01:33 22:03:11 22
    276 C NEWS 17.11.2017 22:02:51 Casual 22:01:33 22:03:11 22
    277 C NEWS 17.11.2017 22:18:46 Mid Break-1 22:18:46 22:20:31 22
    292 C NEWS 17.11.2017 22:46:44 Mid Break-2 22:41:24 22:47:44 22
    293 C NEWS 17.11.2017 22:47:25 Mid Break-2 22:41:24 22:47:44 22
    294 C NEWS 17.11.2017 22:58:10 Casual 22:57:26 22:59:55 22
    295
    Worksheet: Sheet2v3
    Reply With Quote Reply With Quote
  9. 04-24-2019, 12:26 PM #139
    DocAElstein
    DocAElstein is offline
    Fuhrer, Vierte Reich DocAElstein's Avatar
    Join Date
    Aug 2014
    Posts
    9,402
    Rep Power
    10
    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
    Reply With Quote Reply With Quote
  10. 04-24-2019, 12:31 PM #140
    DocAElstein
    DocAElstein is offline
    Fuhrer, Vierte Reich DocAElstein's Avatar
    Join Date
    Aug 2014
    Posts
    9,402
    Rep Power
    10
    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
    Reply With Quote Reply With Quote
« Previous Thread | Next Thread »

Similar Threads

  1. Appendix Thread 2. ( Codes for other Threads, HTML Tables, etc.)
    By DocAElstein in forum Test Area
    Replies: 185
    Last Post: 05-22-2024, 10:02 PM
  2. Explain App.Index(Rng, Rws(), Clms()) (multicolumn Combobox with Index.application)
    By Amelynn in forum Excel Help
    Replies: 3
    Last Post: 03-07-2022, 05:12 AM
  3. HTML (Again!) arrOut()=Index(arrIn(),Rws(),Clms()
    By DocAElstein in forum Test Area
    Replies: 1
    Last Post: 08-23-2014, 02:27 AM

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  

Forum Rules