Thema Datum  Von Nutzer Rating
Antwort
09.11.2004 10:38:49 Tom
NotSolved
Blau Aw:MSFlexGrid Mehrfachselektion
09.11.2004 10:46:26 Rasta
NotSolved

Ansicht des Beitrags:
Von:
Rasta
Datum:
09.11.2004 10:46:26
Views:
1596
Rating: Antwort:
  Ja
Thema:
Aw:MSFlexGrid Mehrfachselektion
Hallo Tom,

folgend ein beispiel zum selektieren mehrererm zeilen.
sollte das nciht genügen, schau dich mal dort um. ansonsten einfach nochmal posten.

http://www.experts-exchange.com/Programming/Programming_Languages/Visual_Basic/Q_20803778.html

viele grüße

rasta

----------------------------------------------------------------
Private Sub Form_Load()
MSFlexGrid1.Cols = 10 'Set dimensions of flexgrid and set selection behaviour
MSFlexGrid1.Rows = 10

MSFlexGrid1.AllowBigSelection = True
MSFlexGrid1.SelectionMode = flexSelectionByRow

For x = 0 To 9 'Used for filling a flexgrid with some data
For y = 0 To 9
MSFlexGrid1.Col = x
MSFlexGrid1.Row = y
MSFlexGrid1.Text = y
Next y
Next x

End Sub

Private Sub MSFlexGrid1_MouseUp(Button As Integer, Shift As Integer, x As Single, y As Single)
Dim StartRow As Integer
Dim EndRow As Integer

'Depending on the selection direction, Row can be either smaller or larger than RowSel
'So we must determine which is smaller and set StartRow and EndRow variables accordingly

If MSFlexGrid1.Row < MSFlexGrid1.RowSel Then
StartRow = MSFlexGrid1.Row
EndRow = MSFlexGrid1.RowSel
Else
StartRow = MSFlexGrid1.RowSel
EndRow = MSFlexGrid1.Row
End If

message = "Selected rows:" & Chr(13) 'chr(13) is used to enter new line
For x = StartRow To EndRow 'Add some text to message
message = message & x & Chr(13)
Next x

MsgBox message

End Sub
-----------------------------------------------------------------


Tom schrieb am 09.11.2004 10:38:49:

Hallo,

wie kann ich bei einer Mehrfachselektion die markierten Zeilen ermitteln?

MfG
Tom

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
09.11.2004 10:38:49 Tom
NotSolved
Blau Aw:MSFlexGrid Mehrfachselektion
09.11.2004 10:46:26 Rasta
NotSolved