随手记

  • 用火狐浏览器播放菜单没有加速选项的话,禁用flash,刷新在启用。

  • win docker和VMware,安卓模拟器冲突,主要是wsl2内核需要用hyper-v,只能用wsl1和docker。

    Windows10 WSL1 安装Docker

    win10 WSL1 结合 Docker 使用

  • '将工作簿所有工作表另存为单独的文件。 
    '路径为原工作簿路径,文件名为工作表名 
    
    Sub Test() 
        Dim Sht As Worksheet 
        For Each Sht In Sheets 
            Sht.Copy 
            ActiveWorkbook.SaveAs ThisWorkbook.Path & "\" & Sht.Name & ".xls" 
            ActiveWorkbook.Close 
        Next 
    End Sub

Last updated