Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
196to200
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
196to200
196to200
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Daten in ComboBox editieren

Daten in ComboBox editieren
04.01.2003 13:36:47
Corry
Hallo,
vielleicht kann mir einer bei folgendem Problem helfen...
Mit Excel hab ich einen Dienstplan angefertigt, in den nat. der Name des Mitarbeiters rein soll, diese Namen sollen aus einer ComboBox in die Tabelle eingefügt werden. Ein neuer Name sollte in die Box eingetragen und ein vorhandener gelöscht werden können. Die Namen sollten dann auf einem anderen Tabellenblatt untereinander stehen und beim Aufruf der Box von dort eingelesen werden bzw. geschrieben und gelöscht werden.
Ich bitte daher um Eure fachkundige Hilfe... Vielen Dank schonmal im Voraus.
Corry.

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

Betreff
Datum
Anwender
Anzeige
Re: Daten in ComboBox editieren
04.01.2003 15:26:20
Philipp
Hallo Corry

Vielleicht Hilft das dir weiter...

Private Sub UserForm_Initialize()
Dim col As New Collection
Dim x As Integer
Dim irow As Integer
Dim ende As Variant
irow = 6
ende = Range("C10000").End(xlUp).Row
Mainpaper.CB2_Firma.AddItem "Alle Firmen"
On Error Resume Next
Do Until irow = ende + 1
col.Add Cells(irow, 3), Cells(irow, 3)
If Err = 0 Then
Mainpaper.CB2_Firma.AddItem Cells(irow, 3)
Else
Err.Clear
End If
irow = irow + 1
Loop


' Mainpaper = Namen meiner Userform
' CB2_Firma = Namen meiner Combobox

..musst du ein bisschen anpassen

Gruss Phill

Anzeige
Re: Daten in ComboBox editieren
04.01.2003 22:00:33
Corry
Hi Philipp,
vielen Dank für den Hinweis, er hat mir schon geholfen, nur das mit den neuen Namen und vorhandenen entfernen ist noch so eine Sache...

Gruss Corry.

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige