Wie kann man in Excel einen Wert aus einem Listenelement in eine Zelle schreiben?

Nein kann nicht weg. Die liest das array aus.

Bogeyman10

Beitragsersteller

24.08.2021, 18:00

ich meinte, ob in der Zeile nicht etwas fehlt, da "wert" nicht als Dim definiert ist. Ich bekomme in dieser Zeile eine Fehlermeldung.

augsburgchris

24.08.2021, 18:03

Da ich kein OPtion Explicit verwenden und meine Variablen nur sehr selten deklariere sollte das nichts ausmachen. Welche Excelversion hast du?

Ist die Listbox als Formularsteuerelement oder als AcitveX drin?

Bogeyman10

Beitragsersteller

24.08.2021, 18:04

Habe Excel 2016. Die Listbox ist als ActiveX drin.

augsburgchris

24.08.2021, 18:07

Probiere es mal bitte als Formularsteuerelemnt.

augsburgchris

24.08.2021, 18:23

OK wieder was dazu gelernt

Sub marine() 
 With ThisWorkbook.Worksheets("Tabelle1")
   For lListBox = 0 To ListBox1.ListCount - 1
     If ListBox1.Selected(lListBox) Then
      lZeile = lZeile + 1
      .Range("C" & lZeile).Value = ListBox1.List(lListBox, 0)
     End If
   Next lListBox
  End With
End Sub

Sollte dir die Werte in C1:C3 schreiben hier kannst du es dann auslesen.

Bogeyman10

Beitragsersteller

24.08.2021, 18:27

Als Formularsteuerelement hat es funktioniert :)

Bogeyman10

Beitragsersteller

24.08.2021, 18:28

Es ist sehr nett von dir, dass du mir geholfen hast. Vielen Dank :)

augsburgchris

24.08.2021, 18:29

Und der zuletzt geschrieben Code funktioniert mit dem Active X

Ähnliche Beiträge

Wie füge ich Komma-Aufzählungen in Excel ein?

Ich möchte eine Aufzählung, beispielsweise wie diese hier:
"J164417, J125227, J113057, J101524, J124508, J141156, J222822, J104253, J144153, ..." (nur halt um einige hunderte Einträge länger)

in mein Excel 2019 einfügen. Zum Sortieren allerdings müsste ich jeden Eintrag allerdings in einer einzelnen Zelle haben. Wie stelle ich das automatisiert an, ohne jeden String einzeln auzuschneiden und einzufügen?

Vielen Dank fürs Lesen, vllt. hat ja einer Ahnung. :)

Nach bestimmten Zeichen suchen in Zellen mit anderen Zeichen?

Hallo, ich habe folgendes Problem: ich habe in einer Spalte mehrere Einträge wie z.B. "1", "1,2", "1,2,5", "1,2,3,4" (ohne Anführungszeichen natürlich), d.h. also teilweise mehrere Nummern, die durch ein Komma getrennt sind. Manchmal stehen aber auch nur einzelne Nummer in den Zellen. Ich möchte gerne zählen, wie oft die "1" vorkommt, also in Zellen, wo die 1 mit anderen Ziffern vorkommt, als auch in den Zellen, wo sie alleine steht. Daher schließt das die Funktion "ZÄHLENWENN" aus, da dort die Zellen nicht gezählt werden würden, wo noch andere Zahlen drin sind. (Ich hatte versucht ZÄHLENWENN und dann "1" als Suchkriterium einzugeben, aber das funktioniert leider auch nicht). Meine versuche irgendwas mit der Funktion LÄNGE hat leider auch nicht viel gebracht, da ich wie gesagt eine Spalte mit einigen Werten habe und nicht nur eine Zeile... Hat irgendwer eine Idee, wie ich das Problem lösen kann?

Viele Grüße

Excel Anzahl eindeutiger einträge die bestimtmen Text enthalten?

Wie kann ich in Excel per Funktion die Anzahl eindeutiger Werte erhalten, welche einen bestimmten Text enthälten?
Hier zB. die Anzahl eindeutiger der Zellen, welche "ein" enthalten. Gesucht ist also die Zahl 3.

Wie kann ich in einer Excel-Tabelle entsprechend einer Auswahl nur bestimmte Einträge anzeigen lassen?

Moin,

ich habe folgende Tabelle als Beispiel:

Ganz links ist die eigentliche Tabelle, die verschiedene Veranstaltungen enthält. Als Beispiel mal Veranstaltung 1 bis Veranstaltung 10.

Die Tabelle in der Mitte soll als Hilfstabelle dienen, falls man diese überhaupt braucht. Die würde ich dann noch auf einem anderen Tabellenblatt einfügen, aber da ist mir bewusst, dass man dann Tabellenblatt! vor die Formel schreiben muss.

Bei Kategorie 1 stehen Veranstaltung 1, 2, 5 und 6, wie man sehen kann. Wenn ganz rechts über die Auswahlbox „Kategorie 1“ ausgewählt wird, dann sollen ganz links in der Tabelle nur Veranstaltung 1, 2, 5 und 6 angezeigt werden. Wählt man Kategorie 2 aus, sollen nur Veranstaltung 3, 4 und 9 angezeigt werden usw.

Notfalls würde ich es auch ohne die Auswahlbox machen, falls sich das darüber nur schwer umsetzen lässt, und Kategorie 1, 2 oder 3 einfach händisch eintippen, auch wenn es umständlicher wäre.

Man könnte ja für jeden einzelnen Eintrag in der eigentlichen Tabelle eine WENN-Funktion anlegen, dass wenn der Wert in der Auswahlbox übereinstimmt, die entsprechende Veranstaltung angezeigt wird, aber wäre natürlich sehr umständlich, immer eine WENN-Funktion anlegen zu müssen bei einer Vielzahl an Einträgen. Geht ja sicher auch anders, bloß komplizierter - für mich zumindest ^^

Vielen Dank im Voraus!

Excel VBA - Tabellenblatt kopieren, in Folgemonat umbenennen und Wert aus momentanem Monat übertragen. Kann mir jmd. helfen?

Hallo,

Ich hab so gut wie keine Ahnung von Excel-VBAs, aber den Auftrag bekommen ein Tool zu erstellen, welches ein Vorlagen-Tabellenblatt kopiert, die Kopie dann in den nächsten Monat (Monatsnamen-Abkürzung + Jahr) umbenennt und zu Letzt einen Wert aus dem vergangenen Monat in den neuen überträgt.

Für jeden Monat soll es also ein Tabellenblatt geben.

Ich hab festgestellt, dass man mit dem Aufnahme-Tool da nicht sehr weit kommt.

Die Vorlage kopieren und umbenennen funktioniert auch schon fast, allerdings stimmt das Format noch nicht.

Ich habe keine Ahnung, welchen VBA-Befehl es benötigt um das vorherige Tabellenblatt auszuwählen, damit der Wert dann kopiert werden kann.

Vielen Dank jetzt schon einmal.

JavaScript: Wie lässt man ein Element ausblenden und ein anderes einblenden?

Hallo zusammen!

Ich möchte gerne zwei HTML-Buttons mit JavaScript ausblenden sobald auf einer der beiden Buttons geklickt wird. Nachdem die Buttons verschwunden sind sollte ein anderes Element eingeblendet werden. Dieses Element ist schon ausgeblendet, da es dynamisch mit document.write erstellt wird und dass im Moment noch nicht passiert.

Hat jemand einen Pseudocode?

Wie kann ich in Excel viele Zellen einer Spalte miteinander verketten/ Gibt es die Möglichkeit bestimmte Bereiche automatisch zu einer Zelle zusammenzufügen?

Hallo, ich habe eine extrem lange Liste bestehen aus zwei Spalten. In Spalte A sind Zahlen und in Spalte B sind Wörter.

Frage 1: Wie kann ich bestimmte Bereiche in eine Zelle zusammenfügen; am besten durch Komma getrennt. Was ich bislang gefunden habe erscheint mir etwas kompliziert: VERKETTEN(MTRANS(B1:B67)) Dann kommt da sowas raus: {"Nähe"."Nu"."Uni"."Hahn"."Neue"."Huhn"."On"."Yen"."Nahe"."Hohn"."Ion"."Henne".} Hier mache ich nun mit Ersetzen die Anführungszeichen und die Klammern weg und aus dem Punkt ein Komma mit Leerzeile. Geht das nicht irgendwie noch leichter?

Frage 2: Könnte man auch gleich befehlen, dass alle Wörter, denen in Spalte A die gleiche Zahl zugeordnet ist, in einer Zelle zusammengefasst werden?

So sieht das ganze etwa aus:

A B

1 Eid

1 Hoheit

1 Hit

1 Heute

2 Huhn

2 Henne

3 Mühe

3 Oma

3 Heim

usw. Die Liste hat an die 270.000 Einträge (Zeilen). Die Zahlen in Spalte A gehen bis 99999. Daher sollte so viel wie möglich automatisch laufen. Denn fast einhunderttausend Einträge (so wie ich es bislang von Hand mache) zu ändern ist der Horror ... Ein Freund sagte mir, ich brauche wahrscheinlich ein Makro. Allerdings habe ich überhaupt keine Ahnung wie ich das verwende. Daher bitte ich um eine ausführliche Erklärung und hoffe, dass ich nicht zu viel verlange...

Vielen vielen lieben Dank schonmal. Ich hoffe und freue mich auf Antworten

Wer kann diese Textaufgabe beantworten?

Er stellte fest, dass der Stein das radioaktive Element Radium enthält, ein Erdalkalimetall, das in verschiedenen Isotopen vorkommt. Weiterhin fand er heraus, dass sich in diesem Stein 25000 Atome des Isotops Radium224 und 14000 Atome des Isotops Radium223 befinden. Nach kurzer Recherche wusste er die jeweiligen Halbwertszeiten, Radium224 hat eine HWZ von 3,7 Tagen und Radium223 eine HWZ von 11,4 Tagen.

Wie viele der anfangs vorhandenen Ra224-Atome sind nach 11 Tagen noch da? xxxx (auf ganze Atome runden)

Wie lange dauert es bis 99% der anfänglichen Ra224-Atome zerfallen sind? xx,x (auf eine Stelle nach dem Komma runden)

Wie lange dauert es bis in dem Stein gleich viele Ra224- und Ra223.Atome vorhanden sind? x,xx (auf zwei Stellen nach dem Komma runden)

Microsoft Excel | Diabook. > Neue Überarbeitung/Hilfe (VBA)?

Guten Abend zusammen.

Bevor ich zum offiziellen Thema komme nochmals ein Vorwort auf der Grundlage eines Beitrages der sinnfrei gelöscht wurde.

Vorwort:

Die Frage dient nicht dafür um hier etwas zu verkaufen sondern dazu um mir im Bereich Office/Excel weiterzuhelfen. Das Diabolic Projekt ist ein Privates und von mir als Besitzer und Eigentümer erstelltes Projekt. Ebenfalls habe ich die AGB von gutefrage.net zur Kenntnis genommen und stimme diesen hiermit Schriftlich zu.

Der letzte Beitrag wurde wegen verdacht auf Verkauf entfernt obwohl ich das HIER und im anderen Beitrag deutlich erwähnt habe. Ich möchte hier nichts Verkaufen.

| Um was handelt es sich nun?

Ich bin selber Diabetiker Typ 1 und wollte ein erstmaliges Projekt erstellen um mein Diabetes auch am Computer (in Excel) Managen zu können. Dazu habe ich in der Vergangenheit auch schon paar Fragen gestellt.

Nun habe ich eine Zeit lang darüber Nachgedacht und bin zum Entschluss gekommen alles "Einheitlich" statt einzeln zu machen. Diabook, Insulinrechner, Nährwertrechner waren noch bis vor ein paar Tagen einzelne Programme in Microsoft Excel Dokument Mappen. Ich habe überlegt und mir viel dann etwas auf. Aufgrund dessen dass ich die Dinge mache um das Leben mit Diabetes einfacher zu machen dachte ich mir: Okay. Dann werde ich doch alles in einer Mappe verarbeiten da die Einzelnen Mappen immer aufwendig sind.

Ich Persönlich verwende schon lange Zeit eine App die vieles miteinander vereint. So soll es auch mit dem was ich vor habe werden.

| Weiteres:

Ich möchte das alles im Prinzip erneuern. Ich habe leider nur wenig bis minimale Kenntnisse im Bereich "Microsoft Excel" und habe schon paar Ideen die ich nur zum Teil umsetzen kann weil mir dafür das Wissen & Erfahrung fehlt und ich deshalb diesen Beitrag erstelle um danach zu Fragen.

| Vorstellung & Idee/n:

Meine Ideen und Vorstellungen in diesem Projekt sind naja irgendwie zu Groß weshalb ich bezweifle das es möglich sein wird alles in Excel umsetzten zu können.

Ich habe mich schon bei YouTube umgesehen und kam leider zu keinem Video das mir dass zeigen würde was ich so bräuchte. Ich hätte aber gerne Folgendes:

Startseite: Erweiterungen um in der linken Leiste alles ein und zuklappen zu können. Dies ebenfalls beim Nährwertrechner mit mehreren Mappen um dort verschiedene Kategorien für Lebensmittel anzulegen. Auch beim nachkommenden Rezeptrechner um dort ebenfalls Kategorien anlegen zu können.
Favoriten: Wichtig beim Nährwert/Rezeptrechner um Lebensmittel oder Rezepte schneller zu finden.
Mappen in Mappen: Ich hätte außerdem gerne die Funktion das ich zb. in der Mappe Nährwertrechner weitere Mappen erstellen kann un das überall.
Nährwertrechner(Suche): Ich hätte außerdem gerne das man oben eine Leiste hat um alle Lebensmittel und Rezepte zu finden. Diese sollen dann in einer Liste dort oder dann im Nährwertrechner angezeigt werden. Auch ins Tagebuch übertragbar sein.

Es ist zu viel. Bräuchte man dafür VBA oder geht das ohne? Danke im Voraus! :)

Wie überprüfe ich mit JS oder PHP welche HTML Checkbox in einem Form ausgewählt wurde, bevor es abgesendet wurde?

Wie in der Langen Frage geschrieben, ich suche Code der es mir ermöglicht über Java Skript oder PHP auszuwerten welche Checkbox geklickt wurde.

<label for="frei" align="center"><strong> Abteilung FF </strong></label><br>

<label for="workS" align="center"><strong> Abteilung W </strong></label><br>

<label for="MO" align="center"><strong> Abteilung O </strong></label><br>

Im allgemeinen Nutze ich bereits die Funktion in JS damit der User nur ein Element auswählen kann. Doch nun bräuchte ich eine Direkte Ausgabe je nachdem welches Element ausgewählt wurde. D.h. Ich suche eine Möglichkeit auszuwerten welches angeklickt wurde und dann möchte ich etwas ausführen über if, eles if, else.

Falls es helfen sollte hier habe ich die Begrenzung Methode für das anklicken.

//Dieser Code überprüft ob drei Elemente ausgewählt wurden. Wenn dies der fall ist dann werden alle weiteren Element Blockiert.

const groups = [...document.getElementsByClassName("radio-multichoice")].reduce((result, element) => {

result[element.name] = result[element.name] || [];

result[element.name].push(element);

return result;

}, {});

for (const [name, elements] of Object.entries(groups)) {

const limit = name.split(":")[name.split(":").length-1];

for(const el of elements) {

el.addEventListener("change", e => {

if (elements.filter(x => x.checked).length > limit) {

e.target.checked = false;

}

});

}

Könnte mir dabei jemand Helfen, falls ihr nachfragen habt weil ich es mal wieder nicht richtig erklären konnte stellt bitte eine Nachfrage.

VBA Excel mit Eingabemaske anderes Excel Blatt bearbeiten?

Hallo, folgendes Problem: Habe eine Eingabemaske erstellt, die mir Zeilen ausgibst mit einem Suchfeld. Diese kann man dann ändern, löschen etc. und diese werden für ein Programm gebraucht. So, das Programm nimmt aber nur einbe Excel Liste mit anderem Format und nun muss ich mittels der Eingabemaske die andere Datei öffnen und dann soll die Maske über diese Datei arbeiten. Die Tabelle ist vom Aufbau her genau identisch. muss also nur den Befehl haben um das öffnen, bearbeiten, speichern und schließen. Also die andere Datei dann. Füge anbei mal den Code von dem Button 'Suchen' hinzu:

    Private Sub CommandButton2_Click()
    Workbooks.Open "C:\Users\SchuehlJ\Desktop\Excel\DB_Versand102x76.xls"
      Dim suchen As Excel.Range

  With Tabelle1
     
    Set suchen = .Range(.Cells(2, "A"), .Cells(.Rows.Count, "A").End(xlUp))
     
    Set suchen = suchen.Find(TextBox1.Text, LookIn:=xlValues, LookAt:=xlWhole)
     
    If Not suchen Is Nothing Then

      TextBox2.Text = .Cells(suchen.Row, "B").Value
      TextBox3.Text = .Cells(suchen.Row, "C").Value
      TextBox4.Text = .Cells(suchen.Row, "D").Value
      TextBox5.Text = .Cells(suchen.Row, "E").Value
      ListBox1.AddItem .Cells(suchen.Row, "A").Value
      
      

    Else
    
          Call MsgBox("PN Nummer: " & "'" & TextBox1.Text & "' wurde nicht gefunden.")
          ListBox1.Clear
          TextBox1.Text = ""
          
        End If
    End With
    End Sub

Hoffe ihr könnt mir helfen,

LG Julian

Automatisches Datum bei Open Office nicht deaktivierbar?

Hallo,

in jedem Ratgeber dazu steht

- Rechtsklick auf Zelle / Zellen -> Zellen formatieren -> etwas anderes als "Datum" wählen, zB "Währung"

oder wahlweise

Extras -> Einstellungen -> Open Office Writer -> Tabelle -> Datum

Jetzt ist egal, was ich bei Option 1 wähle, es kommen immer kryptische Zahlen raus wenn ich zB. 1.1070 (es geht hier um EurUsd Kurse) eintippe.

Bei Option 2 habe ich zwar eine "Open Office"-Reiter, aber eben nicht "Open Office Writer" und bei mir ist nirgends! ein Punkt wo Tabelle steht.

Ich habe nur Writer und Calc installiert, den Rest abgewählt. Da Writer vorhanden ist, versteh ich nicht wie oder wo ich das ändern kann.Möchte nur eine 1.xxx (Punkt nicht Komma), jemand eine Ahnung was ich machen kann?

LibreOffice Calc, Datengültigkeit, weitere Werte erlauben als in Liste enthalten (Liste nur als Eingabehilfe)?

Moin,

ich habe eine bestehende Tabelle, die mit einer älteren LibreOffice Calc Version um 7.x erstellt wurde. Darin sind Zellen, die über Daten -> Gültigkeit -> Liste formatiert sind.

In der 7er Version von Calc konnten andere Werte, als jene in der Liste, in die Zellen eingegeben werden. Die Liste wurde da als Eingabeunterstützung genutzt, um häufig wiederkehrende Einträge bequem auswählen zu können, ohne auf diese beschränkt zu sein.

Seit dem Update auf die aktuelle Version 24.2.7.2 geht dies nicht mehr. Es werden nur noch die Elemente der Liste akzeptiert.

Ist es möglich, die vorige Funktionalität wieder zu bekommen?

Gruß, Ortogonn

Einstellungen der Datengültigkeit siehe Bilder

In Excel mit Visual Basic Zellen leeren

Hallo zusammen,

ich würde gerne über Visual Basic, wenn eine bestimmte if Bedingung erfüllt ist (bekomme ich hin), einen Zellbereich leeren (Formatirung soll erhalten bleiben, also nur Hintergrundfarbe und Inhalt löschen), z.B. 2B bis 6E. Kann mir jemand hierbei helfen? Ich weiß leider weder wie ich eine Aktion für einen Zellbereich ausführe (es werden mehrere Zellbereiche werden) noch weiß ich, wie ich über Visual Basic Zellen leeren kann.

Gruß