sikerült megoldanom, egy temp szöveg segítségével:
Private Sub ComboBox1_Change()
Dim temp As String
Dim i As Long
Dim j As Long

Application.EnableEvents = False

Dim myarr As Variant

‘selected = Me.ComboBox1.ListIndex
TextBox1 = ComboBox1.List(ComboBox1.ListIndex)

For i = 0 To ComboBox1.ListCount – 1
temp = temp & „;” & ComboBox1.List(i)
Next
ReDim myarr(ComboBox1.ListCount – 1)
temp = TextBox1 & „;” & Replace(temp, TextBox1, „”)
temp = Replace(temp, „;;”, „;”)
myarr = Split(temp, „;”)

For j = 0 To 2 ‘UBound(myarr) ‘valamiért ubound-1-nél kilép
Me.ComboBox1.List(j) = myarr(j)
Next
ComboBox1 = „”
Application.EnableEvents = True

TextBox1.SetFocus
End Sub

Szia verax!
Igyekszem pontosabban leírni:
Ez egy könyvtári olvasók adatai kezelő űrlap felső sávja lenne, ami eltárolja az előző 5 ügyfél nevét /vagy azonosító számát.
Ez egy demo lenne a szoftver fejlesztője számára, hogy lássa, milyen fejlesztési javaslatot szeretnék kérni.

Működés:
A baloldali textboxba beírok egy nevet, ez a név jelenjen meg a legördülő comboboxban, mindig felül.(Ezért nincsek kezdő értéke sem a textboxnak, sem a combo box listának.)

Ha már szerepel a név a comboboxban, akkor először törölje azt az indexű elemet (ciklus nézni, hogy egyezik-e), majd nulladik elemnek adja hozzá.
Ez eddig működik. (Későbbi fejlesztés során további mezőkbe betölti majd az adott ügyfél többi adatai is. Képzeld hozzá 🙂

Amivel gondom van:
Lenne egy olyan funkció is (és pont ez lenne a lényeg az egészben), hogy a jobb oldali legördülőből választok (utolsó 5 ügyfél) kattintok a listaelemre, betölti a textboxba a kiválasztott nevet (és későbbi fejlesztés után az összes további mezőt), gyakorlatilag megspóroljuk kollégának, hogy újra megkérdezze a nevét annak, aki 5 perce valamit intézett nála.

Hibára fut, ha úgy szeretném törölni a combobox list selected elemét, hogy a combobox aktív.

A remove item gombot nézd meg.

Miért lenne jobb a listbox a combobox helyett?
Tudsz más megoldást az utolsó 5 ügyfél nevének elmentésére?

(Combobox.Remeveitem helyett:
Lehetne egy egy stringben tárolni, temp=”andrás,béla,Csaba,dezső”
Temp=textbox1&”,”&temp

Törölni a combobox lista tartalmát,
A tempet felbontani vessző mentén, és beleírni a combobox listába, amit előzőleg kiürítettem…)

De menni kéne a remove item kódnak is, csakhogy hibára fut.

a sorválasztást azért tettem bele, mert így nekem követhetőbb volt a tömbökkel való munka, egyébként valóban kihagyható

most már összeraktam és működik rendesen. köszönöm szépen.