Hallo
habe folgendes Problem, ein Auszug aus dem Code:
-----------------------------------------------------------------------------------

Sub fkt_ghp()
Dim iHeight, iScroll, Label, quer, n_gesamt, xxx
iHeight = 500
iScroll = 365
quer = 0
n_gesamt = 20
Label = 0
xxx = 3

            With Auswahl

                .Hide

            End With

            'Userform GHP
            With GHP
                .Height = iHeight
                
            'Gesamtanzahl der Eingaben werden erzeugt - Zeilen
            For n_gesamt = 0 To n_gesamt - 1
            
                .ScrollHeight = iScroll + (n_gesamt * 20)
                
                'Spalten 9Stück werden erzeugt
                For quer = 0 To 8
                     Set Label = GHP.Controls.Add("Forms.Label.1")
                               
                        
                            With Label
                                    '.Font.Bold = true
                                    .TextAlign = 2
                                    .Font.Name = "Futura Bk"
                                    .BorderColor = &H8000000A
                                    .BorderStyle = 1
                                    .Left = 6 + (quer * 78)
                                    .Top = 340 + (n_gesamt * 20)
                                    .Height = 14
                                    .Width = 66
                                    .Name = "Label_" & quer & "_" & n_gesamt
                                    '.Caption = .Name
                            End With
                Next quer
            Next n_gesamt
                                .Label_1_1 = "xxx"
                                'fkt_eingaben
                                .Show
                                
                   

            End With



    ActiveWorkbook.Close (0)

End Sub

------------------------------------------------------------------------------------

Mein Problem ist das die Labels erstellt werden und .Caption = .Name sehe ich auch das die Namen richtig erstellt wurden.

Nur will ich jetzt mit .Label_1_1 = "xxx" (Beispiel) was zuweisen. Es kommt die Fehlermeldung "Methode oder Datenobjekt nicht gefunden.

Warum erkennt er das Label nicht bzw. hat er das wieder vergessen das er das gerade erstellt hat?

Wer kann mir helfen?

Danke
Gruss