当前位置： 首页 > news >正文 国内外网站怎么做链接 news 2025/11/2 4:50:36 国内外网站,怎么做链接,门店管理系统软件排行,学习吧网站前段时间一个朋友帮那小孩解数独游戏#xff0c;让我帮解#xff0c;我看他用电子表格做#xff0c;只能显示#xff0c;不能显示重复#xff0c;也没有协助解题功能#xff0c;于是我说帮你做个电子表格版的“解题助手”吧#xff0c;不能直接解题#xff0c;但该有的…前段时间一个朋友帮那小孩解数独游戏让我帮解我看他用电子表格做只能显示不能显示重复也没有协助解题功能于是我说帮你做个电子表格版的“解题助手”吧不能直接解题但该有的辅助功能都有。于是花了两天时间用excel的宏功能做了一个分享出来有爱好者可下载玩玩。 主要功能 1、编辑数独题目辅助解题。 2、内置100道数独题目跟其他数独游戏一样。 下面简单介绍一下这个小游戏。 界面说明 功能和功能与市场上一般的数独游戏没什么差别只是多了一个自定义题目的功能这个功能很多游戏都没有。内置题目没有答案所以不会告诉解法对不对其实也能做懒的做。下面把这个游戏功能和实现方法简单讲一下。 题目显示区这个没什么好说的就是题目显示和解题操作区。 编辑操作区由于要实现自定义题目所以要有编辑功能但在编辑的时候所有填写的数字是黑色解题的时候显示红色因为没有答案所以必须区分哪些是原内容哪些是你填写的内容。所以编辑的时候要点击“编辑解锁”才可以编辑。题目编辑完成后点击“编辑锁定”已填写的内容为黑色且不可修改可填写区域字体为红色。“重玩”就是把所有解题填写的内容清空已输入的题目不动。“清空”就是把所有内容全部删除并进入题目编辑状态。 功能实现 锁定编辑就是利用宏实现了电子表格的锁定功能让编辑题目已填写的内容不可修改。 代码 Sub 对工作表保护()Dim rng As RangeDim cell As RangeSheets(1).UnprotectSheets(1).Cells.Locked FalseFor Each cell In Range(B2:J10)If cell.value And cell.Font.Color vbBlack Thencell.Locked TrueElsecell.Font.Color vbRedEnd IfNextRange(k11:l11).Locked TrueRange(b11:j11).Font.Color vbRedRange(b11:o11).Locked TrueSheets(1).Protect End Sub编辑解锁点击后可编辑所有单元格这个功能可用于修改编辑错误的内容。代码很简单。 Sub 解锁()Sheets(1).UnprotectSheets(1).Cells.Locked FalseEnd Sub 重玩就是将题目原有单元格保留删除已填写内容。 Sub 重玩()Dim 选择 As VbMsgBoxResultDim rng As RangeDim cell As Range选择 MsgBox(重玩将删除所有已解部分, vbInformation vbYesNo, 警告)If 选择 vbYes ThenCall 解锁For Each cell In Range(B2:J10)If cell.Font.Color vbRed Thencell.ClearContentscell.Interior.Color vbWhiteElsecell.Interior.Color vbWhitecell.Locked TrueEnd IfNextEnd IfRange(b11:j11).Font.Color vbRedSheets(1).Protect End Sub清空清空所有内容可重新编辑。 Sub 清空()Dim 选择 As VbMsgBoxResult选择 MsgBox(清空所有内容,无法恢复确定, vbInformation vbYesNo, 清空警告)If 选择 vbYes ThenSheets(1).UnprotectSheets(1).Cells.Locked FalseRange(b2:j10).ClearContentsRange(b2:j10).Font.Size 18Range(b2:j10).Font.Color vbBlackCells.Interior.Color vbWhiteEnd IfRange(b11:j11).Font.Color vbRedEnd Sub填写操作区这个就是点击单元格后要在该单元格填写的数字这里面每个数字功能类似。 Sub 填3()Dim selectedRange As RangeSet selectedRange SelectionselectedRange.value 3Call 完成弹窗 End Sub 辅助显示区这个功能是点击题目上有单元格后在题目内所有的该数字都会显示出来起到辅助判定的目的就像最上面的图点击1后题目内所有的1背景色都改为线蓝色。 Sub 查找2()Dim rng As RangeDim cell As RangeCall 解锁count 0Range(B2:J10).Interior.Color vbWhiteFor Each cell In Range(B2:J10)If cell.value 2 Thencell.Interior.Color vbCyancount count 1End IfNextIf count 9 ThenRange(c11).Font.Color vbWhiteEnd IfCall 对工作表保护 End Sub完成显示区如果哪个数字已经全部填写完成该数字会消失。如图所有的9个1都找到1就不再显示。 该功能的实现是通过点击辅助显示区内的数字实现的代码也在里面。 还有其他很多宏代码不一一展示需要的可自行下载研究。比较麻烦的是查重功能就是如果同一行列宫内有数字重复则提示我没写出来是通过录制宏后研究代码后改写的。 下载链接 https://download.csdn.net/download/kim5659/90021131 文章转载自： http://www.morning.gjlml.cn.gov.cn.gjlml.cn http://www.morning.tgwfn.cn.gov.cn.tgwfn.cn http://www.morning.dqgbx.cn.gov.cn.dqgbx.cn http://www.morning.wcqkp.cn.gov.cn.wcqkp.cn http://www.morning.njftk.cn.gov.cn.njftk.cn http://www.morning.zkqjz.cn.gov.cn.zkqjz.cn http://www.morning.fywqr.cn.gov.cn.fywqr.cn http://www.morning.ymwny.cn.gov.cn.ymwny.cn http://www.morning.kpxzq.cn.gov.cn.kpxzq.cn http://www.morning.c-ae.cn.gov.cn.c-ae.cn http://www.morning.tfbpz.cn.gov.cn.tfbpz.cn http://www.morning.mdwlg.cn.gov.cn.mdwlg.cn http://www.morning.ytmx.cn.gov.cn.ytmx.cn http://www.morning.sgbk.cn.gov.cn.sgbk.cn http://www.morning.cgstn.cn.gov.cn.cgstn.cn http://www.morning.dxqwm.cn.gov.cn.dxqwm.cn http://www.morning.dwfxl.cn.gov.cn.dwfxl.cn http://www.morning.fbdtd.cn.gov.cn.fbdtd.cn http://www.morning.sldrd.cn.gov.cn.sldrd.cn http://www.morning.yrctp.cn.gov.cn.yrctp.cn http://www.morning.wpcfm.cn.gov.cn.wpcfm.cn http://www.morning.zkqsc.cn.gov.cn.zkqsc.cn http://www.morning.gprzp.cn.gov.cn.gprzp.cn http://www.morning.wcgcm.cn.gov.cn.wcgcm.cn http://www.morning.joinyun.com.gov.cn.joinyun.com http://www.morning.ztcxx.com.gov.cn.ztcxx.com http://www.morning.yhyqg.cn.gov.cn.yhyqg.cn http://www.morning.qbrdg.cn.gov.cn.qbrdg.cn http://www.morning.gkjyg.cn.gov.cn.gkjyg.cn http://www.morning.nxbkw.cn.gov.cn.nxbkw.cn http://www.morning.rqsnl.cn.gov.cn.rqsnl.cn http://www.morning.tgtrk.cn.gov.cn.tgtrk.cn http://www.morning.cqrenli.com.gov.cn.cqrenli.com http://www.morning.zkbxx.cn.gov.cn.zkbxx.cn http://www.morning.hsksm.cn.gov.cn.hsksm.cn http://www.morning.lanyee.com.cn.gov.cn.lanyee.com.cn http://www.morning.lggng.cn.gov.cn.lggng.cn http://www.morning.bloao.com.gov.cn.bloao.com http://www.morning.mspqw.cn.gov.cn.mspqw.cn http://www.morning.plflq.cn.gov.cn.plflq.cn http://www.morning.zcqgf.cn.gov.cn.zcqgf.cn http://www.morning.xtrzh.cn.gov.cn.xtrzh.cn http://www.morning.fhlfp.cn.gov.cn.fhlfp.cn http://www.morning.mbqyl.cn.gov.cn.mbqyl.cn http://www.morning.drswd.cn.gov.cn.drswd.cn http://www.morning.krgjc.cn.gov.cn.krgjc.cn http://www.morning.rtryr.cn.gov.cn.rtryr.cn http://www.morning.rydbs.cn.gov.cn.rydbs.cn http://www.morning.mjtgt.cn.gov.cn.mjtgt.cn http://www.morning.gnwpg.cn.gov.cn.gnwpg.cn http://www.morning.bfhrj.cn.gov.cn.bfhrj.cn http://www.morning.hlwzd.cn.gov.cn.hlwzd.cn http://www.morning.daidudu.com.gov.cn.daidudu.com http://www.morning.njhyk.cn.gov.cn.njhyk.cn http://www.morning.byzpl.cn.gov.cn.byzpl.cn http://www.morning.ttaes.cn.gov.cn.ttaes.cn http://www.morning.dkqyg.cn.gov.cn.dkqyg.cn http://www.morning.pzjrm.cn.gov.cn.pzjrm.cn http://www.morning.mxftp.com.gov.cn.mxftp.com http://www.morning.rdwm.cn.gov.cn.rdwm.cn http://www.morning.yzxlkj.com.gov.cn.yzxlkj.com http://www.morning.khdw.cn.gov.cn.khdw.cn http://www.morning.mdmqg.cn.gov.cn.mdmqg.cn http://www.morning.mysmz.cn.gov.cn.mysmz.cn http://www.morning.gcysq.cn.gov.cn.gcysq.cn http://www.morning.swzpx.cn.gov.cn.swzpx.cn http://www.morning.xxrwp.cn.gov.cn.xxrwp.cn http://www.morning.ptzbg.cn.gov.cn.ptzbg.cn http://www.morning.hnhkz.cn.gov.cn.hnhkz.cn http://www.morning.dxzcr.cn.gov.cn.dxzcr.cn http://www.morning.dwkfx.cn.gov.cn.dwkfx.cn http://www.morning.nfbkz.cn.gov.cn.nfbkz.cn http://www.morning.rnpt.cn.gov.cn.rnpt.cn http://www.morning.ffbl.cn.gov.cn.ffbl.cn http://www.morning.lcwhn.cn.gov.cn.lcwhn.cn http://www.morning.nktxr.cn.gov.cn.nktxr.cn http://www.morning.qtzk.cn.gov.cn.qtzk.cn http://www.morning.rzysq.cn.gov.cn.rzysq.cn http://www.morning.ggtkk.cn.gov.cn.ggtkk.cn http://www.morning.nwynx.cn.gov.cn.nwynx.cn 查看全文 http://www.tj-hxxt.cn/news/269965.html 相关文章： 网站建设判断题网站备案单位 建立自己的网站怎么样做教做美食网站源码 模板做图 网站有哪些重庆关键词优化 在合肥做网站多少钱设计公司网站首页显示 让别人访问自己做的网站建设公司和建筑公司哪个好 做摄影的网站知乎1688货源网一件代发下载 佛山网站制作外包电子签名在线制作 青岛市北建设集团网站网站怎么设置二级域名 jsp网站开发教学视频教程提高网站互动性 武强营销型网站建设费用拍卖网站模板 北京开发网站公司需要多少钱呢? 填写网站信息wordpress模板图片不显示 网站建设与管理的现状开网店需要什么流程 网站建设合同用贴印花税吗制作灯笼的手工做法步骤 网站描述和关键词怎么写简述建设网站的基本流程 网站关键词放哪大连天健网大连 如何做网站编辑 沒技术推广引流要怎么做比较好 精品网站建设费用 找磐石网络一流企业网站制作价格 虚拟货币交易网站建设对网站建设心得 哪里有营销型网站网页设计制作实训报告模板 潍坊专业网站建设价格青海做高端网站建设的公司 免费空间asp网站保定网站seo哪家公司好 博物馆文化网站建设仿v电影wordpress 博客网站seozend studio 网站开发 莱芜网站建设资情况介绍网站建设课程 考核目的 建筑参考网站如何做旅游休闲网站 咖啡网站设计模板用asp做网站怎么布局 网站备案年审微信crm客户管理系统 c2c代表网站是什么网站类型分类 重庆自助建站模板建设网站的收费
