Excel实现下划线转驼峰命名：多下划线场景解决方案求助

方法一：使用Excel内置公式 #

适用于不想启用VBA的场景，直接在单元格输入公式即可处理任意数量的下划线：

=LOWER(LEFT(A1,1))&MID(SUBSTITUTE(PROPER(A1),"_",""),2,LEN(SUBSTITUTE(PROPER(A1),"_",""))-1)

公式逻辑： #

• PROPER(A1)：将每个下划线分隔的单词首字母转为大写，其他字母保持小写，例如avg_face_count会变成Avg_Face_Count
• SUBSTITUTE(..., "_", "")：移除所有下划线，得到AvgFaceCount
• LOWER(LEFT(A1,1))：提取原字符串的首字母并转为小写，确保驼峰命名的首字母为小写格式
• 最后拼接首字母和处理后的剩余部分，得到最终的avgFaceCount

方法二：VBA自定义函数（高效批量处理） #

如果需要处理大量数据，自定义函数更便捷：

1. 按下Alt+F11打开VBA编辑器
2. 在左侧工程窗口右键点击当前工作簿，选择「插入」→「模块」
3. 在模块中粘贴以下代码：

Function ToCamelCase(str As String) As String
    Dim parts() As String
    Dim i As Integer
    parts = Split(str, "_")
    ToCamelCase = LCase(parts(0))
    For i = 1 To UBound(parts)
        ToCamelCase = ToCamelCase & UCase(Left(parts(i), 1)) & LCase(Mid(parts(i), 2))
    Next i
End Function

4. 返回Excel界面，在目标单元格输入=ToCamelCase(A1)（A1为源数据单元格），回车即可得到结果，下拉填充可批量处理整列数据

内容的提问来源于stack exchange，提问作者cristis