在EXCEL表格中如何让每隔1,3,5个单元格出现相同的内容

例如,我在第一个格里输入A,那么在本单元格之后的1、3、5、7个单元格,自动填入A。跪求大神解答。

亲,这个只有在对应Sheet的Change事件里写VBA代码。

我想确认,您说的“之后”是向右第1、3、5、7,还是向下?

 

 

Private Sub Worksheet_Change(ByVal Target As Range)
If Selection.Count = 1 Then
    Application.EnableEvents = False
    Target.Offset(1, 0) = Target
    Target.Offset(3, 0) = Target
    Target.Offset(5, 0) = Target
    Target.Offset(7, 0) = Target
    Application.EnableEvents = True
End If
End Sub

追问

向后的

追答

向后?只有左右上下之分……
您看一下上面的动画和代码,是向下的。

追问

哦,我看动画,第二个以下的都是隔一个单元格出,没有在第1、3、5出哦

追答

OK,代码修订如下:

 

Private Sub Worksheet_Change(ByVal Target As Range)
If Selection.Count = 1 Then
    Application.EnableEvents = False
    Target.Offset(2, 0) = Target
    Target.Offset(4, 0) = Target
    Target.Offset(6, 0) = Target
    Target.Offset(8, 0) = Target
    Application.EnableEvents = True
End If
End Sub

 

温馨提示:答案为网友推荐,仅供参考
第1个回答  2014-07-04
可以用公式实现,但是你要做一个最小单位循环。看你这样,应该是只有三个数字不一样吧。
从A4之后的所有单元格里输入
=IF(MOD(ROW(),3)=0,$A$1,IF(MOD(ROW(),3)=1,$A$2,$A$3))
然后在A1,A2,A3输入相应的数,后面都变
第2个回答  2014-07-04
=IF(ISODD(COLUMN()+1),$A1,"")
在它之后的每个单元格内都输入以上公式即可。
第3个回答  2014-07-04
在A1单元格输入A,在B1、D1、F1、H1单元格分别输入=A1
第4个回答  2014-07-04
如果是固定的格式,就用=A1就行了
相似回答