设为首页收藏本站

开启辅助访问

Excel精英培训网 › 日志

日志

如何同时给多个工作表指定单元格同时赋值: hwc2ycy 2012-9-1 11:53; 一、方法一（不用循环） Sub s1() Dim i Dim rg As Range For i = 1 To Worksheets.Count Worksheets(i).Select Replace:=False Next Selection.Value = "1314" Range("a3").Select Selection.Value = "####" End Sub 二、循环 SelectedSheets Sub s2() Dim sh As Ob ...; 个人分类: VBA|1918 次阅读|0 个评论热度 1

Worksheets与Sheets区别: hwc2ycy 2012-9-1 10:57; Sheets 对象指定的或活动工作簿中所有工作表的集合。说明 Sheets 集合可以包含 Chart(代表工作簿中的图表工作表) 或 Worksheet(代表一个工作表) 对象。如果希望返回所有类型的工作表，Sheets 集合就非常有用。 Worksheets 对象指定的或活动工作簿中所有 Worksheet 对象的集合。每个 Worksheet 对象都代表 ...; 个人分类: VBA|2751 次阅读|0 个评论

立即窗口: hwc2ycy 2012-7-29 19:56; 论坛上看到的，先存这，很实用的。 Sub ClearImmediate() Debug.Print "this is atest" With Application.VBE.Windows("立即窗口") .Visible = True .SetFocus VBA.SendKeys "^{a}" VBA.SendKeys "{del}" ' .Visible = False'关闭立即窗口！ End With End Sub; 个人分类: VBA|1966 次阅读|2 个评论热度 6

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-4-28 13:27 , Processed in 0.254570 second(s), 4 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

返回顶部