On-screen guidance at the moment of need enables you & your employees to focus on the core, you can now boost your adoption rates swiftly and simply with one easy tool.
With MSHFlexGrid_pref_carrier .Redraw = False 'Find range to copy min_row = .Row: max_row = .RowSel If min_row > max_row Then Tmp = max_row: max_row = min_row: min_row = Tmp min_col = .Col: max_col = .ColSel If min_col > max_col Then Tmp = max_col: max_col = min_col: min_col = Tmp my_text = "" 'Get the text For i = min_row To max_row For j = min_col To max_col my_text = my_text & .TextMatrix(i, j) If j < max_col Then my_text = my_text & vbTab Next j If i < max_row Then my_text = my_text & vbCrLf Next i .Redraw = True End With If my_text <> "" Then Clipboard.Clear Clipboard.SetText (my_text) Else Beep MsgBox "Please select some text.", vbExclamation, "Nothing selected!" End If
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.