Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

geht alles
Autor: christian
Datum: 27.03.02 20:47
Private Sub MSFlexGrid1_Click() X = MSFlexGrid1.Row 'steht fuer die reihe die du anklicks If SPALTEN > -1 Then MSFlexGrid1.Row = SPALTEN For j = ZEILEN To 0 Step -1 MSFlexGrid1.Col = j MSFlexGrid1.CellBackColor = vbWhite Next j End If MSFlexGrid1.Row = X SPALTEN = 0 end sub Private Sub MSFlexGrid1_DblClick() MSFlexGrid1_Click cmdeinfügen.Visible = False cmdspeichern.Visible = False For i = 0 To ZEILEN ' zeilen belegen beim fuellen des flexgrids MSFlexGrid1.Col = i MSFlexGrid1.CellBackColor = vbYellow ' oder blau oder rot Next i SPALTEN = MSFlexGrid1.Row wenn dir das noch zu krüptisch ist schick ne mail bin morgen im buero ab 9 uhr

Wer kennt sich mit MSFlexgrid aus ???	126	Happy-Surfer	27.03.02 10:47
geht alles	50	christian	27.03.02 20:47

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