HappyDelano-CSDN博客

原创 excel vba 将多张数据表的内容合并到一张数据表

vba实现：一个Excel文件有很多个样式相同的数据表，将多张数据表的内容合并到一张数据表里

2023-08-21 11:51:16 2675

原创微信合并转发的图片如何批量保存

微信合并转发的图片如何批量保存

2023-07-19 14:04:28 12777 2

原创 Win10家庭版找不到gpedit.msc文件的解决办法

家庭版在运行框中键入gpedit.msc 提示找不到。没有办法打开本地组策略编辑器。运行这个批处理文件，就可以打开本地组策略编辑界面了。

2023-05-08 11:00:32 679

原创解决电脑卡顿：windows禁用Antimalware Service Executable服务

关闭windows-defender的工具用来禁用Antimalware Service Executable服务，已优化系统CPU和内存的使用情况，提升电脑性能，解决电脑卡顿的问题。在网站上找了很多禁用Antimalware Service Executable服务的办法，经验证都不生效。用这个工具实现的。

2023-05-08 10:38:52 5250

MicroOffice Excel可以在“自定义功能区”菜单中，可以直接添加“宏”。但是WPS Excel的“自定义功能区”设置菜单不支持“宏”的添加。3、用压缩软件打开“自定义功能区.xlsm”文件，打开方式里不提示压缩软件的，可以通过“选择其他应用”查找到压缩软件。将“_rels”文件夹下的".rels"文件添加如下内容（有的压缩软件不支持编辑，可以拖出编辑文件，后在添加覆盖原文件）想要的效果图是下图样式：自定义功能标签“我的菜单”，并在其下有自定义的功能按钮。在此处添加上一步准备的“mUI”文件夹。

2023-04-09 15:15:02 6279 5

原创 excel 有VBA程序的文件重命名后，找不到文件，请检查文件名的拼写，并验证文件位置是否正确... ...

excel vba:找不到文件，请检查文件名的拼写，并验证文件位置是否正确。如果您正视图从最近使用的文件列表中打开该文件，请确保该文件未被重命名、移动或删除。

2023-02-25 16:27:27 1804

原创 WPS VBA遇到的问题小记

WPS VBA环境配置

2022-02-28 10:53:09 7463

原创 Windows无法连接到打印机，拒绝访问。

办公室有三台电脑都是Win10 系统，A提供打印机的共享，B、C连接A的共享打印机。现在是C能够打印，B连接打印机时提示“ Windows无法连接到打印机，拒绝访问”出现这种情况的可能应该会很多，我想提供一下我遇到的问题（驱动问题）的解决办法，给和我遇到同样问题的人一个参考，不能解决所有人的决绝访问问题。我这个是打印机驱动问题，我把A的打印机数据线拔掉，直接连接至B打印机。B打印机自动安装了打印机驱动。然后将打印机数据线恢复至A电脑，用B电脑去连接共享打印机，成功了。...

2021-10-31 08:54:06 6584

原创 win-pe 重置win10密码“SAM 文件只读属性，修改操作无法保存”的解决办法

如图所示：电脑（戴尔G3）忘记系统登陆密码，用win-pe重置密码时，出现 “SAM 只读，无法保存” 的提示，无法重置。原因分析：SAM文件路径盘符显示是X盘，这个是win-pe虚拟盘符，硬盘传输格式设置原因，使得win-pe没有正确加载系统硬盘。解决办法：1、修改SATA Configuration 设置项为AHCI ，路径（主板不同，路径可能不同）：Bios setup ----Storage----SATA Configuration -----AHCI。2、启动 win..

2021-02-14 21:14:51 59951 17

原创中燃料场报表保存到文件--库存报表

Option ExplicitSub CmdGroup3Save() '判断当前数据表是否为刚生产的库存报表 If Range("A1") <> "工程材料盘点表" Then MsgBox "当前数据表不是《工程材料盘点表》，请确认！" End '结束程序的运行 End If '在桌面上创建需要保存文件...

2018-10-18 16:51:09 183

原创中燃料场报表生成器--库存报表

Option ExplicitSub CmdGroup3() ' 判断当前数据表是否为进销存的销售明细表 If Range("A1") <> "库存分布" Then MsgBox "当前数据表不是《库存分布》或者已经被修改，请确认！" End '结束程序的运行 End If ' 新建一...

2018-10-18 16:50:23 220

原创中燃料场报表保存到文件--入库报表

Option ExplicitSub CmdGroup2Save() '判断当前数据表是否为刚生产的出库报表 If Range("A1") <> "材料入库明细表" Then MsgBox "当前数据表不是《材料入库明细表》，请确认！" End '结束程序的运行 End If '在桌面上创建需要保存文件...

2018-10-18 16:49:42 196

原创中燃料场报表生成器--入库报表

Option ExplicitSub CmdGroup2() ' 判断当前数据表是否为进销存的销售明细表 If Range("A1") <> "进货明细表" Then MsgBox "当前数据表不是《进货明细表》或者已经被修改，请确认！" End '结束程序的运行 End If ' 新建...

2018-10-18 16:48:46 177

原创中燃料场报表保存到文件--出库报表

Sub CmdGroup1Save()'' 保存出库报表到文件' '判断当前数据表是否为刚生产的出库报表 If Range("A1") <> "材料出库明细表" Then MsgBox "当前数据表不是《材料出库明细表》，请确认！" End '结束程序的运行 End If '在桌面上...

2018-10-17 16:47:01 159

原创中燃料场报表生成器--出库报表

从进销存系统导出的销售明细表一键生成出库报表---V1.0版本 Sub CmdGroup1()'' CmdGroup1 宏' 从进销存到处的销售明细表生成料场出库报表'' 判断当前数据表是否为进销存的销售明细表 If Range("A1") <> "销售明细表" Then MsgBox "当前数据表不是《销售明细表》 ...

2018-10-16 16:57:45 201

原创 QQ群Voice

//“开始”按钮的点击事件Event Form1.Button1.ClickT1 = BeginThread (StartTask())End EventSub StartTask //获取管理员人数 Dim ManagerNumber ManagerNumber = CInt(Form1.InputBox2.Text)// MessageBox "管理员人数：" &

2016-05-05 15:31:48 617

原创附近的人打招呼V1.0

//微信附近的人打招呼的脚本//开始按钮的响应事件Event Form1.Button1.ClickT1 = BeginThread (senMsg())End Event//发送打招呼信息Sub senMsg //读取文本框中要执行的人数 personNumber = Form1.InputBox1.Text// MessageBox "人数是：" & personN

2016-04-20 13:34:20 1046

原创不同网段间访问共享文件

情况描述：办公室有两台电脑，ip地址不在同一个网段。比如，A电脑：ip地址为 192.168.1.1B电脑：ip地址为192.168.3.1需求描述：A电脑上的网上邻居上的共享文件，需要在B电脑上访问。实现：先查看A电脑上的网上邻居的ip地址，比如A电脑有个网上邻居叫销售部在A电脑上运行--cmd 打开命令行，输入ping 销售部命令行会

2015-11-19 13:46:29 23442 1

原创 excel vba for 调配车间

Sub SetA1()'获取用户输入的序列号打印范围mNumFrom = ThisWorkbook.Worksheets("Sheet1").Range("B1").ValuemNumTo = ThisWorkbook.Worksheets("Sheet1").Range("D1").ValueFor r = mNumFrom To mNumTo Step

2015-11-12 09:42:37 740

原创 android apk 签名之在源码环境里如何完成

假设Android源码路径为 ProPath/1. cp

2014-10-31 09:47:31 3027

原创斐波那契数列求解

Fibonacci.jav/** * 斐波那契数列求解**/class Fibonacci{ public static void main(String[] args){ for(int i = 1; i < 30; i++){ System.out.println("fibonacci(" + i + ") = " + fibonacci(i)); System.o

2014-09-16 14:21:14 895

原创汉诺塔游戏求解

/** * 汉诺塔游戏求解**/class HanoiTowers{public static void main(String[] args){solve(3, "A", "B", "C");}//递归方法对汉诺塔游戏求解public static void solve(int numberOfDisks, String startPole, String t

2014-09-16 14:19:10 849

原创 android中的尺寸单位 dp dip px pt sp mm in 解释

Android中有好几种尺寸的单位。如，dp, dip,

2014-04-12 11:14:33 1420

原创单例对象的创建时机在第一次getInstance时

如题：单例对象的创建时机在第一次getInstance时为说明此问题，摘录工程中的一段代码如下：/** * @className TimerUI * @description TODO 倒计时界面显示类 * @author [email protected] * @date 2014-02-27 4:10:28 PM */public class TimerUI {

2014-03-04 14:19:17 947 1

原创 android canvas 绘制 Cirle 以外的区域为指定颜色

今天的内容主要是android.graphics.PorterDuff.Mode有个需求类似：canvas上绘制圆以外的区域为alpha透明度的黑色，圆内区域为透明：实现原理很简单，就是把整个canvas画成alpha透明度的黑色，canvas.drawARGB(alpha, 0, 0, 0);然后抠空圆形区域。//创建画笔Paint mPa

2014-03-02 16:54:46 8451 5

原创 linux shell 脚本【3】 ---- 重定向与 tee 命令

1.重定向：echo "ABCD" > temp.txt将ABCD写入到temp.txt中echo "ABCD" >> temp.txt讲ABCD追加到temp.txt中其中 > 相当于 1>>>相当于 1>>1为文件描述符，文件描述符是与一个打开的文件或者数据流相关联的一个整数。且系统预留了文件文件描述符如下：0 --

2014-01-08 21:33:16 14285 2

原创 linux shell 脚本【2】 ---- 数学运算

在Bash shell环境中，可以利用 let、 (()) 、 [ ]、 expr 、 bc 进行数学运算用法直接上代码，如下：#! /bin/bashecho "数学运算篇 START"#基本运算----leta=5;b=4;echo "a = $a , b = $b"let c=a+b;echo "a + b = $c"let a++echo "a++

2013-12-25 15:31:30 2432

原创 Android 露珠/水滴拖拽效果实现

解释一下标题：露珠拖拽/水滴拖拽：就是一个View不但能跟着手滑动。还能根据滑动速度，改变形状，像露珠或者水滴那样。这里是效果实现的Demo具体实现就是如下一个Java文件 DewdropView.javapackage com.demo.dewdropdemo;import android.app.Activity;import android.content.res.

2013-11-05 16:58:59 7957 3

原创 linux shell 脚本【1】 ---- echo 与 printf 用法

终端打印的常用命令有 echo 和 printf 两种。先说基本用法：echo:1. echo Hello Word !命令行输出：Hello Word !2. echo 'Hello Word !'命令行输出：Hello Word !3. echo "Hello Word"命令行输出：Hello Word嗯？为什么第三种，即双引号的方

2013-10-31 21:48:20 21715

原创 APP 压力测试脚本举例

应用有些功能需要压力测试，对应的就是某些按钮需要N多次的点击来进行压力测试：有了adb shell getevent 获得点击屏幕位置坐标的方法就可以写个脚本，让其代替你一直点啊点的这等体力活啦创建文件 a.shecho 切换照相/录像 1000次 ---- 压力测试开始declare -i countorcountor=0adb shell am s

2013-10-10 11:24:49 5884

原创 Android adb shell 获得点击屏幕的位置坐标

通过adb shell getevent命令获得点击屏幕的位置坐标的方法：第一步：计算比例首先通过命令adb shell getevent -p | grep -e "0035" -e "0036"获得event 体系里宽（0035）和高（0036）以当前我使用的手机为例，命令会输出如下信息：0035 : value 0, min 0, ma

2013-10-10 11:10:41 50383 6

原创 Android 相机预览添加蒙板效果的实现

有了上一篇 Android 图片合成：添加蒙板效果不规则相框透明度渐变效果的实现的基础以后，我们还可以把相机的预览也添加蒙板，像上一篇中前景图那样这里只简单介绍一下思路吧：Camera设置previewCallback:mCamera.setPreviewCallback(mPreviewCallback);private PreviewCallback

2013-06-25 10:53:50 5231

原创两个SurfaceView显示预览的问题 setZOrderMediaOverlay(true)

工作中遇见过一个这样的需求：启动后置相机，用一个SurfaceView （称其对象为SV1）显示预览，拍照，然后关闭后置相机，启动前置相机，用另一个SurfaceView（称其对象为SV2）显示前置预览这个时候问题来了，前置预览显示不出来，startPreview也没有任何异常，如果把SV1从layout中remove掉，SV2就可以正常显示前置预览。。。。。

2013-05-21 17:25:59 17662 2

原创 android Activity android:launchMode="singleInstance" 与 startActivityForResult

先记录一下现象，还不晓得原因：有一个Activity,叫A，在这个Activity种请求其他页面叫做BActivity里的内容，所有发了个Intent: startActivityForResult已经调好的程序，后来在不经意间，把A设置了个单实例android:launchMode="singleInstance"之后 startActivityForResult就再也不好用了。

2012-12-22 11:39:34 1613

原创 android 获得ImageView中Image的绘制大小

如题，ImageView在显示图片的时候，受限于屏幕大小，和图片宽高。通常图片是被缩放过，且不是宽和高都充满ImageView的。此时，我们如何获得Image被实际绘制的宽高呢？如下：final ImageView iv = (ImageView) findViewById(R.id.iv_test); iv.setImageResource(R.drawable.abc);

2012-12-20 13:18:36 13956 4

原创 java.net.SocketTimeoutException: Read timed out 的解决办法 android平台腾讯微博开发

刚接手腾讯微博，做了个小DEMO。公司网络有代理。发照片时一半左右发送失败，错误信息如下W/System.err(31723): java.net.SocketTimeoutException: Read timed outW/System.err(31723): at org.apache.harmony.xnet.provider.jsse.NativeCrypto.SSL_r

2012-11-29 19:33:46 81383 3

原创 android 手电筒的实现

android手机用闪光灯做成手电筒的应用很多，但是有的不能用。后来发现是除了把 camera device的 flashmode设置成torch外还要打开预览：下面是代码：MainActivity.javapackage com.android.flashlight;import android.app.Activity;import android.os.Bu

2012-11-23 13:48:59 14194

原创 android 窗口小部件的实现

“窗口小部件”可以是一个单独的apk,当然也可以内嵌在其他的apk当中。此处主要是为了说明“窗口小部件”的实现方法，所有单独做成一个apk 。新建一个android项目（没有activity）。下面是代码：首先是Contants类：package com.android.flashlight;import android.util.Log;public clas

2012-11-22 14:56:37 6210

原创 android sina 微博表情功能的实现

表情为本地表情，把所有的表情图片装载到gridview里面。然后在gridview的点击事件里做如下处理。@Override public void onItemClick(AdapterView arg0, View arg1, int index, long arg3) { if(mEditText == null) return; String content

2012-11-14 09:17:29 2565

转载新浪微博开发保存的access_token不能继续使用的解决办法

转自：http://blog.sina.com.cn/s/blog_5de73d0b01014k87.html在使用新浪微博开放平台进行项目开发的时候，会遇到这样的情况。当用户第一次登录成功之后，为了让用户在下次启动应用时无须再进行登录，此时需要把Access Token保存到SharedPreferences中，当启动应用时，把Access Token从Shar

2012-10-19 14:03:41 8719 2