请教，电子表格单元格中，如何设置标点符号，比如，一行的开头不能出现句号，一行的结尾不能出现前引号？

发布网友 发布时间：2022-04-24 10:09

我来回答

共3个回答

热心网友 时间：2023-10-09 22:24

假设在A1单元格设置
选中A1单元格，按“数据－有效性”在出现的对话框中选“设置”选项卡，在其中的“允许”框中选“自定义”，在下面“公式”框中输入公式 =AND(LEFT(A1,1)<>"。",RIGHT(A1,1)<>"“")
确定即可。
如果A2单元格也需要这个设置，就选中A1格，用鼠标向下拖动复制就行了。

补充：
如果按你在“补充”中的要求，在EXCEL是无法实现的，因为EXCEL不是文字处理软件，它的长处是处理数据。所以，这位朋友，不要在EXCEL中寻找了。

热心网友 时间：2023-10-09 22:24

在工作表标签上点鼠标右键，选“查看代码”，把下面代码粘贴进去就可以使用了。你在工作表中输入一些句子试试吧。
Private Sub Worksheet_Change(ByVal Target As Range)
Dim t As String
t = Target.Value
If Left(t, 1) = "。" Or Left(t, 1) = "." Then
MsgBox "开头出现句号，下面会自动删除句号"
Target.Value = Right(t, Len(t) - 1)
End If
If Right(t, 1) = "“" Or Right(t, 1) = "”" Or Right(t, 1) = """" Then
MsgBox "结尾出现引号，下面会自动删除引号"
Target.Value = Left(t, Len(t) - 1)
End If
End Sub来自：求助得到的回答

热心网友 时间：2023-10-09 22:25

没有什么办不到的，用VBA的话，代码如下。
如在A1单元格
If Left(Range("A1"), 1) = "。" Or Right(Range("A1"), 1) = "“" Then MsgBox "开头不能是句号，结尾不能是前引号"