DwcCC DwcCC
关注数: 8 粉丝数: 13 发帖数: 4,086 关注贴吧数: 16
求70-80p金装种子 求70-80p金装种子 要位置 ~~~
求教VBA 单元格变化 死循环。 我想做这样一个自动的查询表格 当我在批量后面输入数字的时候 自动运行程序 得出样本量 ac rc 数据 但是 我如果写在 Private Sub Worksheet_Change(ByVal Target As Range) End Sub 这个里面就会形成死循环 比如我简单一点 if sheet1.cells(4,1)> 100 then sheet1.cells(3,2)="C" else sheet1.cells(3,2)="B" end if 因为判定之后 就会写入 C2 这个格子 然后系统有认为 单元格发生了变化 就会无限循环。。。
求教VBA格式！！！！大神指点迷津 我写了一个exce 的vba程序 意思就是 我在sheet1的 a1 A2有 2个名字 比如 张三 李四 然后 我根据 A1 的 内容创建了一个 张三的表格 并在张三表格填入 一个值 然后根据A2内容创建了 李四的表格 同样在李四表格 A1写入一个值 Dim n As Integer Dim F As Integer Dim sheet_name As String F = Sheet1.[A65536].End(xlUp).Row For n = 1 To F sheet_name = Sheet1.Cells(n, 1) Sheets.Add ActiveSheet.Name = sheet_name Sheet(sheet_name).Cells(1, 1) = Sheet1.Cells(n, 1)（一直提示这一句错误） Next End Sub 提示错误： Sheet(sheet_name).Cells(1, 1) = Sheet1.Cells(n, 1)（一直提示这一句错误） 如果写成sheet2.cells(1,1)=heet1.cells(n,1) 是对的 但是我要写入的是 张三 或者李四的表格。。。格式怎么写大神
大神求助 筛选问题！！！ 我有sheet1 sheet2 sheet3 都有筛选，如何才能一次 三个页面的筛选全部重新应用？
首页 1 2 下一页