Question

我正在尝试将数据导入表格。基本上它是一个MCQ。我的所有问题都有上标和下标，例如X ²和log ₅ ² ....

我有超过2000条记录，我必须导入它。但是在导入之后它以简单的格式出现，而不是取得权力。我的数据库是MYSQL (UTF-8)

以下是示例数据

If log5 2, log5 (2x - 5) and   log 5(2x - 7/2)  are in AP , then x is equal to

在施加冲击之后，它看起来像上面，但实际上它应该是

如果log ₅ ²，log5（2 ^x - 5）和log 5（2 ^x - 7/2）在AP中，然后x等于

有人PLZ建议我怎么做

Answer 1

以下是对下标的快速解决方法：

Sub log_Script()
Dim cel As Range, rng As Range
Dim i&, k&
Dim myText$, findText$, curStr$


Set cel = Range("A1")
'myText = cel.Value

For i = 1 To Len(cel.Value)
    k = k + 1
    curStr = Mid(cel.Value, i, 1)
    If curStr <> " " Then
        findText = findText + curStr
    ElseIf curStr = " " Then
        findText = ""
    End If
    Debug.Print findText

    If findText = "log" Then
        If Mid(cel.Value, i + 1, 1) = " " Then
            With cel.Characters(Start:=k + 2, Length:=1).Font
                .Subscript = True
            End With
        Else
            With cel.Characters(Start:=k + 1, Length:=1).Font
                .Subscript = True
            End With
        End If
    End If
Next i

End Sub

这将通过一个范围（当前设置为A1:A10），并且对于每个单元格，它将查找log然后获取下一个数字并使其成为下标。（注意：假设所有日志都有基数<10，如果不一定是这样，请告诉我。）

如果您可以从CSV中发布几行或单元格，我可能会做得更好，这样我就可以看到格式化的内容。（或截取您的数据的一部分，这也是有效的。）

将复杂数据从csv导入到mysql表

1 个答案: