Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: combobox in sevdatagrid
Autor: WilliW
Datum: 23.06.13 16:27
Hallo Frank, danke, dass Du Dich der Sache annehmen möchtest!!! Ich werde versuchen das Problem besser darzustellen: Ich erhalte kein Wert zurück - ich suche nach der korrekten Methode. Hier die Code-Schnipsel: Private Sub Grid1_FillComboBox(ByVal nRow As Long, ByVal nCol As Long, oComboBox As sevDataGrid2.EditComboBox) With Grid1 If .Columns(nCol).Key = "adr_SEARCH" Then With oComboBox Set .Recordset = sDB.OpenRecordset("SELECT adr_SEARCH, adr_ID FROM qry_adr_Stamm") .ColVisible(2) = False .BoundColumn = 1 .DisplayColumn = 1 End With End If End With End Sub Private Sub Grid1_AfterCellEdit(nRow As Long, nCol As Long, ByVal sText As String) With Grid1 If nCol = .GetCol("adr_SEARCH") Then -> .Text(nRow, "adr_ID") = ????????????????????????????? End If End With End Sub Kurz: nach Änderung der Combobox sollte ich den Wert der adr-ID erhalten. Ich hoffe dies hilft Dir weiter. Danke vorab für Deine Bemühungen! Grüße, Steffen

combobox in sevdatagrid	1.972	WilliW	21.06.13 16:59
Re: combobox in sevdatagrid	865	Franki	22.06.13 03:25
Re: combobox in sevdatagrid	877	WilliW	23.06.13 16:27
Re: combobox in sevdatagrid	828	WilliW	23.06.13 22:05

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen