MS-Office-Forum
Google
   

Zurück   MS-Office-Forum > Microsoft Office > Microsoft Excel
Registrieren Forum Hilfe Alle Foren als gelesen markieren

Banner und Co.

Antworten
Ads Der Renner, 11 Entwicklertools für Access, Tipps & Trick und offene Datenbanken zum einzigartigen Preis.
Themen-Optionen Ansicht
Alt 03.04.2017, 13:25   #1
jokaup
MOF User
MOF User
Traurig VBA - Laufzeitfehler: 380 beim füllen einer Combobox

Hallo Zusammen, ich weiß nicht mehr weiter.
Ich bekomme beim befüllen einer Combobox den Fehler
Laufzeitfehler 381 Eigenschaft List konnte nicht gesetzt werden. Index des Eigenschaftsfelds ungültig.

Dabei scheint es sich bei mir immer um die gleiche Spalte zu handeln, in der ich den Wert einfügen möchte. Den Wert kann ich auch in eine andere Spalte einfügen. Das funktioniert.

Hier mal der Code dazu so umgeschrieben, dass man die anderen Funktionen nicht benötigt. Den Fehler bekomme ich auch in dem beigefügten Code.

Code:

Private Sub UserForm_Activate()

Dim i As Integer

'Eigenschaften der Combobox (10 Spalten, mit folgenden Breiten "50;50;50;50;50;200;200;0;0;75")
Me.cbo_Holzart.ColumnCount = 13
Me.cbo_Holzart.ColumnWidths = "50;50;50;50;50;200;200;0;75;75;125;125"
                    'Spalte:    0; 1; 2; 3; 4;  4;  6;7;8; 9; 10; 11"
For i = 9 To 150
    With Me.cbo_Holzart
    'Füllen der Auswahlbox
        .AddItem
        .List(.ListCount - 1, 0) = "1"
        .List(.ListCount - 1, 1) = "2"
        .List(.ListCount - 1, 2) = "3"
        .List(.ListCount - 1, 3) = "4"
        .List(.ListCount - 1, 4) = "5"
        .List(.ListCount - 1, 5) = "6"
        .List(.ListCount - 1, 6) = "7"
        .List(.ListCount - 1, 7) = "8"
        .List(.ListCount - 1, 8) = "9"
        .List(.ListCount - 1, 9) = "10"
        
        'Hier tritt der Fehler auf, auch schon im 1. Durchlauf. Wert ListCount = 1
        .List(.ListCount - 1, 10) = "11"
    End With
Next
    
End Sub
Ich verstehe es nicht, warum der Fehler immer in der einen Zeile auftritt / Immer, wenn ich die 10. Spalte mit einem Wert belegen möchte???

Kann man einer Combobox nur 10 Spalten hinzufügen?

Wäre super, wenn mir jemand helfen könnte.

Vielen Dank schon mal

Johannes

__________________

------------------------------------------------
Sagt mir wenn ich was falsch oder gut gemacht habe. Sonst lerne ich nichts daraus.
Feedback ist wichtig !!!
Ach ja, benutze Win 7 , Office 2010, VB6
jokaup ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 03.04.2017, 14:08   #2
Beverly
MOF Guru
MOF Guru
Standard

Hi Johannes,

einer List- oder ComboBox lassen sich nur 10 Spalten per AddItem zuweisen.

Frage: weshalb willst du die ComboBox überhaupt 141 mal mit denselben Werten füllen?


GrußformelBeverly's Excel - Inn

__________________

Bitte im Beitrag eine kurze Rückmeldung auch in dem Fall geben, wenn ein Problem gelöst wurde - dies hilft auch anderen Usern, wenn sie den betreffenden Thread lesen.
Möchtest du dich außerdem für die Hilfe bei der Lösung deines Problems bedanken? Das kannst du ganz einfach durch die Bewertung eines Beitrags (Schalter unten links).
Beverly ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 03.04.2017, 14:20   #3
jokaup
Threadstarter Threadstarter
MOF User
MOF User
Standard

Hallo,

das oben ist ein abgespeckter Quelltext. Ursprünglich fülle ich die Liste mit Werten aus einer anderen Excel Tabelle. Darin stehen Atrikel aus dem ERP System, welche so einer Kalkulation hinzugefügt werden können. Die Daten werden halt auch alle angezeigt bei der Auswahl. Wollte nun ein weiteres Feld hinzufügen wobei der Fehler auftritt.

Aber das ganze ist natürlich deutlich einfacher zu verstehen, wenn man den Quellcode auf das Kernproblem beschränkt und alles Beiwerk weglässt ;-)

Und einer Combobox lassen sich nur 10 Spalten hinzufügen, was soll den der quatsch?

Gibt es andere Möglichkeiten das zu machen?

Vielen Dank schon mal für die Hilfe

Johannes

__________________

------------------------------------------------
Sagt mir wenn ich was falsch oder gut gemacht habe. Sonst lerne ich nichts daraus.
Feedback ist wichtig !!!
Ach ja, benutze Win 7 , Office 2010, VB6
jokaup ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 03.04.2017, 14:29   #4
Beverly
MOF Guru
MOF Guru
Standard

Hi Johannes,

Zitat: von jokaup Beitrag anzeigen

... was soll den der quatsch?

Ich weiß, jeder Vergleich hinkt, aber in einem normalen PKW dürfen auch nur maximal 5 Personen fahren...
Das ist eben so festgelegt und da kann man auf und nieder und im Quadrat springen - es lässt sich nichts daran ändern sondern man muss sich damit arrangieren.

Zitat: von jokaup Beitrag anzeigen

Gibt es andere Möglichkeiten das zu machen?


Wenn man der Eigenschaft RowSource die Adresse des Zellbereichs mit den Daten zuweist, kann man auch mehr als 10 Spalten belegen.


GrußformelBeverly's Excel - Inn

__________________

Bitte im Beitrag eine kurze Rückmeldung auch in dem Fall geben, wenn ein Problem gelöst wurde - dies hilft auch anderen Usern, wenn sie den betreffenden Thread lesen.
Möchtest du dich außerdem für die Hilfe bei der Lösung deines Problems bedanken? Das kannst du ganz einfach durch die Bewertung eines Beitrags (Schalter unten links).
Beverly ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 03.04.2017, 14:41   #5
haklesoft
MOF Koryphäe
MOF Koryphäe
Standard

Hallo Johannes,

Zitat: von jokaup Beitrag anzeigen

Und einer Combobox lassen sich nur 10 Spalten hinzufügen, was soll den der quatsch?

Nicht meckern, sondern in der Hilfe nachlesen (hier Excel 2010):

Zitat:

Wenn ColumnCount auf 0 gesetzt wird, werden keine Spalten angezeigt. Wird die Eigenschaft auf -1 gesetzt, dann werden alle verfügbaren Spalten angezeigt. Bei ungebundenen Datenquellen liegt die Obergrenze bei 10 Spalten (0 bis 9).

__________________

Hang loose, haklesoft
haklesoft ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 03.04.2017, 14:52   #6
jokaup
Threadstarter Threadstarter
MOF User
MOF User
Standard

Ja, ist ja ok, wenn ich es auch nicht so ganz verstehe, warum es diese Grenze von 10 Spalten gibt, so werde ich es dennoch aktzeptieren müssen.

Ich habe halt nicht nach einer Spaltenanzahl Obergrenze gesucht, weil ich es mir nicht vorstellen konnte das es eine gibt.

Danke für die Hilfe
Johannes

__________________

------------------------------------------------
Sagt mir wenn ich was falsch oder gut gemacht habe. Sonst lerne ich nichts daraus.
Feedback ist wichtig !!!
Ach ja, benutze Win 7 , Office 2010, VB6
jokaup ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 03.04.2017, 14:55   #7
drambeldier
MOF Koryphäe
MOF Koryphäe
Standard

Moin,

Zitat:

was soll den der quatsch?

die Combobox soll die Arbeit erleichtern, zB dem Sachbearbeiter dabei helfen, eine Person zu finden. Wenn mehr als 10 Eigenschaften dazu notwendig sind, muss er sich ein Spaltenlineal in die Brille schleifen.

__________________

Gruß
Ralf
drambeldier ist gerade online  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 03.04.2017, 14:59   #8
jokaup
Threadstarter Threadstarter
MOF User
MOF User
Standard

Naja, über Sinn und Verstand von mehr als 10 Spalten lässt sich streiten.
Ich lade in die Combobox Artikel aus dem ERP System zur Auswahl und Übernahme in mit Excel erstellten Betriebsaufträgen.
Da fände ich mehr als 10 Spalten schon ganz gut.

Viele Grüße
Johannes

__________________

------------------------------------------------
Sagt mir wenn ich was falsch oder gut gemacht habe. Sonst lerne ich nichts daraus.
Feedback ist wichtig !!!
Ach ja, benutze Win 7 , Office 2010, VB6
jokaup ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 03.04.2017, 15:25   #9
Beverly
MOF Guru
MOF Guru
Standard

Hi Johannes,

Zitat: von jokaup Beitrag anzeigen

Da fände ich mehr als 10 Spalten schon ganz gut.


Das ist ja auch kein Problem, wenn du es so löst wie ich in meinem vorhergehenden Beitrag geschrieben habe - es funktioniert halt nur nicht mittels AddItem.


GrußformelBeverly's Excel - Inn

__________________

Bitte im Beitrag eine kurze Rückmeldung auch in dem Fall geben, wenn ein Problem gelöst wurde - dies hilft auch anderen Usern, wenn sie den betreffenden Thread lesen.
Möchtest du dich außerdem für die Hilfe bei der Lösung deines Problems bedanken? Das kannst du ganz einfach durch die Bewertung eines Beitrags (Schalter unten links).
Beverly ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Ads
Antworten


Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Besucher: 1)
 
Themen-Optionen
Ansicht

Forumregeln
Es ist Ihnen nicht erlaubt, neue Themen zu verfassen.
Es ist Ihnen nicht erlaubt, auf Beiträge zu antworten.
Es ist Ihnen nicht erlaubt, Anhänge anzufügen.
Es ist Ihnen nicht erlaubt, Ihre Beiträge zu bearbeiten.

vB Code ist An.
Smileys sind An.
[IMG] Code ist An.
HTML-Code ist An.
Gehe zu


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:38 Uhr.


Partner und Co.
Access-Paradies -Alles rund um die Datenbank Microsoft Access -Code -Programme-Tools -Tipps   Kostenlose Tipps & Tricks, Downloads und Programme   www.kulpa-online.com - Tipps - Tricks - Tutorials - Meinungen - Downloads uvm...   vb@rchiv · Willkommen in der Welt der VB Programmierung   Access-Garhammer - Hier finden Sie jede Menge Beispiel-Datenbanken zu Access und mehr ...   mcseboard.de   Die Top Seite für Excel-VBA-Makros uvm.

Powered by: vBulletin Version 3.6.2 (Deutsch)
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.

Copyright ©2000-2010 MS-Office-Forum. Alle Rechte vorbehalten.
Copyright ©Design: Manuela Kulpa ©Rechte: Günther Kramer
Eine Verwendung der Inhalte in anderen Publikationen, auch auszugsweise,
ist ohne ausdrückliche Zustimmung der Autoren nicht gestattet.
Beachten Sie bitte auch unsere Nutzungsbedingungen.