' ******************************************************
' 行幅変更可能設定
' ******************************************************
Public Sub AllowResizeRow(ByVal flg As Boolean)

	Me.AllowUserToResizeRows = flg

End Sub