Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
ListView_Typen unverträglich |
17.11.2019 09:29:20 |
Sebastian |
|
|
|
17.11.2019 10:35:37 |
Graf_Desaster |
|
|
|
17.11.2019 10:51:17 |
Sebastian |
|
|
|
17.11.2019 15:17:38 |
Gast13738 |
|
|
|
17.11.2019 15:21:28 |
Sebastian |
|
|
|
17.11.2019 15:40:10 |
Gast92881 |
|
|
|
17.11.2019 16:12:22 |
Gast22798 |
|
|
|
17.11.2019 16:13:09 |
Sebastian |
|
|
|
18.11.2019 12:41:08 |
Gast59364 |
|
|
Von:
Sebastian |
Datum:
17.11.2019 09:29:20 |
Views:
1236 |
Rating:
|
Antwort:
|
Thema:
ListView_Typen unverträglich |
Guten Morgen zusammen,
leider habe ich meinen gestrigen Abend dafür verschwendet, verzweifelt meine ListView mit Daten aus einer Tabelle zu füllen.
Dabei kommt es bei folgendem Code immer wieder zu dem Fehler "Typen unverträglich":
With Me.ListView1
.HideColumnHeaders = False
.View = lvwReport
End With
Dim wksh As Worksheet
Dim rngdata As Range
Dim ringcell As Range
Dim listitem As listitem
Dim rowcount As Long
Dim colcount As Long
Dim i As Long
Dim j As Long
Set wksh = Worksheets("Daten")
Set rngdata = wksh.Range("A1").CurrentRegion
For Each rngcell In rngdata.Rows(1).Cells
Me.ListView1.ColumnHeaders.Add Text:=rngcell.Value, Width:=50
Next rngcell
rowcount = rngdata.Rows.Count
colcount = rngdata.Columns.Count
For i = 2 To rowcount
Set listitem = Me.ListView1.ListItems.Add(Text:=rngdata(i, 1).Value)
For j = 2 To colcount
listitem.ListSubItems.Add Text:=rngdata(i, j).Value
Next j
Next i
ListView1.SortKey = 0
ListView1.Sorted = False
Bin für alle Hilfen dankbar!!!!
LG Sebastian
|
- 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
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- 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
|
ListView_Typen unverträglich |
17.11.2019 09:29:20 |
Sebastian |
|
|
|
17.11.2019 10:35:37 |
Graf_Desaster |
|
|
|
17.11.2019 10:51:17 |
Sebastian |
|
|
|
17.11.2019 15:17:38 |
Gast13738 |
|
|
|
17.11.2019 15:21:28 |
Sebastian |
|
|
|
17.11.2019 15:40:10 |
Gast92881 |
|
|
|
17.11.2019 16:12:22 |
Gast22798 |
|
|
|
17.11.2019 16:13:09 |
Sebastian |
|
|
|
18.11.2019 12:41:08 |
Gast59364 |
|
|