Thema Datum  Von Nutzer Rating
Antwort
21.06.2021 08:57:54 Pieter
Solved
21.06.2021 15:11:00 Gast28416
NotSolved
22.06.2021 07:44:57 Gast66240
NotSolved
Blau Steuerelement.List-Eigenschaft = Application.Transpose(...)
 22.06.2021 08:17:32 Mase
NotSolved
22.06.2021 20:20:01 Gast15529
NotSolved
23.06.2021 07:57:31 Mase
NotSolved

Ansicht des Beitrags:
Von:
Mase		 Datum:
22.06.2021 08:17:32		 Views:
226		 Rating:
     
Antwort:
  Ja
Thema:
Steuerelement.List-Eigenschaft = Application.Transpose(...)

Schleife nicht über die Controls-Auflistung mittels Namen sondern prüfe den Typ.

    Dim obj As Object
    
    For Each obj In Me.Controls
        Select Case TypeName(obj)
            Case Is = "ListBox", "ComboBox"
                obj.List = Application.Transpose(Tabelle1.Cells(lZeile, i))
        End Select
    Next

 


Ob Du den Code so eins zu eins anwenden kannst, hängt von der markierten Zeile ab.

Wenn Tabelle1.Cells(lZeile,i) nur eine Spalte ist, funktioniert das. Wenn nicht, muss geringfügig angepasst werden.

 

Dazu sollte jedoch der Tabellenaufbau bekannt sein.

 

Wie auch immer:

Die gezeigten Eigenschaften/Methoden sollten Dir weiterhelfen.

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
21.06.2021 08:57:54 Pieter
Solved
21.06.2021 15:11:00 Gast28416
NotSolved
22.06.2021 07:44:57 Gast66240
NotSolved
Blau Steuerelement.List-Eigenschaft = Application.Transpose(...)
 22.06.2021 08:17:32 Mase
NotSolved
22.06.2021 20:20:01 Gast15529
NotSolved
23.06.2021 07:57:31 Mase
NotSolved