Office: vba comboboxen auswählen

Helfe beim Thema vba comboboxen auswählen in Microsoft Excel Hilfe um das Problem gemeinsam zu lösen; Hallo an alle. Ich versuche schon länger erstellte comboboxen auszuwählen und je nach bedarf anzuzeigen. Auf grund der hohen Anzahl... Dieses Thema im Forum "Microsoft Excel Hilfe" wurde erstellt von Knappi, 5. Januar 2015.

  1. Knappi Neuer User

    vba comboboxen auswählen


    Hallo an alle.

    Ich versuche schon länger erstellte comboboxen auszuwählen und je nach bedarf anzuzeigen.
    Auf grund der hohen Anzahl an Boxen wurde der die TAbelle rasch voll oder wenn ich sie verteilt habe unüberssichtlich.
    Nächster Schritt war mehrere Tabellenblätter mit der dazughörigen Box zu erstellen.
    Bei 10 Verschiedenen TAbellenblätter mit dazughörigen Comboboxen habe ich mich auch nicht wohl gefühlt.
    Beim nächsten Versuch habe ich ein leeres Tabellenblatt mit Komboboxen erstellt.
    Beim Hauttabellenblatt habe ich eine userform gefüllt mit Comand Button erstellt
    Die dazugehörigen Makros kopieren die Komboboxen auf der Hauttabelle.
    schwierigkeiten gibt es weil die Makros die Komboboxen nicht genau plazieren.
    Auch wenn ich top und left bei den Eigenwschaften eingestellt habe.
    Auch das Löschen der nicht benötigten boxen bereitet schwierigkeiten.
    Das Makro findet die Box nicht weil die Box nicht genau plaziert wurde.
    Auch wenn eine Bestimmte box definiere ZB."combobox21" funktioniert es nicht weil das Makro sich auf eine bestimmte Box versteift.

    Ich verwende Office 2010
    Meine Frage lautet gibt es eine bessere Möglichkeit combobxen auszuwählen azuzeigen und wider zu löschen, wenn eine andere gewält wurde.
     
    Knappi, 5. Januar 2015
    #1
  2. miriki Erfahrener User
    Moinsens!

    Vielleicht hilft Dir mein Beispiel im Anhang etwas weiter und bietet Dir einen Aufsetzpunkt.
    - Ein Button erzeugt eine Matrix von CheckBoxen
    - Ein weiterer Button blendet die CheckBoxen ein und aus (nach Zufall)
    - Der letzte Button löscht die CheckBoxen wieder vom Blatt

    Das soll nur zeigen, wie Du das Handling mit den CheckBoxen vielleicht in den Griff kriegen könntest.

    Gruß, Michael
     
    miriki, 5. Januar 2015
    #2
  3. Knappi Neuer User
    Hallo an alle.

    habe mich für folgende Lösung entschieden.
    Unten ersichtlich
    Funktioniert supper.

    Momentan hänge ich an mehrspaltigen comboboxen .
    eingelesen habe ich die Spalten mit List fill Range.
    ausgelesen momentan mit Der Linked cell.
    der VBA code mit List und Cells eigenschaft fehlt leider.
    momentan verwende ich Viele Sverweise.
    möchte aber davon loskommen.
    Vieleicht kann mir jemand einen vorschlag machen.
    die comboobxen sind auf einem Tabelleblatt.





    Private Sub ComboBox215_Change()
    If ComboBox215.Value = "Liste Kartoffel" Then
    ComboBox24.Visible = True
    Else
    ComboBox24.Visible = False
    End If
    If ComboBox215.Value = "Liste Salat" Then
    ComboBox23.Visible = True
    Else
    ComboBox23.Visible = False
    End If
    If ComboBox215.Value = "Liste Kraut" Then
    ComboBox22.Visible = True
    Else
    ComboBox22.Visible = False
    End If
    If ComboBox215.Value = "Liste Rohnen" Then
    ComboBox21.Visible = True
    Else
    ComboBox21.Visible = False
    End If
    End Sub
     
  4. Knappi Neuer User

    vba comboboxen auswählen

    Hallo an alle.

    Ich bin wirklich ein Neuling.
    Erfolge kann ich schon erziehlen.
    Hänge aber wieder mal.
    combobox mehrspaltig funktioniert noch nicht richtig
    vielleicht kann mir jemand helfen.
    Danke im Voraus

    Private Sub cboKartoffel_Change()
    Range("CF8") = cboKartoffel.Column(0)
    Range("CG8") = cboKartoffel.Column(1)
    Range("CH8") = cboKartoffel.Column(2)
    Range("CI8") = cboKartoffel.Column(3)
    Range("CJ8") = cboKartoffel.Column(4)
    Range("CK8") = cboKartoffel.Column(5)
    Range("CL8") = cboKartoffel.Column(6)
    Range("CM8") = cboKartoffel.Column(7)
    Range("CO8") = cboKartoffel.Column(8)
    Range("CP8") = cboKartoffel.Column(9)
    Range("CQ8") = cboKartoffel.Column(10)
    Range("CS8") = cboKartoffel.Column(11)
    Range("CU8") = cboKartoffel.Column(12)

    Dim I As Integer
    For I = 12 To 50
    cboKartoffel.ColumnCount = 12
    cboKartoffel.AddItem Sheets("Kartoffel").Cells(I, 1) In dieser Zeile gibt es einen Fehler Laufzeitfehler 70 zugriff verweigert
    cboKartoffel.List(I - 12, 12) = Sheets(Kartoffel).Cells(I, 12)
    Next I

    End Sub
     
  5. miriki Erfahrener User
    Moinsens!

    Das wird schwierig mit den Informationen. Da fehlt noch einiges an Futter "drumherum".

    Es fängt schon damit an, daß die Variable "Kartoffel" nicht deklariert ist. Ok, kann man sich zusammenreien... (Fehlen wohl nur die ", oder?)

    Bei 12 Spalten rennt der Index im oberen Block aber bei 12 an die Wand (0 bis 11 ist Grenze).

    Die ganzen Einstellungen der ComboBox (ListFillRange und so) wären schon hilfreich.

    Außerdem ist mir irgendwie so gar nicht klar, was Du eigentlich überhaupt mit der Routine bewerkstelligen möchtest. Wieso willst Du die ComboBox mit Werten füllen, wenn sich der ausgewählte Wert geändert hat? Eigentlich sollte die Liste da bereits lange gefüllt sein, weil man ja sonst nichts auswählen kann. Die Eigenschaft ListFillRange kennst Du, oder?

    Bist Du Dir sicher, daß Du die mehrpaltige Funktionalität der ComboBox auch so nutzt, wie sie gedacht ist?

    Gruß, Michael
     
  6. Knappi Neuer User
    Hallo an alle

    die Comboboxen funktionieren jetzt.
    gefüllt habe ich sie mit der ListfillRange
    ausgelesen mit Range.
    wenn jemand die Eigenschaften wissen will kann ich ich sie schicken.

    mfg Hubert






    Private Sub cboKraut_Change()
    Range("CF14") = cboKraut.Column(0)
    Range("e2") = cboKraut.Column(1)
    Range("CG34") = cboKraut.Column(1)
    Range("CH34") = cboKraut.Column(2)
    Range("CI34") = cboKraut.Column(3)
    Range("CJ34") = cboKraut.Column(4)
    Range("CK34") = cboKraut.Column(5)
    Range("CL34") = cboKraut.Column(6)
    Range("CM34") = cboKraut.Column(7)
    Range("CO34") = cboKraut.Column(8)
    Range("CP34") = cboKraut.Column(9)
    Range("CQ34") = cboKraut.Column(10)
    Range("CS34") = cboKraut.Column(11)
    Range("CU34") = cboKraut.Column(12)
    End Sub
     
    Knappi, 1. März 2015
    #6
Thema:

vba comboboxen auswählen

Die Seite wird geladen...
  1. vba comboboxen auswählen - Similar Threads - vba comboboxen auswählen

  2. Combobox (Kombinationsfeld) im Tabellenblatt mit VBA

    in Microsoft Excel Hilfe
    Combobox (Kombinationsfeld) im Tabellenblatt mit VBA: Hallo, es wäre super, wenn mir jemand bei diesem (vielleicht nicht ganz trivialen Problem) behilflich sein könnte: Excel 2016, Win 7: Ich möchte eine Combobox in einem Tabellenblatt mittels VBA...
  3. Excel VBA Suche mit Hilfe von Comboboxen in Anhängigkeiten

    in Microsoft Excel Hilfe
    Excel VBA Suche mit Hilfe von Comboboxen in Anhängigkeiten: Hallo Ich bin unerfahren im Bereich VBA und versuche mich aber grade an einer (für mich) sehr komplexen Aufgabe. Ich würde gerne eine Suche über eine UserForm mit 4 Comboboxen erstellen....
  4. VBA Combobox Eintrag automatisch markieren

    in Microsoft Word Hilfe
    VBA Combobox Eintrag automatisch markieren: Moin. War etwas schnell. Noch ein Wunsch: Ich habe 2 Userformen (UF). Wenn ich UF 1 mit Command-Button auf UF 2 wechsel, wird direkt als erstes die Combobox angesteuert (hier: Anrede "Herr"...
  5. VBA Checkbox und Combobox

    in Microsoft Word Hilfe
    VBA Checkbox und Combobox: Moin. Ich hab folgendes vor: In meinem Dokument gibt es 2 Leistungsarten, die unabhängig voneinander ausgewählt werden können, also entweder LA1 oder LA2 oder beide zusammen. Soweit hab ich...
  6. Excel VBA Code ComboBox abhänigkeit

    in Microsoft Excel Hilfe
    Excel VBA Code ComboBox abhänigkeit: Hallo, vielleicht kann mir einer von euch netten Menschen helfen. Habe 2 Tabellen, Tabelle 1 ist enthalten, ID und Account Tabelle 2 enthält ID ACC und Charakter und dann will ich per...
  7. Aktualisierung einer Combobox über Linked Cell

    in Microsoft Excel Hilfe
    Aktualisierung einer Combobox über Linked Cell: Hallo, ich benötige Hilfe zur ComboBox. Es geht um die Aktualisierung des Textfelds. Über das Aktivieren einer CheckBox schreibe ich in die LinkedCell einer ComboBox einen Text. Dieser...
  8. ComboBox mit Array befüllen

    in Microsoft Excel Hilfe
    ComboBox mit Array befüllen: Hallo Allerseits :), Und zwar habe ich folgendes Problem: Ich erstelle ein neues Sheet, erstelle eine ComboBox und möchte sie mit einem vordefinierten Array befüllen (Alles in VBA). Im Moment...
Schlagworte: