[辅助教学]水晶排课11.55PJ版，可更改注册校名 [复制链接]

下载试试

更改校名纯手工一点一点的更改

下载试试

在哪呢，看到亚

有大侠提供一下吗？

真正破解的话还是不错的。

用下面VBA代码能快速更改导出Excel中的校名

Sub SJPK()
    Dim jpg As Shape
    Dim ws As Worksheet
    For Each ws In ThisWorkbook.Worksheets
        ws.Range("A3:D3").Merge
        ws.Range("A3").HorizontalAlignment = xlLeft
        ws.Range("A3").Value = "XXX学校"
        For Each jpg In ws.Shapes
            If jpg.Type = 13 Then
                jpg.Delete
            End If
        Next jpg
    Next ws
End Sub

yancr:用下面VBA代码能快速更改导出Excel中的校名
Sub SJPK()
    Dim jpg As Shape
    Dim ws As Worksheet
....... (2025-12-03 16:41) 

现在得用AI可生成修改的批处理，更简单

“水晶排课11.53注册生成器”怎么被管理员给屏敝了呢？

试试这个软件