导航:首页 > 文件类型 > excel如何查看源文件

excel如何查看源文件

发布时间:2024-03-05 23:55:41

『壹』 别人用excel表格做的管理系统怎么查看此管理系统的源码

  1. 新建excel文件,alt+F11进入VBA编辑器,插入模块,输入以下代码

Sub MoveProtect()


Dim FileName As String

FileName = Application.GetOpenFilename("Excel文件(*.xls & *.xla),*.xls;*.xla", , "VBA破解")

If FileName = CStr(False) Then

Exit Sub

Else

VBAPassword FileName, False ' 引用下面的自定义函数

End If

End Sub


Private Function VBAPassword(FileName As String, Optional Protect As Boolean = False)

If Dir(FileName) = "" Then

Exit Function

Else

FileCopy FileName, FileName & ".bak"

End If


Dim GetData As String * 5

Open FileName For Binary As #1

Dim CMGs As Long

Dim DPBo As Long

For i = 1 To LOF(1)

Get #1, i, GetData

If GetData = "CMG=""" Then CMGs = i

If GetData = "[Host" Then DPBo = i - 2: Exit For

Next

If CMGs = 0 Then

MsgBox "请先对VBA编码设置一个保护密码...", 32, "提示"

Exit Function

End If

If Protect = False Then

Dim St As String * 2

Dim s20 As String * 1 '取得一个0D0A十六进制字串

Get #1, CMGs - 2, St '取得一个20十六制字串

Get #1, DPBo + 16, s20 '替换加密部份机码

For i = CMGs To DPBo Step 2

Put #1, i, St

Next '加入不配对符号

If (DPBo - CMGs) Mod 2 <> 0 Then

Put #1, DPBo + 1, s20

End If

MsgBox "文件解密成功......", 32, "提示"

Else

Dim MMs As String * 5

MMs = "DPB="""

Put #1, CMGs, MMs

MsgBox "对文件特殊加密成功......", 32, "提示"

End If

Close #1

End Function

2. 运行上面的代码,选择你的文件,移除密码成功后打开文件,按alt+F11查看源码:

『贰』 WPS文字怎么打开数据源

WPS文字是一款处理文本资料的软件,打开数据源需要进行以下操作:
1. 首先,在WPS文字中打开或创建一个新的文档。
2. 然后,在菜单栏中选择“插入”选项。
3. 在下拉菜单中,选择“数据源”选项。
4. 点击“数据源”,弹让改出“数据源”对话框。
5. 在“数据源”对话框中,选择需要打开的数据源,例如Excel表格、Access数据库等。
6. 选备颂择完数据源后,点击“确定”按钮。
7. 在弹出的“确仿滑郑认数据源字段”对话框中,选择需要插入的数据字段。
8. 点击“确定”按钮,即可将数据源插入到WPS文字文档中。
9. 在数据源插入后,可以通过“插入”选项中的“字段”选项,将数据源中的数据插入到文档中。
以上就是在WPS文字中打开数据源的方法,希望对你有帮助。

『叁』 如何查看Excel电子表格中的数据源链接

1、点击打开excel2010的数据选项卡。

阅读全文

与excel如何查看源文件相关的资料

热点内容
java将数字转换成字母 浏览:854
c盘中的哪些是系统文件夹 浏览:668
分布式服务如何跨库统计数据 浏览:829
力控转发数据客户端模式如何建立 浏览:200
怎么样让自己的网站不被别人看到 浏览:711
编程扩展效果如何 浏览:335
荣耀畅玩手环同步qq 浏览:475
怎么向sql中添加数据库 浏览:596
录歌失败重启app什么意思 浏览:522
压缩文件包怎么在微信发送 浏览:432
mysql数据库怎么插入时间值 浏览:191
微信视频不能转发朋友圈 浏览:596
影视后期的app有哪些 浏览:956
电子保单数据出错什么意思 浏览:368
如何以文件下载音乐 浏览:438
计算机网络章节练习 浏览:999
单片机的外部中断程序 浏览:48
表格批量更名找不到指定文件 浏览:869
js的elseif 浏览:584
3dmaxvray视频教程 浏览:905

友情链接