Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

UserForm Liste

Forumthread: UserForm Liste

UserForm Liste
16.02.2007 16:33:17
Gregor
Hallo
Ich habe eine Tabelle, aus der ich in eine UserForm Liste die Einträge wie folgt übernheme:

Private Sub UserForm_Initialize()
Application.ScreenUpdating = False
Application.EnableEvents = False
Me.lblTitel = "Erklärung des Codes " & Code
lstCode.RowSource = "Code!B" & Zeile & ":E" & Zeile
lstCode.ListIndex = -1
End Sub


Private Sub cmdAbbrechenCode_Click()
Unload Me
Sheets("Master Datei").Activate
End Sub


Private Sub UserForm_Activate()
usrCode.lstCode.ColumnHeads = True
End Sub

In der 1. Zeile der UserForm Liste sollte es die Spaltenüberschriften B1 bis E1 der Tabelle übernehmen. Mit obigem Ansatz übernimmt es mir immer die Zeile oberhalb der gefundenen Zeile.
Wie kann ich das lösen?
Vielen Dank
Gregor
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: UserForm Liste
16.02.2007 16:43:59
Jan
Hi,
woher bekommt die Variable Zeile ihren Wert?
mfg Jan
AW: UserForm Liste
16.02.2007 16:54:07
Gregor
Hallo Jan
Von

Sub Code_Erklärung()
Application.ScreenUpdating = False
Application.EnableEvents = False
Worksheets("Master Datei").Select
Zeile = ActiveCell.Row
Spalte = ActiveCell.Column
Code = Cells(Zeile, Spalte + 1).Value
If Code = "" Then
MsgBox Prompt:="Es sind keine Erläuterungen hinterlegt.", _
Title:="  Erläuterungen FV"
Worksheets("Master Datei").Activate
End If
Application.ScreenUpdating = True
Application.EnableEvents = True
End Sub

Gregor
Anzeige
AW: UserForm Liste
16.02.2007 17:59:20
Jan
Hi,
Deklariere Zeile in einem Standardmodul
als Long
Public Zeile As Long
mfg Jan
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige