Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
824to828
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
824to828
824to828
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Fehler in Newsletter Exercise tipp0614

Fehler in Newsletter Exercise tipp_0614
09.12.2006 09:53:01
Ralf Zapper
Hallo Zusammen,
der Excel Newsletter Nr. 14 von Hans Herber hat mir sehr gut gefallen, nur erhält er einen Fehler: Wenn man zur Paarzuordnung geht, kann man ja die zu Verfügung stehenden Ergebnise in einem Vorschaufenster ansehen, wenn man auf den "kleinen Pfeil nach unten" klickt. Nur hier fehlt immer das letzte Ergebnis. Bei beispielsweise den 16 deutschen Bundesländern kommen nur 15 Haupstätte zu Vorauswahl. Die 16. Hauptstadt Leipzig (Thüringen) kann man auch nicht ohne Vorauswahl eingeben! Kommt immer eine Fehlermeldung! (Übrigens ist Erfurt und nicht Leipzig die Hauptstadt von Thüringen - Aber egal) Ich kann leider nicht gut VBA. Wer kann diesen VBA-Fehler beseitigen? Danke im Voraus.
Gruß Ralf

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Fehler in Newsletter Exercise tipp_0614
09.12.2006 10:13:35
Ralf Zapper
Hallo Zusammen!
Hier das File Tipp 0614:

Die Datei https://www.herber.de/bbs/user/38840.xls wurde aus Datenschutzgründen gelöscht

AW: Fehler in Newsletter Exercise tipp_0614
09.12.2006 12:25:02
Reinhard
Hi Ralf,
ich kam noch nicht ganz zu einer Lösung und muss jetzt weg.
https://www.herber.de/bbs/user/38846.xls
Als workaround, trage im Blatt "Paar" unten bei Anzahl eine 16 ein, vorher Daten--Gültigkeit entfernen.
"erfurt" habe ich korrigiert im Blatt "Lists". (Du kannst jetzt alle Blätter per Excel einblenden, dann siehst du den Aufbau.
Im Modul GetList() werden die Werte in Blatt "Paar" eingetragen, aber im Codeteil

Do Until IsEmpty(Cells(iRow, 1))
Cells(iRow, iCol).Value = wks1.Cells(iRow, iColS)
iRow = iRow + 1
Loop

wird nur solange was eingetragen wie in der Spalte "Anzahl" etwas steht, da da nur 1-15 steht, fehlt eins.
Ich fand noch nicht den Codeteil, der die Spalte "Anzahl" ausfüllt. Und warum da Daten--Gültigkeit ist verstehe ich bis jetzt noch nicht.
Gruß
Reinhard
Anzeige
AW: Fehler in Newsletter Exercise tipp_0614
09.12.2006 13:40:00
Ralf Zapper
Hallo Reinhard,
ich durchschaue das auch nicht.
Kann noch wer helfen?
Gruß Ralf
AW: Fehler in Newsletter Exercise tipp_0614
09.12.2006 21:09:29
Erich G.
Hallo Ralf,
zwei störende Dinge habe ich gefunden in der Mappe, die Reinhard hochgeladen hat:
In Lists!I65 steht Niederlande. Das muss weg, sonst gibt es ein leeres 10. Österr. Bundesland.
Im Code von wks3, Worksheet_Change muss in der Zeile zwischen "iRow = 2" und "Do Until ..."
(fängt mit "wks1.Range(wks1.Cells(2, iColS)," an)
hinten das "- 1" weg, dann bekommt RngAct den richtigen Bereich.
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort
AW: Fehler in Newsletter Exercise tipp_0614
09.12.2006 22:38:02
Ralf Zapper
Hallo Erich,
Du hast das Problem gefunden. Jetzt funktioniert das super. Damit kann man auch gut Vokabeln lernen.
Danke! Gruß Ralf
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige