Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
txtFloat.top = Grid.CellTop + Grid.top
txtFloat.Left = Grid.CellLeft + Grid.Left
txtFloat.width = Grid.CellWidth
txtFloat.Height = Grid.CellHeight
Dim cellRow As Long, cellCol As Long
Sub ShowCellEditor()
With mhfgCDRS
' Cancel range selection
.RowSel = .Row
.ColSel = .Col
' Move the textbox into place
txtCellEditor.Move .Left + .CellLeft, .Top + .CellTop, _
.CellWidth - ScaleX(1, vbPixels, vbTwips), _
.CellHeight - ScaleY(1, vbPixels, vbTwips)
' Transfer the contents of the current cell into the textBox
txtCellEditor.Text = .Text
' Move the TextBox in front of the grid
txtCellEditor.Visible = True
txtCellEditor.ZOrder
txtCellEditor.SetFocus
' Remember coordinates for later
cellRow = .Row
cellCol = .Col
End With
End Sub