Office: VBA Listboxauswahl - bestimmte Werte Eintrag in ausgewählten Blättern

Helfe beim Thema VBA Listboxauswahl - bestimmte Werte Eintrag in ausgewählten Blättern in Microsoft Excel Hilfe um das Problem gemeinsam zu lösen; Guten Tag, ich habe eine Datei mit ca 180 Blättern (ein Blatt pro Kunde) die auch durch andere Makros erweitert werden wenn neue Kunden angelegt... Dieses Thema im Forum "Microsoft Excel Hilfe" wurde erstellt von Hefer, 23. November 2021.

  1. Hefer Neuer User

    VBA Listboxauswahl - bestimmte Werte Eintrag in ausgewählten Blättern


    Guten Tag,

    ich habe eine Datei mit ca 180 Blättern (ein Blatt pro Kunde) die auch durch andere Makros erweitert werden wenn neue Kunden angelegt werden.
    Das erstellen der Listbox im VBA Editor mit den Kunden funktioniert auch. Auch die Mehrfachauswahl mit setzen der Häkchen.
    Nun aber zu meinem Problem:
    Ich möchte bei den Ausgewählten Kunden auf die entsprechenden Blätter springen und dort dann in einer Zeile (Lastrow) einen Eintrag vornehmen.
    Ich weiß das dieses irgendwie in einer schleife Laufen muss, habe aber keinen richtigen Gedanken dazu.
    Die Listbox hat den Namen: Namen.

    kann mir jemand etwas auf die Sprünge helfen?

    Freundliche Grüße und vorab schon mal danke
    H.-J. Hefer
     
  2. Exl121150 Erfahrener User
    Hallo,

    beispielhaft könnte dann folgender VBA-Code verwendet werden:
    Code:
    Sub Auswahl_KundenblattSuche()
     
      Dim WsKunde As Worksheet
      Dim Ausgewählter_Kunde As String
      Dim letzteZeile As Long
     
      'Das Ergebnis der Listbox-Auswahl sei in der String-Variablen "Ausgewählter_Kunde" enthalten:
      'Das Arbeitsblatt des ausgewählten Kunden sollte dann genauso heißen.
     
      'Mit folgender Anweisung wird dann das Arbeitsblatt "WsKunde" ermittelt:
      Set WsKunde = Worksheets(Ausgewählter_Kunde)
     
      With WsKunde
         'Im Arbeitsblatt des Kunden kann zB. in Spalte A die letzte Zeile gesucht werden, die Daten enthält.
         'Mit folgender Anweisung kann in der Variablen "LetzteZeile" diese Zeilennummer ermittelt werden:
         letzteZeile = .Cells(Rows.Count, 1).End(xlUp).Row
       
         'Wenn zB. in Spalte B dieser letzten Datenzeile der Wert auf "Letzte Zeile SpalteB" gesetzt werden soll:
         .Cells(letzteZeile, 2).Value = "Letzte Zeile SpalteB"
     
         'usw. ... etc...
      End With
     
    End Sub
    
     
    Exl121150, 23. November 2021
    #2
  3. Hajo_Zi
    Hajo_Zi Erfahrener User
    nur wenige schauen auf Deinen Rechner und sehen die Datei.
    Ich möchte gerne den Fehler im Original sehen.

    Ich baue keine Datei nach. Die Zeit hat schon jemand investiert.

    Ein Nachbau sieht meist anders aus als das Original. <B>Darum sollte das Original verlinkt werden.</b>

    Wenn du an Stelle einer Demomappe deine Originalmappe hochladen willst, diese aber sensible Daten enthält, kannst du diese Daten
    Hinweis - Anonymisierung und Pseudonymisierung von Beispielmappen - MS-Office-Forum
    änderrn.
    Der Name einer hochgeladenen Mappe wird im Beitrag automatisch angezeigt, sodass es bei Verwendung von aussagekräftigen Namen leichter fällt, sie später im Ablageordner wiederzufinden und sie gedanklich einem bestimmten Thema zuzuordnen. Namen wie Muster*, Test*, Mappe*, Beispiel*, Fehler*, Kalender* usw. sind so allgemein, dass eine Zuordnung zu einem Thema unmöglich gemacht wird.
    Es sollte ein aussagekräftiger Name sein.

    Benutze hier im Forum die Funktion zum hochladen. Falls Du die nicht benutzen möchtest beachte, von unsicheren Servern wie z.B. www.file-upload.net lade ich keine Datei runter. (lt. Einschätzung meines Virenprogramms)3

    Bilder lade ich mir nicht runter, da Excel damit nichts anfangen kann.

    Bilder statt Datei | Excel ist sexy!

    Hochgeladene Bilder können zwar als solche in Excel importiert werden, sind jedoch bei der Lösung von Problemen nicht sehr hilfreich, da man die eigentlichen Daten nicht ohne große und zeitraubende Umwege direkt in die Tabelle übertragen kann.

    Das ist nur meine Meinung zu dem Thema.

    Eine abgespeckte Version hochladen.

    VBA Listboxauswahl - bestimmte Werte Eintrag in ausgewählten Blättern GrußformelVBA Listboxauswahl - bestimmte Werte Eintrag in ausgewählten Blättern Homepage
     
  4. Hefer Neuer User

    VBA Listboxauswahl - bestimmte Werte Eintrag in ausgewählten Blättern

    Hallo Hajo_Zi hallo allerseits

    Anbei nun einmal die bisherige abgespeckte Version meiner Datei.
    Es geht um das Modul Mehrfachauswahl.

    Freundliche Grüße
    H.-J. Hefer
     
Thema:

VBA Listboxauswahl - bestimmte Werte Eintrag in ausgewählten Blättern

Die Seite wird geladen...
  1. VBA Listboxauswahl - bestimmte Werte Eintrag in ausgewählten Blättern - Similar Threads - VBA Listboxauswahl bestimmte

  2. Aus Excel heraus verschiedene IP Adressen anpingen mit VBA

    in Microsoft Excel Hilfe
    Aus Excel heraus verschiedene IP Adressen anpingen mit VBA: Hallo zusammen. Vorweg: VBA kenn ich mich null aus! :-( Mein Ziel erst einmal: In einer Tabelle stehen in der Spalte C von 8 bis 21 verschiedene IP-Adressen. Per Klick auf einen Button soll dann...
  3. Drucken bis letzte beschriebene Zeile per VBA

    in Microsoft Excel Hilfe
    Drucken bis letzte beschriebene Zeile per VBA: Hallo, ich habe eine Tabelle von A3-O310 welche aber nicht immer voll ausgefüllt wird, da diese täglich neu beschrieben wird. Nun habe ich ein Makro gefunden, welches zwar den Druckbereich...
  4. Excel VBA - ListBox mit TextBox Filtern

    in Microsoft Excel Hilfe
    Excel VBA - ListBox mit TextBox Filtern: Grüße! Bin sonst stiller Mitleser und kann im Regelfall meine Probleme durch andere Forenbeiträge ableiten und passend abändern, aber hier bin ich an einem Punkt, wo meine VBA-Kenntnisse auf ihre...
  5. Diagrammfarbe gemäß Zellfarbe

    in Microsoft Excel Hilfe
    Diagrammfarbe gemäß Zellfarbe: Hallo zusammen, im Rahmen meiner Abschlussarbeit habe ich eine Frage an euch. Es geht um ein Tool in dem Kraftwerksdaten durch die Auswahl verschiedener Parameter verglichen werden können. In...
  6. VBA Datenbereich kopieren

    in Microsoft Excel Hilfe
    VBA Datenbereich kopieren: Hallo Forum, ich bin neu hier und habe lediglich VBA-Grundkenntnisse Ich möchte aus der MappeA Tabellenblatt Kontrolle Daten in die MappeB Tabellenblatt Kurse kopieren. Zum Testen habe ich...
  7. VBA-Macros in Excel 2019 unter Windows 11

    in Microsoft Excel Hilfe
    VBA-Macros in Excel 2019 unter Windows 11: Ich habe in Excel 2019 (Office Pro 2019) unter Windows 10 Pro ein VBA-Makro erstellt. Diese Arbeitsmappe läuft auf verschiedenen Systemen unter Excel 2019/Windows10 ohne Probleme. Jetzt habe ich...
  8. Datumvergleich mit VBA und Ergebnis übernehmen

    in Microsoft Excel Hilfe
    Datumvergleich mit VBA und Ergebnis übernehmen: Hallo, Ich brauchte eure Hilfe. Ich habe eine Preisliste (Liste) mit von-bis Perioden für viele Zeitraum (60 Spalten, mehreren Jahre). Ich möchte auf dem zweiten Blatt (Result) mit VBA rausfinde ,...
  1. Diese Seite verwendet Cookies, um Inhalte zu personalisieren, diese deiner Erfahrung anzupassen und dich nach der Registrierung angemeldet zu halten.
    Auf dieser Website werden Cookies für die Zugriffsanalyse und Anzeigenmessung verwendet.
    Wenn du dich weiterhin auf dieser Seite aufhältst, akzeptierst du unseren Einsatz von Cookies.
    Information ausblenden