Thema Datum  Von Nutzer Rating
Antwort
09.05.2022 18:40:16 Kasalak
Solved
Blau Listboox-Auswahl als "X" in Zellen transponieren und einlesen
09.05.2022 20:16:00 ralf_b
NotSolved
12.05.2022 12:45:55 Gast10135
NotSolved

Ansicht des Beitrags:
Von:
ralf_b
Datum:
09.05.2022 20:16:00
Views:
34
Rating: Antwort:
  Ja
Thema:
Listboox-Auswahl als "X" in Zellen transponieren und einlesen

"Soweit so gut."  <-- das habe ich auch mal gedacht. Aber dann fand ich heraus wie viel besser es ist alles in einer Maske zu erledigen. Also Neu, ändern. löschen. 

Zu deiner Frage: Ja ,ist  machbar. Du wirst wohl Deine Listboxspaltennurmmern mit den Tabellespalten

hart codieren müssen oder den Beginn  der "X" Spalten per Suchfunktion jedesmal suchen um von dort aus die "X"'se  ein- oder auszutragen.

Z.b.

i=0

for each rng in Tabelle1.Cells(zeile, "H").resize(0,ListBox1.listcount)
    rng.value = iif(ListBox1.Selected(i),"x","")
    i= i+1
next

'listboxzeilen makrieren

for each rng in Tabelle1.Cells(zeile, "H").resize(0,ListBox1.listcount)
   ListBox1.Selected(i) =  rng.value = "x"
    i= i+1
next

*Ohne Garantie, ungetestet


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
09.05.2022 18:40:16 Kasalak
Solved
Blau Listboox-Auswahl als "X" in Zellen transponieren und einlesen
09.05.2022 20:16:00 ralf_b
NotSolved
12.05.2022 12:45:55 Gast10135
NotSolved