{"text_format":"1","workbook":"xlsx","n_sheets":1,"sheets":["Start"],"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":"Start","index":0,"n_rows":32,"n_cols":14,"rows_kept":32,"cut":false,"hidden":false,"merged":[]}
["Kolbig"]
[{"$f":"LEFT(A1,2)","v":"Ko"}]
[null,null,null,null,null,null,null,null,null,null,null,null,null,"  Dim vTemp  As Variant"]
[null,null,null,null,null,null,null,null,null,null,null,null,null,"    Dim aTmp"]
[19]
["Namen der Rechnungs-Ersteller:",null,null,null,null,null,null,null,null,null,null,null,null,"  With ListBoxNeu1                    ' betrifft die ListBox1"]
["ANöhlen",null,null,null,null,null,null,null,null,null,null,null,null,"       .Clear                      ' die ListBox leeren"]
["Kolbig",null,null,null,null,null,null,null,null,null,null,null,null,"  End With"]
["SNöhlen"]
["passi",null,null,null,null,null,null,null,null,null,null,null,null,"   With ThisWorkbook.Worksheets(\"Start\")                 ' den Tabellenblattnamen ggf. anpassen!"]
["Pöstges",null,null,null,null,null,null,null,null,null,null,null,null,"     ' vTemp = .Range(\"A3:Y\" & .Cells(Rows.Count, 1).End(xlUp).Row)"]
["Topüth",null,null,null,null,null,null,null,null,null,null,null,null,"      vTemp = .Range(\"A7:A\" & .Cells(Rows.Count, 1).End(xlUp).Row)"]
["Zacher",null,null,null,null,null,null,null,null,null,null,null,null,"      "]
[null,null,null,null,null,null,null,null,null,null,null,null,null,"      ListBoxNeu1.List = vTemp"]
[null,null,null,null,null,null,null,null,null,null,null,null,null,"   End With"]
[null,null,null,null,null,null,null,null,null,null,null,null,null,"   "]
[null,null,null,null,null,null,null,null,null,null,null,null,null,"   "]
[null,null,null,null,null,null,null,null,null,null,null,null,null,"   With ListBoxNeu1        ' betrifft die ListBox1"]
[null,null,null,null,null,null,null,null,null,null,null,null,null,"     ' .Height = 280     ' die Höhe festlegen"]
[null,null,null,null,null,null,null,null,null,null,null,null,null,"     ' .Left = 36        ' den linken Randabstand festlegen"]
[null,null,null,null,null,null,null,null,null,null,null,null,null,"     ' .Top = 44         ' den oberen Randabstand festlegen"]
[null,null,null,null,null,null,null,null,null,null,null,null,null,"     ' .Width = 190      ' die Breite festlegen"]
[null,null,null,null,null,null,null,null,null,null,null,null,null,"      .Font.Size = 10   ' die Schriftgröße festlegen"]
[null,null,null,null,null,null,null,null,null,null,null,null,null,"      .ForeColor = RGB(256, 0, 0) ' Schriftfarbe immer mit RGB 255 schwarz"]
[null,null,null,null,null,null,null,null,null,null,null,null,null,"     ' Worksheets(Beispiel).Cells(2,1).Interior.Color = RGB(Rot, Gruen, Blau)"]
[null,null,null,null,null,null,null,null,null,null,null,null,null,"   ' &H000000FF&"]
[null,null,null,null,null,null,null,null,null,null,null,null,null,"      .ColumnCount = 2  ' die Anzahl der Spalten festlegen"]
[null,null,null,null,null,null,null,null,null,null,null,null,null,"                        ' die Breite der Spalten festlegen"]
[null,null,null,null,null,null,null,null,null,null,null,null,null,"      .ColumnWidths = (\"6,5cm;0,0cm\")"]
[null,null,null,null,null,null,null,null,null,null,null,null,null,"      .Clear            ' die ListBox leeren"]
[null,null,null,null,null,null,null,null,null,null,null,null,null,"      .Column = vTemp"]
[null,null,null,null,null,null,null,null,null,null,null,null,null,"   End With"]