Tabelle nachstellen im Userform
05.10.2022 20:57:10
Thomas
bin leider jetzt erst wieder zu diesem Thema
https://www.herber.de/forum/cgi-bin/callthread.pl?index=1900647
gekommen und habe unter anderem Dank einigen guten Hilfen hier im Forum nun das ganze mal soweit im Userform nachgestellt wie ich es mir ungefähr vorstelle und weitestgehend klappt es auch wie es soll.
Grundsätzlich würde ich mich über Anregungen freuen wie man das ganze besser machen könnte, sowohl im Code wie auch in der Userform.
Was mir im Userform (forMitarbeier) noch nicht richtig gefällt, ist das die Ausrichtung der Werte noch nicht so ganz richtig zu den Überschriften (Zahl und Wert) passt sowie das mir die Gitternetzlinien etwas fehlen.
Ansonsten hab ich noch leider irgendwo einen Fehler drin, wenn man im Userform "forMitarbeiter" auf die Listbox "libStammdaten" doppeltklickt wird die Userform "forMaDetails" aufgerufen und mit dem Namen und Ort gefüllt nur ist der Name und der Ort nicht immer korrekt, der müsste/sollte mit den Daten gefüllt sein die auch in der Listbox aufgerufen ist, aber das klappt nicht immer, z.b. bei der Auswahl auf dem Bild im Anhang nicht. Wenn ich mir das im Range Objekt rngFind.Row ansehe, wird meiner Meinung nach die richtige Zeile und auch dann die richtige Spalte ausgewählt nur die Werte sind andere, mir fehlt da die idee wieso....
Option Explicit
'In diesem Modul werden dieDetails zu dem Userform MorMaDetails geladen.
Sub MaDetails()
forMaDetails.lblName = rngFind.Cells(rngFind.Row, 3) & " " & rngFind.Cells(rngFind.Row, 4)
forMaDetails.lblOrt = rngFind.Cells(rngFind.Row, 5)
forMaDetails.Show
End Sub
Danke
https://www.herber.de/bbs/user/155523.xlsm