vba - 更改美国占德国百分比的百分比

Question

我的问题是我使用的是德语版本的 Excel，并且我的输入采用美国数字格式。

我需要一个代码，将小数百分比数字中的所有点更改为逗号，但将百分比格式保留为单元格值。

Sub Makro1()
    Columns("J:J").Select
    Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False
End Sub

当我使用这个简单的宏将所有句点更改为逗号时，单元格的值将被格式化为文本，但我需要它的百分比。

Answer 1

现在我刚刚制作了一个 Makro，将 DecimalSeparator 的选项更改为“。”然后回到“，”就可以了。

但是感谢您的帮助!

Sub Makro1()

    With Application
        .DecimalSeparator = "."
        .ThousandsSeparator = ","
    End With
End Sub

Sub Makro2()    
        With Application
            .DecimalSeparator = ","
            .ThousandsSeparator = "."
        End With
End Sub