Version =20
VersionRequired =20
Checksum =942178799
Begin Form
    AutoResize = NotDefault
    PopUp = NotDefault
    MaxButton = NotDefault
    MinButton = NotDefault
    ControlBox = NotDefault
    AutoCenter = NotDefault
    AllowDeletions = NotDefault
    CloseButton = NotDefault
    AllowAdditions = NotDefault
    AllowEdits = NotDefault
    AllowDesignChanges = NotDefault
    DefaultView =0
    TabularFamily =0
    BorderStyle =3
    PictureAlignment =2
    DatasheetGridlinesBehavior =3
    GridY =10
    Width =23246
    DatasheetFontHeight =10
    ItemSuffix =35
    Left =270
    Top =285
    Right =-29971
    Bottom =17535
    DatasheetGridlinesColor =12632256
    Filter ="((Not [qry_HandysGSVon ADbestellt].Bestellart=\"Durch AD\"))"
    RecSrcDt = Begin
        0xce2b9d8a910ae440
    End
    RecordSource ="qry_HandysGSVon ADbestellt"
    Caption ="qry_HandysGSVon ADbestellt"
    OnOpen ="Mkr_Max"
    DatasheetFontName ="Arial"
    AllowPivotTableView =0
    AllowPivotChartView =0
    AllowPivotChartView =0
    Begin
        Begin Label
            BackStyle =0
            BackColor =-2147483633
            ForeColor =-2147483630
        End
        Begin Rectangle
            SpecialEffect =3
            BackStyle =0
            Width =850
            Height =850
        End
        Begin Line
            Width =1701
        End
        Begin Image
            BackStyle =0
            OldBorderStyle =0
            PictureAlignment =2
            Width =1701
            Height =1701
        End
        Begin CommandButton
            Width =1701
            Height =283
            FontSize =8
            FontWeight =400
            FontName ="MS Sans Serif"
        End
        Begin OptionButton
            SpecialEffect =2
            LabelX =230
            LabelY =-30
        End
        Begin CheckBox
            SpecialEffect =2
            LabelX =230
            LabelY =-30
        End
        Begin OptionGroup
            SpecialEffect =3
            Width =1701
            Height =1701
        End
        Begin BoundObjectFrame
            SpecialEffect =2
            OldBorderStyle =0
            BackStyle =0
            Width =4536
            Height =2835
            LabelX =-1701
        End
        Begin TextBox
            FELineBreak = NotDefault
            SpecialEffect =2
            Width =1701
            LabelX =-1701
            BackColor =-2147483643
            ForeColor =-2147483640
            AsianLineBreak =255
        End
        Begin ListBox
            SpecialEffect =2
            Width =1701
            Height =1417
            LabelX =-1701
            BackColor =-2147483643
            ForeColor =-2147483640
        End
        Begin ComboBox
            SpecialEffect =2
            Width =1701
            LabelX =-1701
            BackColor =-2147483643
            ForeColor =-2147483640
        End
        Begin Subform
            SpecialEffect =2
            Width =1701
            Height =1701
        End
        Begin UnboundObjectFrame
            SpecialEffect =2
            OldBorderStyle =1
            Width =4536
            Height =2835
        End
        Begin ToggleButton
            Width =283
            Height =283
            FontSize =8
            FontWeight =400
            FontName ="MS Sans Serif"
        End
        Begin Tab
            BackStyle =0
            Width =5103
            Height =3402
        End
        Begin FormHeader
            Height =566
            BackColor =16777164
            Name ="Formularkopf"
            GUID = Begin
                0x93b1e4f118c4b6449c22d6114842ed3a
            End
        End
        Begin Section
            CanGrow = NotDefault
            Height =14629
            Name ="Detailbereich"
            GUID = Begin
                0xea5d8079d45cd342ac4b57ec6723c12b
            End
            Begin
                Begin TextBox
                    OverlapFlags =215
                    IMESentenceMode =3
                    Left =1653
                    Top =114
                    Width =2280
                    Height =255
                    ColumnWidth =900
                    Name ="KD_NR"
                    ControlSource ="KD_NR"
                    GUID = Begin
                        0xa85d2b7da8c9fc439de1c589df2c339b
                    End
                    Begin
                        Begin Label
                            OverlapFlags =93
                            Left =57
                            Top =114
                            Width =2790
                            Height =255
                            Name ="KD_NR_Bezeichnungsfeld"
                            Caption ="KD_NR"
                            GUID = Begin
                                0x7580d80e4bfaf9489227c76014c92868
                            End
                        End
                    End
                End
                Begin TextBox
                    EnterKeyBehavior = NotDefault
                    ScrollBars =2
                    OverlapFlags =215
                    IMESentenceMode =3
                    Left =1653
                    Top =417
                    Width =2280
                    Height =255
                    ColumnWidth =3000
                    TabIndex =1
                    Name ="AD"
                    ControlSource ="AD"
                    GUID = Begin
                        0x25eb238906b663459fe99316138b0ae2
                    End
                    Begin
                        Begin Label
                            OverlapFlags =93
                            Left =57
                            Top =417
                            Width =2790
                            Height =255
                            Name ="AD_Bezeichnungsfeld"
                            Caption ="AD"
                            GUID = Begin
                                0x6a3dd3f219711942b85236e0152fad0d
                            End
                        End
                    End
                End
                Begin TextBox
                    OverlapFlags =215
                    IMESentenceMode =3
                    Left =1656
                    Top =735
                    Width =2280
                    Height =255
                    ColumnWidth =3000
                    TabIndex =2
                    Name ="Art"
                    ControlSource ="Art"
                    GUID = Begin
                        0x7205b51366c4854eb7d8316b7de0511f
                    End
                    Begin
                        Begin Label
                            OverlapFlags =93
                            Left =60
                            Top =735
                            Width =2790
                            Height =255
                            Name ="Art_Bezeichnungsfeld"
                            Caption ="Art"
                            GUID = Begin
                                0x7af330d545546d4bb1dc9f171273c68f
                            End
                        End
                    End
                End
                Begin TextBox
                    OverlapFlags =215
                    IMESentenceMode =3
                    Left =1656
                    Top =1038
                    Width =2280
                    Height =255
                    ColumnWidth =1035
                    TabIndex =3
                    Name ="Artdatum"
                    ControlSource ="Artdatum"
                    GUID = Begin
                        0xc1278e1307a9cc458d0cb254ebcc3e2c
                    End
                    Begin
                        Begin Label
                            OverlapFlags =93
                            Left =60
                            Top =1038
                            Width =2790
                            Height =255
                            Name ="Artdatum_Bezeichnungsfeld"
                            Caption ="Artdatum"
                            GUID = Begin
                                0x47016cba6d781b4288cd761eb4d70130
                            End
                        End
                    End
                End
                Begin TextBox
                    EnterKeyBehavior = NotDefault
                    ScrollBars =2
                    OverlapFlags =215
                    IMESentenceMode =3
                    Left =1656
                    Top =1341
                    Width =2280
                    Height =255
                    ColumnWidth =3000
                    TabIndex =4
                    Name ="Bestellart"
                    ControlSource ="Bestellart"
                    GUID = Begin
                        0x926a3cbe6545ae4da8acb8164019607d
                    End
                    Begin
                        Begin Label
                            OverlapFlags =93
                            Left =60
                            Top =1341
                            Width =2790
                            Height =255
                            Name ="Bestellart_Bezeichnungsfeld"
                            Caption ="Bestellart"
                            GUID = Begin
                                0xbe56185fe4e6e84e87ffa6f3c684adc1
                            End
                        End
                    End
                End
                Begin TextBox
                    EnterKeyBehavior = NotDefault
                    ScrollBars =2
                    OverlapFlags =215
                    IMESentenceMode =3
                    Left =1656
                    Top =1644
                    Width =2280
                    Height =255
                    ColumnWidth =3000
                    TabIndex =5
                    Name ="Artikelbezeichnung"
                    ControlSource ="Artikelbezeichnung"
                    GUID = Begin
                        0x37895e7879439b428c17ccf6e127a16b
                    End
                    Begin
                        Begin Label
                            OverlapFlags =93
                            Left =60
                            Top =1644
                            Width =2790
                            Height =255
                            Name ="Artikelbezeichnung_Bezeichnungsfeld"
                            Caption ="Artikelbezeichnung"
                            GUID = Begin
                                0xf449608c0ff01a4c883b20a199efaa88
                            End
                        End
                    End
                End
                Begin TextBox
                    OverlapFlags =215
                    TextAlign =3
                    IMESentenceMode =3
                    Left =9006
                    Top =120
                    Width =2040
                    Height =255
                    ColumnWidth =2310
                    TabIndex =6
                    Name ="EkEinzelpreisNetto"
                    ControlSource ="EkEinzelpreisNetto"
                    GUID = Begin
                        0x5d07b9d205a2f34991cf1d6e8a79ce9d
                    End
                    Begin
                        Begin Label
                            OverlapFlags =93
                            Left =6975
                            Top =120
                            Width =2790
                            Height =255
                            Name ="EkEinzelpreisNetto_Bezeichnungsfeld"
                            Caption ="EkEinzelpreisNetto"
                            GUID = Begin
                                0x48c95e73852fdb4ab3e75592102c6f2b
                            End
                        End
                    End
                End
                Begin TextBox
                    OverlapFlags =215
                    TextAlign =3
                    IMESentenceMode =3
                    Left =9006
                    Top =423
                    Width =2040
                    Height =255
                    ColumnWidth =2310
                    TabIndex =7
                    Name ="Gesamtbetrag"
                    ControlSource ="Gesamtbetrag"
                    GUID = Begin
                        0x0f03a587a6378e4d823012ea9d9acc31
                    End
                    Begin
                        Begin Label
                            OverlapFlags =93
                            Left =6975
                            Top =423
                            Width =2790
                            Height =255
                            Name ="Gesamtbetrag_Bezeichnungsfeld"
                            Caption ="Gesamtbetrag"
                            GUID = Begin
                                0x5e1c68579cc30c47b1d845dd7e386d5c
                            End
                        End
                    End
                End
                Begin TextBox
                    OverlapFlags =215
                    TextAlign =3
                    IMESentenceMode =3
                    Left =9006
                    Top =726
                    Width =2040
                    Height =255
                    ColumnWidth =2310
                    TabIndex =8
                    Name ="Einzel_VK_Preis_brutto"
                    ControlSource ="Einzel_VK_Preis_brutto"
                    GUID = Begin
                        0x4b11cbda4a9e2845b268298139448f0e
                    End
                    Begin
                        Begin Label
                            OverlapFlags =93
                            Left =6975
                            Top =726
                            Width =2790
                            Height =255
                            Name ="Einzel_VK_Preis_brutto_Bezeichnungsfeld"
                            Caption ="Einzel_VK_Preis_brutto"
                            GUID = Begin
                                0x6c3842498abf234e9492cad0e676409c
                            End
                        End
                    End
                End
                Begin TextBox
                    OverlapFlags =223
                    TextAlign =3
                    IMESentenceMode =3
                    Left =9006
                    Top =1029
                    Width =2040
                    Height =255
                    ColumnWidth =2310
                    TabIndex =9
                    Name ="Gesamt_VK_Preis_brutto"
                    ControlSource ="Gesamt_VK_Preis_brutto"
                    GUID = Begin
                        0xfe84b3535adaa546a630a878d25ac66b
                    End
                    Begin
                        Begin Label
                            OverlapFlags =93
                            Left =6975
                            Top =1029
                            Width =2790
                            Height =255
                            Name ="Gesamt_VK_Preis_brutto_Bezeichnungsfeld"
                            Caption ="Gesamt_VK_Preis_brutto"
                            GUID = Begin
                                0x8dc703f502eada4e89b451f8588b51ed
                            End
                        End
                    End
                End
                Begin TextBox
                    DecimalPlaces =2
                    OverlapFlags =215
                    TextAlign =3
                    IMESentenceMode =3
                    Left =9006
                    Top =1293
                    Width =2040
                    Height =255
                    ColumnWidth =2310
                    TabIndex =10
                    Name ="Sub gesamt"
                    ControlSource ="Sub gesamt"
                    Format ="#,##0.00 €;-#,##0.00 €"
                    EventProcPrefix ="Sub_gesamt"
                    GUID = Begin
                        0xe61458d7027f5b4c86faa7ef3e24b896
                    End
                    Begin
                        Begin Label
                            OverlapFlags =95
                            Left =6975
                            Top =1293
                            Width =2790
                            Height =255
                            Name ="Sub gesamt_Bezeichnungsfeld"
                            Caption ="Sub gesamt"
                            EventProcPrefix ="Sub_gesamt_Bezeichnungsfeld"
                            GUID = Begin
                                0xea1bbadf78f83b4d91be3dca78c8ac42
                            End
                        End
                    End
                End
                Begin TextBox
                    DecimalPlaces =2
                    OverlapFlags =215
                    TextAlign =3
                    IMESentenceMode =3
                    Left =9006
                    Top =1596
                    Width =2040
                    Height =255
                    ColumnWidth =2310
                    TabIndex =11
                    Name ="Sub AD"
                    ControlSource ="Sub AD"
                    Format ="#,##0.00 €;-#,##0.00 €"
                    EventProcPrefix ="Sub_AD"
                    GUID = Begin
                        0x7409efdeadb7d14eb0992771662ba830
                    End
                    Begin
                        Begin Label
                            OverlapFlags =93
                            Left =6975
                            Top =1596
                            Width =2790
                            Height =255
                            Name ="Sub AD_Bezeichnungsfeld"
                            Caption ="Sub AD"
                            EventProcPrefix ="Sub_AD_Bezeichnungsfeld"
                            GUID = Begin
                                0x3d36a24db802f94ca464d4242b6d57ea
                            End
                        End
                    End
                End
                Begin CommandButton
                    OverlapFlags =85
                    Left =4025
                    Top =1360
                    Width =336
                    Height =336
                    TabIndex =12
                    Name ="Befehl29"
                    Caption ="Befehl29"
                    OnClick ="Mkr_Auswahlbasierend"
                    PictureData = Begin
                        0x2800000010000000100000000100040000000000800000000000000000000000 ,
                        0x0000000000000000000000000000800000800000008080008000000080008000 ,
                        0x8080000080808000c0c0c0000000ff00c0c0c00000ffff00ff000000c0c0c000 ,
                        0xffff0000ffffff00dadadadadadadadaadadadad00adadaddadadad7b00adada ,
                        0xadadadad7b00adaddadadada7fb00adaadadadada7fb00addadadad0000fb00a ,
                        0xadadada7fbbbbb00dada000a7fb00adaadad060da7fb00addada080ad7fbb00a ,
                        0xadad080dad7fbb00dad08860dad7fbb0ad0888860dadadadd06ff88860dadada ,
                        0x00000000000dadad000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000
                    End
                    ObjectPalette = Begin
                        0x0003100000000000800000000080000080800000000080008000800000808000 ,
                        0x80808000c0c0c000ff000000c0c0c000ffff00000000ff00c0c0c00000ffff00 ,
                        0xffffff0000000000
                    End
                    GUID = Begin
                        0xecb0e9b79765ab4a99b12ae67e93d1ab
                    End
                End
                Begin CommandButton
                    OverlapFlags =85
                    Left =4755
                    Top =1365
                    Width =336
                    Height =336
                    TabIndex =13
                    Name ="Befehl30"
                    Caption ="Befehl29"
                    OnClick ="Mkr_Auswahlauschliessend"
                    PictureData = Begin
                        0x2800000010000000100000000100040000000000800000000000000000000000 ,
                        0x0000000000000000000000000000800000800000008080008000000080008000 ,
                        0x8080000080808000c0c0c0000000ff00c0c0c00000ffff00ff000000c0c0c000 ,
                        0xffff0000ffffff00dadadadadadadadaadadadadadadadaddadadadadadadada ,
                        0xadadad0000adadaddadada0660dadadaadadad0660adadaddadada0f80dadada ,
                        0xadadad0f80adadaddadad088860adadaadad06888660adaddad068f888660ada ,
                        0xad068f88888660add068fff88886660aa00000000000000ddadadadadadadada ,
                        0xadadadadadadadad000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000
                    End
                    ObjectPalette = Begin
                        0x0003100000000000800000000080000080800000000080008000800000808000 ,
                        0x80808000c0c0c000ff000000c0c0c000ffff00000000ff00c0c0c00000ffff00 ,
                        0xffffff0000000000
                    End
                    GUID = Begin
                        0x6bc4b30fd572924aad982a38fd026e02
                    End
                End
                Begin Label
                    OverlapFlags =85
                    Left =11399
                    Top =170
                    Width =3345
                    Height =1605
                    Name ="Bezeichnungsfeld31"
                    Caption ="Für Duchr AD bestellt auf eines der betreffenenden Datensätze gehen und auf Ausw"
                        "ahlbasierter Filter gehen. Bei allen nicht duch AD bestellt auf Durch AD bestell"
                        "t gehen und auswahlausschließender Filter wählen. Alle leeren auswählen ein leer"
                        "en Datensatz nehmen und auswahlbasierenden Filter wählen. "
                    GUID = Begin
                        0x4bfd7f7ac150ff4da643ec07b6dc485a
                    End
                End
                Begin Subform
                    OverlapFlags =85
                    Left =56
                    Top =1984
                    Width =23190
                    Height =12645
                    TabIndex =14
                    Name ="qry_ReklasfuerAnalyseHandyGS"
                    SourceObject ="Form.frmReklasfuerAnalyseHandyGS"
                    LinkChildFields ="KD_NR"
                    LinkMasterFields ="KD_NR"
                    GUID = Begin
                        0x64edffca9fdd054d91fc2a92f434ee1b
                    End
                End
                Begin CommandButton
                    OverlapFlags =85
                    Left =5550
                    Top =1365
                    Width =336
                    Height =336
                    TabIndex =15
                    Name ="Befehl34"
                    Caption ="Befehl29"
                    OnClick ="MKr_FilerAufheben"
                    PictureData = Begin
                        0x2800000010000000100000000100040000000000800000000000000000000000 ,
                        0x0000000000000000000000000000800000800000008080008000000080008000 ,
                        0x8080000080808000c0c0c0000000ff00c0c0c00000ffff00ff000000c0c0c000 ,
                        0xffff0000ffffff00dadadadadadadadaadadadadadadadaddadada17dadadad7 ,
                        0xadadad117dadad17dadada711adad71aadadada117ad117ddada0007117711da ,
                        0xadad060811111daddada08087111dadaadad087711117daddad081111ad117da ,
                        0xad0881167dad117dd06ff88860dad11aa000000000adadaddadadadadadadada ,
                        0xadadadadadadadad
                    End
                    ObjectPalette = Begin
                        0x0003100000000000800000000080000080800000000080008000800000808000 ,
                        0x80808000c0c0c000ff000000c0c0c000ffff00000000ff00c0c0c00000ffff00 ,
                        0xffffff0000000000
                    End
                    GUID = Begin
                        0x0582fcc4e6662846b8c35b0ad6ffe0a0
                    End
                End
            End
        End
        Begin FormFooter
            Height =576
            BackColor =16777164
            Name ="Formularfuß"
            GUID = Begin
                0x7289f5333704ae408558b0485dbf1756
            End
            Begin
                Begin CommandButton
                    OverlapFlags =85
                    Left =60
                    Top =45
                    Width =531
                    Height =516
                    Name ="Befehl33"
                    Caption ="Befehl33"
                    OnClick ="[Event Procedure]"
                    PictureData = Begin
                        0x2800000010000000100000000100040000000000800000000000000000000000 ,
                        0x0000000000000000000000000000800000800000008080008000000080008000 ,
                        0x8080000080808000c0c0c0000000ff00c0c0c00000ffff00ff000000c0c0c000 ,
                        0xffff0000ffffff00dadad0dadadadadaadad00adadadadaddad030dadadadada ,
                        0xad0330adadadadad0033300000000adaa03330ff0dadadadd03300ff0adad4da ,
                        0xa03330ff0dad44add03330ff0ad44444a03330ff0d444444d03330ff0ad44444 ,
                        0xa0330fff0dad44add030ffff0adad4daa00fffff0dadadadd00000000adadada ,
                        0xadadadadadadadad000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000
                    End
                    ObjectPalette = Begin
                        0x0003100000000000800000000080000080800000000080008000800000808000 ,
                        0x80808000c0c0c000ff000000c0c0c000ffff00000000ff00c0c0c00000ffff00 ,
                        0xffffff0000000000
                    End
                    ControlTipText ="Formular schließen"
                    GUID = Begin
                        0x6c8f5b56fc805042a017db3d9e8cb16e
                    End
                End
            End
        End
    End
End
CodeBehindForm
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Compare Database

Private Sub Befehl33_Click()
On Error GoTo Err_Befehl33_Click


    DoCmd.Close

Exit_Befehl33_Click:
    Exit Sub

Err_Befehl33_Click:
    MsgBox Err.Description
    Resume Exit_Befehl33_Click
    
End Sub