Private Sub cmdSlet_Click() Dim i As Integer For i = ListBox1.ListCount - 1 To 0 Step -1 If ListBox1.Selected(i) Then ListBox1.RemoveItem i End If Next End Sub
Synes godt om
Slettet bruger
25. januar 2015 - 11:00#2
Hej Thor. Tak for respons!
Jeg får fejl ved "listbox1.removeitem i" Run-time error '-2147467259(80004005)': unspecfied error.
Med vba kan du slette de markerede i arket eller du kan sætte værdierne på fra din kode.
Jeg foreslår, at du lukker dette spørgsmål og opretter et nyt, hvor du forklarer, hvad du ønsker.
Synes godt om
Slettet bruger
26. januar 2015 - 12:55#10
Lukker. Point bliver delt da jeg ikke kan bruge måden.
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.