>>732
Private Sub CheckBox1_Click()
  CheckBox1.TopLeftCell.Offset(0, 1) = "←ここだよ"
End Sub