求关于EXCEL公式运用的问题
来源:百度知道 编辑:UC知道 时间:2024/06/12 04:41:27
下面给你的是:在A11单元格输入需要显示行数,隐藏前10行的实例。你也可以用InputBox函数实现以对话框方式输入“行数”数据。
Sub tty()
Dim hide_row As Integer
hide_row = Range("A11")
If hide_row >= 1 And hide_row <= 10 Then
Sheet1.Rows("1:" & hide_row).EntireRow.Hidden = False
Sheet1.Rows(hide_row + 1 & ":10").EntireRow.Hidden = True
Else
Sheet1.Rows("1:65536").EntireRow.Hidden = False
End If
End Sub
就是要在VBA里隐藏和显示行吧?
n = 5
'n是你取的数,假设你的数在1-10行。1<=n<=10
if n>=1 and n<=10 then
Rows("1:10").EntireRow.Hidden = false
Rows(n & ":10").EntireRow.Hidden = True
end if
'先全部显示,然后隐藏从n到10行。
'具体的方法是这样,你可以试一下。
你这个题目有些意思,可以试一下这样做,不知道能达到要求不
给这10行数据设置条件格式,条件是公式:=Row()>$A$12,格式是字体颜色与背景色相同,例如符合条件时字体颜色为白色,这样在A12里输入数字时,行数大于A12里数字的数据就会变成白色,和背景色一样,表面上看就看不到了,但实际还在那里,而且被选中的时候也会反显出来。
这好像不能用吧,EXCEL只能运行它自带的公式,或服务器中有的或支持的,自己编的不能直接在里面用~