摘要: linux 与 powershell 命令对照 一个常年混 Linux 的人第一次打开 Windows PowerShell,最容易犯的错是:把 ls -la 敲进去,然后疑惑为什么报错。本文用 5 个最高频的命令做切口,把「bash 思维」翻译成「PowerShell 思维」,最后说清楚 PowerShell 到底强在哪、又弱在哪。 阅读约定 阅读全文
posted @ 2026-10-31 20:21 孤独的小苗 阅读(2) 评论(0) 推荐(0)
摘要: .NET MAUI 10 实战:用 CommunityToolkit.Mvvm 把 MVVM 写到刚刚好 从官方 Notes 教程继续往前一步:用 CommunityToolkit.Mvvm 的 [ObservableProperty] 与 [RelayCommand] 源生成器,把 MAUI 的 阅读全文
posted @ 2026-10-28 06:22 孤独的小苗 阅读(11) 评论(0) 推荐(0)
摘要: 工作中把工作工作台帐的公式错误的删除了,只能用VBA快速重新设置。 Sub AddFormulas() Dim i As Integer Dim j As Integer Dim sheetName As String Dim ws As Worksheet For i = 3 To 31 shee 阅读全文
posted @ 2026-04-02 02:19 孤独的小苗 阅读(22) 评论(0) 推荐(0)
摘要: 将工作台帐优化一下,高亮显示当日订单,好处是工作完成度一目也然。 Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) If Sh.Name Like "*月*日" Then Dim affectedR 阅读全文
posted @ 2026-03-30 04:38 孤独的小苗 阅读(13) 评论(0) 推荐(0)
摘要: 当B列内容不为空时,自动监测,给K、L列自动赋值,减少输入工作量。 Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) ' 仅处理以“月”开头且以“日”结尾的工作表 If Sh.Name Like " 阅读全文
posted @ 2026-03-20 01:00 孤独的小苗 阅读(18) 评论(0) 推荐(0)
摘要: 设置F54列公式,用VBA设置多个工作表。 Sub SetFormulaInMarchSheets() Dim ws As Worksheet Dim i As Integer Dim sheetName As String For i = 8 To 31 sheetName = "3月" & i 阅读全文
posted @ 2026-03-08 05:33 孤独的小苗 阅读(41) 评论(0) 推荐(0)
摘要: 以下VBA代码将实现您的要求:遍历所有名为“3月6日”到“3月31日”的工作表,在每个工作表中设置L111和L112的值,并为L2:L52区域添加数据有效性(序列),来源为L102:L112。 Sub SetSheetsData() Dim ws As Worksheet Dim i As Inte 阅读全文
posted @ 2026-03-06 06:29 孤独的小苗 阅读(53) 评论(0) 推荐(0)
摘要: 同事要求在工作台帐中增加当B列内容不为空时,自动为K列和L列赋值为“无”,Excel只能启用宏功能才能实现。 Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) ' 仅处理以“3月”开头且以“日”结尾 阅读全文
posted @ 2026-03-05 06:06 孤独的小苗 阅读(25) 评论(0) 推荐(0)
摘要: 同事想打印台历,在网上没有找到合适的图片,突然想起让AI生成台历,下面就是deepseek生成的台历: <!DOCTYPE html> <html lang="en"> <head> <meta charset="UTF-8"> <meta name="viewport" content="widt 阅读全文
posted @ 2026-03-03 01:56 孤独的小苗 阅读(36) 评论(0) 推荐(0)
摘要: 今天对工作台帐进行了更新,领导增加了要求,现把deepseek的代码保存这里,供以后使用。 Sub AddConditionForRows() Dim wsName As String Dim targetWs As Worksheet Dim row As Integer Dim sheetInd 阅读全文
posted @ 2026-03-02 04:48 孤独的小苗 阅读(62) 评论(0) 推荐(0)