excel表格中的内容怎么设置

1.excel表格,怎么设置,使得单元格的内容可以编辑,可以删除,但是不

这里有一段代码，可以达到你的要求。

Sub 屏蔽（）

With Application

'屏蔽常用工具栏剪切、复制、粘贴

.CommandBars(3).Controls（"剪切（&T）").Enabled = False

.CommandBars(3).Controls（"复制（&C）").Enabled = False

.CommandBars(3).Controls（"粘贴（&P）").Enabled = False

'屏蔽单元格右键菜单中的剪切、复制、粘贴命令

.CommandBars("Cell").Controls（"剪切（&T）").Enabled = False

.CommandBars("Cell").Controls（"复制（&C）").Enabled = False

.CommandBars("Cell").Controls（"粘贴（&P）").Enabled = False

'屏蔽编辑菜单中的剪切、复制、粘贴命令

.CommandBars(1).Controls（"编辑（&E）").Controls（"剪切（&T）").Enabled = False

.CommandBars(1).Controls（"编辑（&E）").Controls（"复制（&C）").Enabled = False

.CommandBars(1).Controls（"编辑（&E）").Controls（"粘贴（&P）").Enabled = False

'屏蔽键盘剪切、复制、粘贴键

.OnKey "^x", ""

.OnKey "^c", ""

.OnKey "^v", ""

End With

End Sub

这个会导致你所有的Excel都无法进行复制，粘贴，剪切等工作。。。

下边再给你一段恢复的代码。。

Sub 恢复（）

With Application

'屏蔽常用工具栏剪切、复制、粘贴

.CommandBars(3).Controls（"剪切（&T）").Enabled = True

.CommandBars(3).Controls（"复制（&C）").Enabled = True

.CommandBars(3).Controls（"粘贴（&P）").Enabled = True

'屏蔽单元格右键菜单中的剪切、复制、粘贴命令

.CommandBars("Cell").Controls（"剪切（&T）").Enabled = True

.CommandBars("Cell").Controls（"复制（&C）").Enabled = True

.CommandBars("Cell").Controls（"粘贴（&P）").Enabled = True

'屏蔽编辑菜单中的剪切、复制、粘贴命令

.CommandBars(1).Controls（"编辑（&E）").Controls（"剪切（&T）").Enabled = True

.CommandBars(1).Controls（"编辑（&E）").Controls（"复制（&C）").Enabled = True

.CommandBars(1).Controls（"编辑（&E）").Controls（"粘贴（&P）").Enabled = True

'屏蔽键盘剪切、复制、粘贴键

.OnKey "^x"

.OnKey "^c"

.OnKey "^v"

End With

End Sub

先屏蔽了她们的的功能，收回作业后再打开即可。

2.做Excel表格时想把下面的内容放到上面去怎么弄

1、电脑打开Excel表格，然后选中要往上移动的单元格。

2、选中单元格之后，按住shift键不放。

3、按住shift键不放，然后用鼠标拖动单元格往上移动。

4、把单元格往上移动后，放开鼠标就可以了，单元格就上移了。