Improve company productivity with a Business Account.Sign Up

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 401
  • Last Modified:

VB6 send value from grid in Textbox

Hello all

I would like to know how i can send the value from a grid cell to a couple of textbox.

Ex:

If i click in a cell from column 0 of my MSFexgrid1, it will paste the cell value into my TEXT1.

If i click in a cell from column 1, it will send the value to TEXT2

How can i do that?

Thanks again for your help.

Clipboard.clear
Clipboard.SetText MSHFlexGrid1.Clip

Text1.Text = MSHFlexGrid1
Text1.Font.Bold = True

Open in new window

0
Wilder1626
Asked:
Wilder1626
  • 2
1 Solution
 
Martin LissOlder than dirtCommented:
Private Sub MSHFlexGrid1_Click()

If MSHFlexGrid1.Col = 0 Then
    Text1.Text = MSHFlexGrid1.TextMatrix(MSHFlexGrid1.Row, MSHFlexGrid1.Col)
Else
    If MSHFlexGrid1.Col = 1 Then
        Text2.Text = MSHFlexGrid1.TextMatrix(MSHFlexGrid1.Row, MSHFlexGrid1.Col)
    End If
End If


End Sub

Open in new window

0
 
Wilder1626Author Commented:
HI MartinLiss:

Thanks again for your help. this work great.
0
 
Martin LissOlder than dirtCommented:
Once again you're welcome and I'm glad I was able to help.

Select the 'About Me' tab in my profile and you'll find links to some articles I've written (including a new one that shows how to float an ActiveX control on a sheet) that may interest you.
Marty - MVP 2009 to 2013
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

The 14th Annual Expert Award Winners

The results are in! Meet the top members of our 2017 Expert Awards. Congratulations to all who qualified!

  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now