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

Thread: Appendix Thread. 3 *

  1. #131
    Fuhrer, Vierte Reich DocAElstein's Avatar
    Join Date
    Aug 2014
    Posts
    9,455
    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
    ….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!!

  2. #132
    Fuhrer, Vierte Reich DocAElstein's Avatar
    Join Date
    Aug 2014
    Posts
    9,455
    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

  3. #133
    Fuhrer, Vierte Reich DocAElstein's Avatar
    Join Date
    Aug 2014
    Posts
    9,455
    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

  4. #134
    Fuhrer, Vierte Reich DocAElstein's Avatar
    Join Date
    Aug 2014
    Posts
    9,455
    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

  5. #135
    Fuhrer, Vierte Reich DocAElstein's Avatar
    Join Date
    Aug 2014
    Posts
    9,455
    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

  6. #136
    Fuhrer, Vierte Reich DocAElstein's Avatar
    Join Date
    Aug 2014
    Posts
    9,455
    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

  7. #137
    Fuhrer, Vierte Reich DocAElstein's Avatar
    Join Date
    Aug 2014
    Posts
    9,455
    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

  8. #138
    Fuhrer, Vierte Reich DocAElstein's Avatar
    Join Date
    Aug 2014
    Posts
    9,455
    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

  9. #139
    Fuhrer, Vierte Reich DocAElstein's Avatar
    Join Date
    Aug 2014
    Posts
    9,455
    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

  10. #140
    Fuhrer, Vierte Reich DocAElstein's Avatar
    Join Date
    Aug 2014
    Posts
    9,455
    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

Similar Threads

  1. Replies: 185
    Last Post: 05-22-2024, 10:02 PM
  2. Replies: 603
    Last Post: 05-20-2024, 03:31 PM
  3. Replies: 293
    Last Post: 09-24-2020, 01:53 AM
  4. Appendix Thread. Diet Protokol Coding Adaptions
    By DocAElstein in forum Test Area
    Replies: 6
    Last Post: 09-05-2019, 10:45 AM

Posting Permissions

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