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

nov__ · 发表于 2017-3-17 23:14

kankandakna

【9527】 · 发表于 2017-3-18 14:59

看看大家的答案

wxg007 · 发表于 2017-3-19 22:57

看一看，零基础，太难了

shilyl010 · 发表于 2017-3-20 22:08

看答案

nebulayan · 发表于 2017-3-22 13:41

第一题
Sub q1()
With Range("c4").CurrentRegion
[a3] = Range("c4").End(xlDown).End(xlToRight).Address
End With
End Sub

lshx1 · 发表于 2017-3-22 13:42

whiteowen · 发表于 2017-3-23 12:57

有几种方法。

molihuatang · 发表于 2017-3-26 17:53

Sub 题目1()
[A1] = Range("C4").CurrentRegion.Offset(0, 1).End(xlDown).Address(0, 1)
End Sub

刘颙 · 发表于 2017-3-27 15:22

彻彻底底多多多

yintracy · 发表于 2017-3-27 17:13

木哈哈哈，我知道了怎么做！！

		自动登录	找回密码
密码			注册