Thema Datum  Von Nutzer Rating
Antwort
21.08.2013 12:59:30 Andy
NotSolved
Blau Listbox mit Mehrfachauswahl - Werte auslesen
21.08.2013 14:35:11 Gast67258
NotSolved
21.08.2013 22:25:32 Andy L.
NotSolved
22.08.2013 02:50:26 Gast71120
NotSolved
22.08.2013 07:38:05 Gast76278
Solved

Ansicht des Beitrags:
Von:
Gast67258
Datum:
21.08.2013 14:35:11
Views:
1088
Rating: Antwort:
  Ja
Thema:
Listbox mit Mehrfachauswahl - Werte auslesen
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Dim v() As Variant
Dim i As Long
Dim j As Long
 
With ListBox1
  If .ListCount > 0 Then
     
    ReDim v(1 To .ListCount, 1 To 1)
     
    For i = 0 To .ListCount - 1
      If .Selected(i) Then
        j = j + 1
        v(j, 1) = .List(i)
      End If
    Next
     
    If j > 0 Then
      Worksheets(2).Range("C1").Resize(j, 1).Value = v
    End If
     
  End If
End With

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
21.08.2013 12:59:30 Andy
NotSolved
Blau Listbox mit Mehrfachauswahl - Werte auslesen
21.08.2013 14:35:11 Gast67258
NotSolved
21.08.2013 22:25:32 Andy L.
NotSolved
22.08.2013 02:50:26 Gast71120
NotSolved
22.08.2013 07:38:05 Gast76278
Solved