Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
楼主: 兰色幻想

VBA80第13集练习题上交专贴:单元格信息返回

  [复制链接]
发表于 2017-8-4 19:49 | 显示全部楼层
看看答案~~~~~~~····
excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
回复

使用道具 举报

发表于 2017-8-9 16:05 | 显示全部楼层
回复

使用道具 举报

发表于 2017-8-10 22:26 | 显示全部楼层
回复

使用道具 举报

发表于 2017-8-12 18:09 | 显示全部楼层
学习了
回复

使用道具 举报

发表于 2017-8-13 11:41 | 显示全部楼层
Sub 返回()
    Dim rg As Range, rng As Range
    With Range("C4").CurrentRegion
    .Cells(.Rows.Count, .Columns.Count).Select
    End With
End Sub
回复

使用道具 举报

发表于 2017-8-14 08:53 | 显示全部楼层
学习
回复

使用道具 举报

发表于 2017-8-15 16:06 | 显示全部楼层
第一题
Sub A1()
Dim i As Integer, j As Integer
With Range("C4").CurrentRegion
i = .Columns.Count
j = .Rows.Count
[a11] = .Range("a1").Offset(j - 1, i - 1).Address
End With
End Sub

回复

使用道具 举报

发表于 2017-8-15 16:33 | 显示全部楼层
哈哈哈
回复

使用道具 举报

发表于 2017-8-16 09:11 | 显示全部楼层
学习来了
回复

使用道具 举报

发表于 2017-8-18 16:28 | 显示全部楼层
请老师代为批阅,谢谢
练习13.png
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-3-30 00:03 , Processed in 0.754881 second(s), 10 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表