{"text_format":"1","workbook":"xlsx","n_sheets":1,"sheets":["Tabelle1"],"not_rendered":{"charts":0,"images":0,"macros":1,"external_links":0,"defined_names":0,"comments":0,"pivot_tables":0},"unopened":[],"bounds":{"document_bytes":16777216,"sheet_cells":100000,"rows_first":2000,"rows_last":500,"rows_between":2000,"halvings":0,"cell_chars":16384,"cell_head_chars":4096},"cells_cut":0,"cells_raw":0,"read":"whole","date_system":"1900"}

{"sheet":"Tabelle1","index":0,"n_rows":21,"n_cols":7,"rows_kept":21,"cut":false,"hidden":false,"merged":[]}
[]
[]
[]
[]
["Reiner","Köln"]
["Peter","Bonn"]
["Hans","Frechen",null,null,null,null,"With frmDatenerfassung"]
["Fritz","Pulheim"]
["Koni","Kerpen",null,null,null,null,".ListBox4.Clear"]
[]
[null,null,null,null,null,null,"For lng = 5 To 2985"]
[]
[null,null,null,null,null,null,"If Cells(lng, 100).Value > CDate(.TextBox53) Then Exit For"]
[]
[null,null,null,null,null,null,"If Cells(lng, 100).Value >= CDate(.TextBox52) And Left(Cells(lng, 102), 1) = \"F\" Then"]
[null,null,null,null,null,null,".ListBox4.AddItem Cells(lng, 100).Text"]
[null,null,null,null,null,null,".ListBox4.Column(1, i) = Cells(lng, 102).Text"]
[null,null,null,null,null,null,"i = i + 1"]
[null,null,null,null,null,null,"End If"]
[]
[null,null,null,null,null,null,"Next lng"]