Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1976to1980
1976to1980
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Version von ListView Control feststellen

Forumthread: Version von ListView Control feststellen

Version von ListView Control feststellen
15.05.2024 16:09:59
chagbox
Hallo zusammen

Gibt es eine Möglichkeit herauszufinden, ob ein in einem Userform eingebundenes ListView Control Element Version 5.0 oder 6.0 ist? Danke und Gruss, Henner
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Version von ListView Control feststellen
15.05.2024 18:35:38
{Boris}
Hi,

was ist denn der Hintergrund Deiner Frage?
Hat 6.0 zusätzliche Eigenschaften / Methoden?

VG, Boris
AW: Version von ListView Control feststellen
15.05.2024 18:39:23
{Boris}
Hi,

ich hab mal ChatGPT bemüht. Die Antwort habe ich nicht getestet - aber vielleicht passt es ja oder hilft Dir zumindest, eine Lösung zu finden.

Um festzustellen, ob ein ListView-Control in einem UserForm in Excel VBA die Version 5.0 oder 6.0 ist, können Sie die Version-Eigenschaft des Controls verwenden. Leider gibt es keine direkte Version-Eigenschaft für das ListView-Control, aber Sie können dies über die ProgID-Eigenschaft feststellen.

Hier ist ein Beispiel, wie Sie dies tun können: 

Sub CheckListViewVersion()

    Dim lv As Object

    Dim lvProgID As String

    

    ' Annahme: Das ListView-Control heißt "ListView1"

    Set lv = UserForm1.ListView1

    lvProgID = lv.ProgID

    

    If lvProgID = "MSComctlLib.ListViewCtrl.2" Then

        MsgBox "ListView Version: 6.0"

    ElseIf lvProgID = "MSComctlLib.ListViewCtrl.1" Then

        MsgBox "ListView Version: 5.0"

    Else

        MsgBox "Unbekannte ListView Version"

    End If

End Sub


VG, Boris
Anzeige
AW: Version von ListView Control feststellen
16.05.2024 11:55:30
chagbox
Hallo Boris

Danke für Deine Antwort. ChatGPT ist bei uns in der Firma global gesperrt ;-)
Habe es mal versucht mit Deinem Code. Laufzeitfehler bei lvProgID = lv.progID: Objekt unterstützt Eigenschaft nicht.

Zum Hintergrund: Ich habe grosse Probleme mit einem VBA Projekt und bin verzweifelt auf der Fehlersuche. Beim Ausführen eines Makros (Öffnet am Ende eine UserForm) wird die Ausführung unterbrochen mit Meldung "Automatisierungsfehler". Nach Klick auf OK schliesst und öffnet sich Excel nach 3-4 Sekunden wieder mit Dateinamenerweiterung "(version 1)" und Dateiendung .xlsb anstelle von .xlsm. sowie dem Hinweis "(Wiederhergestellt)". Ab da funktioniert alles tadellos in der wiederhergestellten Datei. Der Fehler tritt allerdings nur auf unserem firmeninternen Netzlaufwerk auf, kopiere ich die Datei auf ein mit SharePoint synchronisiertes Laufwerk gibt es keine Probleme. Auf dem Netzlaufwerk habe ich jedoch einige andere VBA Tools problemlos laufen. Error Handler ist integriert, wird aber ignoriert. Kommentiere ich testweise Zeilen aus, tritt der Fehler mal bei dieser und mal bei jener Zeile auf. In der UF gibt es keine activte oder initialization Routine. Nach dem Anlegen einer Kopie kam auch mal die Meldung, die Datei sei schwer beschädigt und könne nicht mehr repariert werden. Auf dem SharePoint Laufwerk funktioniert sie aber. Ich werde das Gefühl nicht los, dass es irgendein Problem mit einem Verweis - oder eben einem Element gibt. Eventuell weil ich die Datei auf dem SharePoint erstellt und dann auf das Laufwerk kopiert habe. Aktuell habe ich die ListView auf dem Prüfstand, weil es da 2 verschiedene Versionen gibt. Nun wollte ich mal "auslesen" welche LV Version ich bei den bestehenden Tools benutzt habe.

Vielleicht hat ja noch jemand eine Idee. Danke und Gruss, Henner

Anzeige
AW: Version von ListView Control feststellen
16.05.2024 12:45:50
{Boris}
Hi,

da bin ich am Ende überfragt. Eventuell ist irgendein Verweis gebrochen.
Ich lass die Frage offen.

VG, Boris
AW: Version von ListView Control feststellen
16.05.2024 13:38:36
schauan
Hallöchen,

Die ProgID gibt es z.B. bei den AddIns - siehe z.B. Application.COMAddIns(1).ProgID

Das Listview ist aus der bzw. einer mscomct*.ocx Aus welcher Version es stammt, kann ich auch nicht sagen, aber man kann schauen, welche mscomct* bei der verwendeten Excelversion aktiviert ist - im Prinzip so: 

Sub MSComRef()

Dim refVar As VBIDE.Reference

For Each refVar In ThisWorkbook.VBProject.References

  If InStr(UCase(refVar.Name), "MSCOM") Then MsgBox refVar.Description

Next

End Sub


Siehe dazu z.B. auch https://excelatfinance.com/xlf20/xlf-vba-references.php

Ich kenne solche bzw. ähnliche Probleme, auch mit der Zuweisung diverser Objektvariablen, von der Verwendung verschiedener Excelversionen. Schaue mal, ob das bei Dir zutrifft.

Eine Möglichkeit wäre die Programmierung in der niedrigsten Version. Es darf aber keiner die Datei mal in einer höheren Version abspeichern - auch ein Grund, Programm und Daten zu trennen ;-)

Eine anderer Ansatz wäre Late Binding - aber z.B. nicht gerade für Objekte auf einem Userform.

Eventuell spielt bei da auch das Thema Office 32/64 usw. in Zusammenhang mit den mscomct*.ocx mit rein.
Anzeige
;

Forumthreads zu verwandten Themen

ListView und Late Binding
Alfons

Hallo,
ich habe eine UserForm mit einem ListView.
Den Verweis: Microsoft Windows Common Controls 6.0 (SP6)
habe ich wg 'Late Binding' rausgenommen.
Jetzt kommt an einer Stelle noch die Fehlermeldung: 'Benutzerdefinierter Typ nicht definiert'
markiert ist die ganze Zeile mit...
01.02.2009 15:26:00
Thread-ID: 1045920
5 Beiträge
Anzeige
ListView Frage
walli

Guten Abend,
habe gestern eine Menge Unterstützung von Tino erhalten.
Dieses Makro funktioniert einwandfrei, ich möchte dies gern
noch mit ENTER funktion erstellen, bekomme es nicht hin.
Private Sub ListView1_DblClick() Sheets(CStr(Me.ListView1.SelectedItem)).Select End Sub
01.03.2009 18:22:17
Thread-ID: 1055282
9 Beiträge
@Tino, Frage zu Listview
wonne69

Hallo Tino, hallo Forum.
Habe da folgendes Problem. Lade über UBound in eine ListView Daten aus Tabellenblatt, klappt auch Prima,
nur nicht bei allen Tabellen :-(
Der Code ist bei allen der selbe, ich passe nur den UBound Befehl an, woran kann das liegen?
Hier mal ein Beispiel...
01.04.2009 09:32:22
Thread-ID: 1065829
12 Beiträge
Anzeige
ListView Feld springt immer in die Ecke des Frames
k

Hallo,
...habe in einer Userform ein Frame und darin ein Listview-Feld. In der deaktiven Phase ist es ziemlich mittig im Frame und wenn ich es starte - läuft zwar der Inhalt perfekt, aber das Listview-Element hängt sich in die obere linke Ecke des Frames !
Warum und wie kann ich es verh...
12.08.2009 18:38:14
Thread-ID: 1095398
6 Beiträge
Listview nichts markiert ... Code sagt ja
k

Hallo,
kurze Frage...wollte, das VBA erkennt, wenn kein Eintrag der Listview gewählt wurde - sondern nur die Textboxen ausgefüllt wurden - dass es dann diseen Datensatz "Neu" anlegt und nicht einen vorhandenen Datensatz ändert.
Daher dachte ich: Nutze die SendMessege-Methode der Listbox...
13.08.2009 12:09:11
Thread-ID: 1095544
5 Beiträge
Listview - Summe bei Mehrfachmarkierung
k

Hallo,
ich wollte in einer Listview mehrere Datensätze auswählen (Markieren) und dann die Summe der jeweiligen Umsätze anzeigen lassen. Aber irgendwas habe ich da noch nicht richtig verstanden...
In meinen Büchern habe ich da auch nicht viel gefunden - Listview ist irgendwie nicht groß...
13.08.2009 11:49:08
Thread-ID: 1095551
3 Beiträge
Listview Sortieren, mal geh'ts mal nicht ?
k

Hallo
Habe 2 Userformen. Habe in der 1ersten ein Listview-Feld eingesetzt und alles klappt hervorragend.
Hier der Code:
'##########################################################
' Listview-Projekte - Click Anpassung der Anzeige '
'#################################...
17.08.2009 17:38:58
Thread-ID: 1096536
4 Beiträge
Listview - Anzeige aus 2 oder mehr Tabellen
k

Hallo,
...habe ein Listview-Element und möchte gern foglendes realisieren, wo ich seit stunden nicht richtig weiterkomme:
Die Listview soll 3 Spaltenanzeigen:
Spalte 1 = Angebote
Spalte 2 = Gesuche
Spalte 3 = Status
Nun,
die Angebote sind in Tabelle1 (Spalte N)
...
25.08.2009 09:41:04
Thread-ID: 1098163
2 Beiträge
ListView - Spaltenbreite-Ändern-Event
zahnonen

Hi, kennt jemand den Weg, ggf. über API das Ändern der Spaltenbreite durch den User in einem Listview abzufangen?
In VB6/Studio/Net ist es möglich - aber in VBA funktioniert der Verweis auf die nötige Klasse wohl nicht.
Gruß
04.09.2009 17:21:01
Thread-ID: 1100602
5 Beiträge
Anzeige
Listview - Gridlines Farbe ändern
KLE

Hallo,
...habe auf einer Userform eine Listview gepackt, zur Darstellung aller erfassten Belege.
Habe auch die "Gridlines" auf True gesetzt. Diese sind aber nur schwer zu erkennen...
Kann man die Farbe (z.B. Dunkelblau/Grau) selbst irdendwie zuweisen ?
Hintergrundfarbe auf Dunk...
07.05.2010 18:52:35
Thread-ID: 1156069
3 Beiträge
Nachfrage zur Lösung - Listview Format
kle

Hallo,
..ich danke noch einmal an dieser Stelle Sepp, der mir letzte Nacht sehr gut geholfen hat.
Jetzt hat sich das ganze noch weiterentwickelt und schon kommt die nächste Herausforderung,
welche aber sich auf diesen Thread bezieht.
https://www.herber.de/forum/messages/1157539...
19.05.2010 20:29:28
Thread-ID: 1157741
2 Beiträge
Listview im Tabellenblatt - verschiebt die Ansicht
KLE

Hi,
ich habe in einer Tabelle (Arbeitsblatt) ein Listview-Element eingefügt, in der alle Kontakte aufgeführt werden, aus einer Suche in einem Kundenstamm-Datenblatt. Klappt alles super - nur:
Das Listview-Element liegt beginnend auf der Zelle BA9. Also ziemlich weit Rechts vom Bildschir...
26.10.2010 00:23:29
Thread-ID: 1183874
2 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige