本文将浅析GadgetToJScript的反序列化原理与在VBA中的利用。...而在VBA中的被检测的列表已有大佬整理了出来: https://github.com/synacktiv/AMSI-Bypass ? ? 当然,DDE与excel 4.0是不受amsi所保护的。...而amsi的bypass也早已是老生常谈的话题,例如outflank提出的 https://outflank.nl/blog/2019/04/17/bypassing-amsi-for-vba/ 或者是在...NonSerializable 类在构造函数中接受一个字符串,然后重写ToString函数,并返回一个sting对象。...但这已不是宏需要考虑的了,而是在powershell中amsi patch的问题了,在前方的代码中加入amsi patch,即可然过wdf对ps的检查,得到Cs的beacon。 ?
增长中的用户分群,如何动态圈选用户,分析其中的增长机会呢?聊一聊一种基于缓慢变化维度的分群方式。...本文首发于腾讯内部知识分享平台「乐问KM」、腾讯官方公众号「腾讯大讲堂」《数据分析:在缓慢变化中寻找跳变——基于缓慢变化维度的用户分群》,作者日后创建个人公众号,以转载形式发布本文。...(缓慢变化维度中,过去1个月领取红包22-28天的群体),使用发布器的渗透率在逐渐升高,这说明红包模块和发布器模块,用户产生了较强的交集,这里可以分析出,在产品层面迭代,促进2个模块的相互互动 运营指标构造的缓慢变化维度的构造维度需要注意如下几点...图:腾讯灯塔关于缓慢变化维度的适配 目前团队中,已经将较多长周期用户行为数据进行分层分群,作为用户基础画像的一部分,引入到数据分析之中,在日常的运营分析和异动监控中广泛应用。...作者:刘健阁 本文首发于腾讯内部知识分享平台「乐问KM」、腾讯官方公众号「腾讯大讲堂」《数据分析:在缓慢变化中寻找跳变——基于缓慢变化维度的用户分群》,作者日后创建个人公众号,以转载形式发布本文。
文件操作 引用打开的工作簿 使用索引号(从 1 开始) Workbooks(1) 使用工作簿名称 Workbooks("1.xlsx") 创建一个 EXCEL 工作簿对象 Dim wd As Excel.Application...ThisWorkBook.Path & "/old.xlsx" newfile = ThisWorkBook.Path & "/new.xlsx" FileCopy oldfile, newfile 删除文件夹下的所有文件...在 thisworkbook 中添加如下代码段: Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target...ActiveSheet.UsedRange.Interior.ColorIndex = 0 Target.Interior.ColorIndex = 6 End If End Sub 在单元格里回车...String arr() = Split(ws.Cells(a, b).Value, "-") alen = UBound(arr) - LBound(arr) + 1 判断单元格是否为空 判断单元格的
在 thisworkbook 中添加如下代码段: Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target...ActiveSheet.UsedRange.Interior.ColorIndex = 0 Target.Interior.ColorIndex = 6 End If End Sub 在单元格里回车...dict.Items For i = 0 to dict.count - 1 key = k(i) value = v(i) Next ' 清空 dict.RemoveAll 参考:Excel vba...{ Do | For | Function | Property | Select | Sub | Try | While } 参见 Exit Statement (Visual Basic) 参考 VBA...Converting Data Types excel vba判断文件是否存在
引导语 数据分析中,我们常常有下面几种分群方式 基础属性类:年龄、性别、城市、学历、用于首次来源 · 特点:基本是不变化的,虽然年龄、城市等也会发生变化,但本质上我们是将其作为一个用户固定属性进行分析...我们引入了数据仓库中缓慢变化维的概念,例如,每天均将用户按照过去1个月领取红包的天数做分段,这样,用户的分群是在缓慢变化,解决了分群一致性问题,监控的指标是短期变化,可以很好的监控出业务异动。 ?...,还非常容易找到业务的交集影响和变化 · 红包敏感群体(缓慢变化维中,过去1个月领取红包22-28天),发布渗透率在逐渐提高,这说明红包模块和发布模块,用户产生了较强的交集,也许可以在产品层面迭代...,本质上是,在一个低频变化上发现其中的高频变化。...图:腾讯灯塔关于缓慢变化维的适配 目前,团队已经将较多用户行为数据,作为用户基础画像的一部分,引入到数据分析之中,在日常的运营分析和异动监控中广泛应用。 ? ?
虽然在excel文件中检索的vba代码不知道写了多少遍了,每次需要的时候,都是从网上找,然后写。实在是低效的做法。从网上找了一段代码,放在此处,以后需要的时候可以随手拿来。
标签:VBA 这是一段非常好的代码,来自ozgrid.com,可以使用它来快速排序VBA中的数组。 代码如下: '对一维或二维数组排序....'二维数组可以通过传递适当的列编号作为sortKeys参数来指定其排序键. '函数传递一个引用,因此将对原始数组进行变异....matches s = Left(s, v.FirstIndex + padOffset) & Application.Rept("0", (padLen - Len(v))) & VBA.mid...sortCols Erase arr1 Erase arr2 Erase tmp On Error GoTo 0 sortArray = arr End Function 下面是一个如何处理包含数字的字符串排序的小演示...(可以使用自动筛选来查看默认排序与排序代码的结果对比): Sub smartNumberSort() Dim a, i& ReDim a(1 To 500) a(1) = "Key" For i
引导语 数据分析中,我们常常有下面几种分群方式: 基础属性类:年龄、性别、城市、学历、用于首次来源 特点: 基本是不变化的,虽然年龄、城市等也会发生变化,但本质上我们是将其作为一个用户固定属性进行分析...我们引入了数据仓库中缓慢变化维的概念,例如,每天均将用户按照过去1个月领取红包的天数做分段,这样,用户的分群是在缓慢变化,解决了分群一致性问题,监控的指标是短期变化,可以很好的监控出业务异动。 ?...红包敏感群体(缓慢变化维中,过去1个月领取红包22-28天),发布渗透率在逐渐提高,这说明红包模块和发布模块,用户产生了较强的交集,也许可以在产品层面迭代,促进2个模块的相互互动。...总的来说,运用运营视角缓慢变化维,本质上是,在一个低频变化上发现其中的高频变化。...图:腾讯灯塔关于缓慢变化维的适配 目前,团队已经将较多用户行为数据,作为用户基础画像的一部分,引入到数据分析之中,在日常的运营分析和异动监控中广泛应用。
作者:韦东山 全文分为三大部分 1.设备树里中断节点的语法 2.设备树里中断节点的示例 3.在代码中获得中断 参考: 内核Documentation\devicetree\bindings\interrupt-controller...在硬件上,“中断控制器”只有GIC这一个,但是我们在软件上也可以把上图中的“GPIO”称为“中断控制器”。很了芯片有多个GPIO模块,比如GPIO1、GPIO2等等。...在设备树中,中断控制器节点中必须有一个属性:interrupt-controller,表明它是“中断控制器”。...3.在代码中获得中断 之前我们提到过,设备树中的节点有些能被转换为内核里的platform_device,有些不能,回顾如下: A....调用of_irq_get获得中断号 如果你的设备节点既不能转换为platform_device,它也不是I2C设备,不是SPI设备,那么在驱动程序中可以自行调用of_irq_get函数去解析设备树,得到中断号
网上用 VBA 操作 EXCEL的 示例很多,但用 VBA 操作 PPT 的示例很少,而且通常有不少错误或者版本老旧的地方。 下面是我最近写的在 PPT 中批量插入图片的代码,供大家参考。...插入图片前的PPT页面: VBA 代码: Sub insert_images() ' 定义变量 Dim pptApp As Object, pptPres As Object, slide...PowerPoint.Application") 'End If On Error GoTo 0 'ActivePresentation.Slides.Count '获取当前演示文稿中的幻灯片数量...' 在当前演示文稿中插入图片 Dim slideIndex As Integer slideIndex = ActiveWindow.View.slide.slideIndex...'获取当前幻灯片的索引号 ' 幻灯片编号从1开始 Set slide = ActivePresentation.Slides(slideIndex) '当前slide ' 幻灯片编号从1
excelperfect 标签:VBA 这是在www.wimgielis.com中看到的一段代码,可以在工作表中自动添加一个矩形,用户可以指定矩形的大小和填充的颜色,以及指定相关联的宏。...VBA代码如下: Sub Add_Macro_Rectangle() Dim ws As Worksheet Dim sh...String On Error Resume Next Set ws = ActiveSheet sDimensions = Trim(Application.InputBox("请输入形状的大小...(行 x 列)", "形状大小", "3x3", , , , , 2)) iColor = Trim(Application.InputBox("请输入形状的颜色: 1 =蓝色, 2 =绿色, 3...(1) If Len(s) = 0 Then s = .OnAction sText = Trim(Application.InputBox("请输入形状中的文本", "形状文本", s
标签:VBA,快捷菜单 弹出菜单(有时也称为上下文菜单或快捷菜单)是用户界面(UI)中的菜单,提供了一组命令选项,通过某些用户操作(如鼠标右键单击)在应用程序的当前状态或上下文中可用。...由于在2007 MicrosoftOffice系统中,Microsoft用功能区UI取代了命令栏菜单结构,这造成了创建在不同版本的MicrosoftOffice中工作的菜单的技术会有所不同。...在VBE中,单击“插入——模块”,在标准模块中的代码如下: Public Const Mname As String ="MyPopUpMenu" Sub DeletePopUpMenu() '...End Sub 回到Excel界面,按Alt+F8键,调出“宏”对话框,选择“CreateDisplayPopUpMenu”宏,单击“选项”按钮,在“宏选项”对话框中的“快捷键”中输入字母m,如下图1所示...图1 这样,在Excel工作表中,按Ctrl+m组合键,会出现如下图2所示的弹出菜单。 图2 当单击菜单中的按钮时,会弹出一个信息框,如下图3所示。
标签:VBA 有时候,工作簿中可能有大量的命名区域。...下面是一段简单的代码,它将列出工作簿中的所有定义的名称,并显示名称所指向的单元格区域。...'忽略错误 On Error Resume Next '遍历名称 For Each nm In Names '在列A中列出名称 wks.Range...("A" & Rows.Count).End(xlUp)(2) = nm.Name '在列B中列出名称指向的区域 wks.Range("B" & Rows.Count)...其中的错误捕捉语句以防止工作簿中没有命名区域。
1.Split()用法 在VB.net中,Split 函数用于将字符串按照指定的分隔符分割成数组。...注意,我们在 Split 函数中使用了 StringSplitOptions.RemoveEmptyEntries 参数,以去除结果数组中的空元素。...2.Split(string,"、")如果没有"、"会出错吗 在VB.NET中,使用 Split 函数分割字符串时, 如果指定的分隔符在字符串中不存在,Split 函数并不会出错。...3.Replace()的用法 在VB.net中,Replace 函数用于替换字符串中的指定子串为另一个子串。...最后,我们使用 Replace 函数将原始字符串中的 "World" 替换为 "VB.net",并将结果存储在 resultString 中。
(一)正则表达式有什么方法与属性 在VBA中,正则表达式可以使用VBScript Regular Expressions库来实现。...以下是VBScript Regular Expressions库中常用的一些方法和属性: 1.Pattern属性:用于设置或获取正则表达式的模式。...5.Replace方法:用于替换匹配到的字符串。6.Execute方法:用于在字符串中查找匹配的模式。7.Test方法:用于测试字符串是否匹配模式。...r.Offset(0, 1).Value = regEx.Replace(r.Value, "") Next End With End Sub (三)应用示例02:【提取出A列中的姓名与电话...】 如图,提取姓名,电话 下面我们将设计一个自定义函数,来完成 在Excel模板中设计一个函数 Function myExtract(myStr As String, flag As Integer)
Zynq中断大致可分为三个部分 第一部分为SGI,软件生成的中断,共16个端口; 第二部分为PPI,CPU私有外设中断,有5个; 第三部分为SPI,共享外设中断,来自于44个PS端的IO外设以及16个PL...端的中断。...以下为中断控制器框图,主要的控制器部分为ICC和ICD,ICD连接SGI和PPI,ICD连接SPI,可配置两者的寄存器来控制中断。 ? SGI中断(软件产生中断),共16个IRQ ID号 ?...接下来设置带有中断的GPIO INT_MASK:中断掩码 INT_DIS: 中断关闭 INT_EN: 中断使能 INT_TYPE: 中断类型,设置电平敏感还是边沿敏感 INT_POLARITY...Status= IntrInitFuntion(&INTCInst, MIO_0_ID, &GPIO_PTR) ; //产生按键的GPIO while(1) {
中断虽好,但是不要贪杯哦~ 如果 ISR 执行时间过长,可能会导致错过下一个中断(特别是在高频率触发的情况下)。在这种情况下,需要检查中断的处理效率。...检查中断频率:确保定时器频率(中断周期)合适,不要让 ISR 执行时间过长。 在中断中设置标志或将任务放入队列,在主循环中处理,从而避免中断中运行复杂代码。...ADC_Sample_Counter * 2 + 1:表示数据在 ADC_Value_Receive_1 数组中的位置。...在中断中只执行简单的采样操作,将数据存入缓冲区。主循环读取缓冲区的数据并进行滤波、平均计算和 BLE 打包。 还有什么呢?...然后,中断中只采样 ADC 数据并存入一个环形缓冲区。在中断中设置标志位,主循环中根据标志位执行滤波和通信操作。其实就是在较长的时间后开始处理数据。
文章背景:在采用VBA抓取数据时,有时需要判断指定数值是否在一维数组中已存在;如果存在,则希望能够获取该数值在数组内的位置。...在实践过程中发现,VBA的filter函数无法完全匹配指定数值;而借助Excel的match函数,可以实现完全匹配。接下来分别对Filter函数和Match函数进行介绍。...Filter 函数 根据指定的筛选准则,传回包含字串阵列子集的以零为基础的阵列。...默认采用的是vbBinaryCompare选项。 应用示例: 判断某字符串是否在一维数组内存在。 由上图可以看出,采用Filter函数匹配到的是包含A-1的所有元素。...而在实际案例中,可能希望只获得完全匹配的元素。 WorksheetFunction.Match 方法 傳回項目在陣列中的相對位置,其符合指定順序中的指定值。
在Excel中通过VBA对Word文档进行查找替换 以前学过两篇关于ExcelVBA_to_word的文章 1.ExcelVBA一键批量打印文件夹中的所有word文档 2.ExcelVBA一键导入Word...简历信息到 EXCEL中 今天再来学习: 【问题】 在Excel中通过VBA对Word文档进行查找替换,我想把word文档中的“name”全部替换成“张三” word文档如下图 【思路】 在Excel...文档中,先引用CreateObject("word.application"),再打开文件,查找,替换
ae949b883b3e655a94875f04246ffa42&dis_t=1648687652&vid=wxv_2243208097689337860&format_id=10002&support_redirect=0&mmversion=false 在Excel...中透视表+VBA玩转TopN&Others分析,新玩法。
领取专属 10元无门槛券
手把手带您无忧上云