六合开奖结果现场直播欢迎诸位!收藏本站注 册登 陆
常用三肖中特马:基础知识网络知识操作系统WPS网页制作数据库算法网页成功之路网络安全最新技术古典mid流行midmid背景下载中心
您现在的位置:首页 > 三肖中特马 > 文章页

ActiveCell和Range对象属性介绍

Admin | 2010-4-13 13:41:53 | ReadNums | 15797 | 标签 六合开奖结果现场直播 | 打印本页
     

  ①ActiveCell常见属性

  cell.Range(“A1”).HasFormula ‘检查单元格或单元格区域中的第一个单元格是否含有公式或cell.HasFormula ‘工作表中单元格是否含有公式

  Target.EntireColumn.Select ‘选择单元格所在的整个列,Target.EntireRow.Select为选择单元格所在的整行

  ActiveCell.Row ‘活动单元格所在的行号,ActiveCell.Column为活动单元格所在的列数

  ActiveWindow.ScrollRow = 2 ’将当前工作表窗口滚动到第2行

  ActiveWindow.ScrollColumn = 5 ’将当前工作表窗口滚动到第5列

  Worksheets("sheet1").Range("A1:C5").CopyPicture xlScreen, xlBitmap ’将指定的单元格区域的内容复制成屏幕快照

  Selection.Hyperlinks.Delete ‘删除所选区域的所有链接

  ActiveSheet.Cells(1, 1).Font.Bold = TRUE ‘Bold属性用于设置字体是否为加粗, Size属性设置字体大小, ColorIndex属性设置字体颜色(其值为颜色索引号), Italic属性设置字型是否为倾斜, Name属性设置字体名称

  ActiveSheet.Cells(1, 1).Interior.ColorIndex = 3 ‘将单元格的背景色设置为红色

  IsEmpty (ActiveCell.Value) ’判断活动单元格中是否有值

  ActiveCell.Value = UCase(ActiveCell.Value) ’将当前单元格中的字符转换成大写

  ActiveCell.Value = StrConv(ActiveCell.Value, vbLowerCase) ’将活动单元格中的字符串转换成小写

  ActiveCell.CurrentRegion.Select ’选择当前活动单元格所在的连续的非空区域,也可以用Range(ActiveCell, UsedRange.End(xlDown)).Select

  ActiveCell.Offset(1,0).Select ’活动单元格下移一行

  ②Range常见属性

  Range(“B2”).Offset(ColumnOffset:=1)或Range(“B2”).Offset(,1) ‘读取指定单元格右侧单元格中的数据

  Range(“B2”).Offset(Rowoffset:=-1)或Range(“B2”).Offset(-1) ‘读取指定单元格上一行单元格中的数据

  Range(“A1”).Copy Range(“B1”) ’复制单元格A1中的内容到B1中

  Range(“A1:D8”).Copy Range(“H1”) ’将指定单元格区域复制到从H1开始的区域中,用Cut方法可以实现剪切操作

  ActiveWindow.RangeSelection.Value = "六合开奖结果现场直播" ’将指定字符串输入到所选单元格区域中

  Range(“A65536”).End(xlUp).Row ‘返回A列最后一行(即记录的总条数)。


问题未解决:在线咨询

网友评论

(访客)
内容实用原创,讲得很好。
20xx年x月x日
(站长)
有问题请在线咨询。
20xx年x月x日