Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
696to700
696to700
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

maximale Anzahl der Einträge

Forumthread: maximale Anzahl der Einträge

maximale Anzahl der Einträge
21.11.2005 23:41:47
Tinu
Liebe VBA-Spezialisten
In einem Arbeitsblatt habe ich in einer Spalte, z.B. Spalte A, willkürliche Zahlen stehen. Per VBA füge ich nun weitere Zeilen mit Zahlen in Spalte A ein. Nun möchte ich, dass in Spalte B die Zahl aus Spalte A & "- (maximale Anzahl der Vorkommnisse dieser Zahl)" eingetragen wird. Wenn z.B. die Zahl 124 zum ersten mal in Spalte A erscheint, soll in Spalte B "124 - 1" eingetragen werden, erscheint sie zum 4. Mal in Spalte A, soll in Spalte B "124 - 4" stehen. Die Zahl in Spalte A wird über eine UserForm aus einer ComboBox eingetragen. Wie lautet der Code für den Eintrag in Spalte B?
Für Euere Hilfe wäre ich sehr dankbar.
Gruss
Tinu
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: maximale Anzahl der Einträge
22.11.2005 01:02:16
Matthias
Hi Tinu,

Sub test()
Dim zahl
zahl = Cells(Cells(Rows.Count, 1).End(xlUp).Row, 1)
Cells(1, 2) = "'" & zahl & " - " & WorksheetFunction.CountIf(Columns(1), zahl)
End Sub

Eine Zahl in eine ganze Spalte zu schreiben ist etwas schwierig, ich hab mal Zeile 1 genommen.
Das vorgestellte "'" ist nötig, weil sonst der Wert als Datum interpretiert werden kann.
Gruß Matthias
Anzeige
AW: maximale Anzahl der Einträge
22.11.2005 13:47:13
Tinu
Hallo Matthias
Besten Dank für Deine Hilfe! Ich hab den Code noch etwas verändert, damit der Eintrag nicht immer in Zeile 1, sondern direkt neben der zuletzt eingegebenen Zahl erscheint:

Sub test2()
Dim zahl
Dim iRow As Integer
iRow = Worksheets("Sheet1").Cells(65536, 1).End(xlUp).Row
zahl = Cells(iRow, 1)
Cells(iRow, 2) = "'" & zahl & " - " & WorksheetFunction.CountIf(Columns(1), zahl)
End Sub

Die entscheidende Idee war aber die "WorksheetFunction.Countif"!
nochmals vielen Dank
Gruss
Tinu
Anzeige
;

Forumthreads zu verwandten Themen

Excle wird nochmal geöffnet
Walter

Guten Tag Allerseits,
ich habe Excel 2002 und Excel 2007 drauf.
Wenn ich Excel 2002 geöffnet habe und ich über den Explorer noch eine
Excel-Datei öffnen will, wird wieder Excel 2002 NEU geöffnet,
WARUM ?
mfg walter mg
14.09.2008 12:17:43
Thread-ID: 1009577
11 Beiträge
Anzeige
excel-formel per vba mehrmals ausführen
stevi

und zwar habe ich folgendes problem: ein in einer zelle stehender text (z.b. "juhu") soll per excel-funktion CODE in seine ascii-werte kodiert werden. die funktion CODE kodiert aber jeweils nur das erste zeichen eines textes, daher möchte ich per vba irgendwie lösen, dass CODE auf jeden buchsta...
26.05.2002 12:44:34
Thread-ID: 123736
7 Beiträge
maximale Textlänge in Excelzellen
Holger Blüthmann

Gibt es eine Beschränkung für die Textlänge in Excelzellen und wenn ja, wieviele Zeichen sind erlaubt?Vielen Dank.Holger Blüthmann

27.05.2002 09:25:47
Thread-ID: 123851
3 Beiträge
Anzeige
Maximale Dateigröße
Rüdiger

Bei einer Dateigröße von 35 MB steigt der Rechner aus. Muss neu gestartet werden. Bei 34,9 keine Probleme. Dieses Problem ist nicht nur bei mir auf dem Rechner sondern bei allen 8.0´er Versionen.
04.06.2002 10:43:13
Thread-ID: 125679
2 Beiträge
Listbox Zeile nur einmal anwählbar
Harald

Hallo Excel Fans,ist es möglich in einer mehrspaltigen Listbox das der Wert in der Zeile nur einmal ausgewählt werden kan, auch bei mehrmaligen aufruf der Listbox.Vielen Dank für eure HilfeGruß Harald

18.06.2002 17:50:03
Thread-ID: 129629
3 Beiträge
Anzeige
Maximalwerte / Fakultät
reinhard

bin auf das Problem gestossen, dass ich Fakultät, genauso Potenzen nur bis zu einer gewissen Höhe berechnen kann. Bis 170! ist's o.k., ab 171! will er nicht mehr. Erklärt mir aber auch nicht, warum er streikt. Mindestens für mich nicht verständlich/kapierbar.
Kennt jemand Erklärung + evtl....
04.07.2002 17:31:21
Thread-ID: 133980
3 Beiträge
Excel-Doku wird zweimal geöffnet ?
Sönke

Hi Leute,
ich habe folgendes Problem:
ich öffne ein Excel-Dokument aus dem Explorer heraus und dann öffnet Excel diese Datei zweimal ?
Wenn Makros bei dem Dokument hinterlegt sind werden die auch zweimal ausgeführt.
Wer kann mir vielleicht sagen, wo und welche Einstellungen ich ände...
24.07.2002 16:12:01
Thread-ID: 140056
4 Beiträge
VBA: Maximalwert aus 2 Spalten
Manuela

Hallo,
bräuchte mal einen Tipp von Euch.. :-)
Ich bin auf der Suche nach der Möglichkeit per VBA einen Maximalwert aus zwei Spalten zu suchen.
Meine Tabelle sind ungefähr so aus: A B 2015 300 2010 205 2015 145 2016 5 2016 3 2011 590 2011 245 2014 294 Als Ergebnis hätte ich gerne d...
23.05.2016 13:18:07
Thread-ID: 1494852
6 Beiträge
Aus Liste maximal 20 auswählen und in neues Blatt
Hans

Hallo Forum,
ich habe in meiner Tabelle rund 47 Kontrollkästchen (ActiveX Steuerelemente) wovon ich gerne MAXIMAL 20 auswählen und den Text in ein neues Blatt (Rechnung) übernehmen möchte. (Das ganze hab ich mit "wenn-dann-sonst" versucht, bin aber kläglich gescheitert)
Neben den Namen...
05.12.2017 19:38:12
Thread-ID: 1595477
26 Beiträge
Maximalwerte mit 2 Filter
Peter

Guten Tag meine lieben Excel Freunde,
ich habe das Problem, dass ich 100 Zahlenwerte über die Funktion KGRÖSSTE() filtern möchte. Argumente sind die Matrix F:F und K=1 bis K=100 . Nun möchte ich aber auch, dass die Werte die ich filtere in der dazugehörigen Zeile in Matrix H:H nach dem Str...
01.03.2019 12:58:02
Thread-ID: 1678734
9 Beiträge
Anzeige
Mehrere CheckBoxes auf einmal löschen
Volker

Hallo,benötige Euere Hilfe.Habe in einem Excel-Sheet sehr viele CheckBoxes und möchte sie mit einem CommandButton alle auf ein mal auf Value = False setzen.
Bin leider noch zu keiner anderen Lösung gekommen, als alle CheckBoxen seperat zu clearen.z.B.
CheckBox1.Value = False
CheckBox2....
22.10.2002 16:46:49
Thread-ID: 172207
3 Beiträge
Maximale Größe der Prozedur überschritten
Christoph Möbus

Hallo zusammen,
ich habe eine Prozedur in VBA (Excel 2000) geschrieben,
bei der VBA mir jetzt meldet, dass die maximale
kompilierte Grösse von 64 kb überschritten wäre und sie
deswegen nicht kompiliert werden kann.
Der Hauptteil der Prozedur ist eine sehr lange If, ElseIf
...
23.01.2003 12:53:47
Thread-ID: 208049
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige