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.
Private Sub Worksheet_Change(ByVal Target As Range)
Dim rng As Range
Set rng = ActiveCell
ActiveSheet.Shapes("Text Box 1").Select
Selection.Characters.Text = Range("B6") & Range("C6")
rng.Select
End Sub