excel中如何实现将一个单元格内容复制到50个单元格?

我用宏录制的时候,复制的单元格不能跟着变化,是固定的。
Sub 宏2()
'
' 宏2 宏
'

'
Selection.Copy
Range("F203:F251").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub

你把同一个表格里的数据一个一个复制下来多复制几个然后从第一个开始选中直到把你刚才复制的那几个全部选中然后鼠标移到刚才选中的最后一条数据 那儿表格的右下角的位置一直往下拖数据就不会变了
温馨提示:答案为网友推荐,仅供参考
第1个回答  2019-10-24
看见一一串长长的字母我就不太好回答了,大神一个
是我的话,1我会这样的,框选中同样的两个单元格,在格子右下角“小十字”按住往下拖就行了。
2,50个格子杠选,再CTRL住第一个有函数的表格,再把鼠标到输入框点一下,再CTRL+ENTER,就可以了追问

我是有14700条数据,需要每50条复制一次,比如前50复制00001,51-100复制00002

追答

你可以发原文件看一下,要怎样复制?

第2个回答  2019-10-24
把选取范围改为变量,根据当前选择单元格,即
Range("F203:F251").Select
改为
range(cells(ActiveCell.Row,ActiveCell.Column),cells(ActiveCell.Row+49,ActiveCell.Column)).Select本回答被提问者采纳
第3个回答  2019-12-24
直接赋值,快很多,直接Range("F203:F251")=range("A1").value
第4个回答  2019-12-24
选中50个单元格 输入内容 按Ctrl加回车结束
相似回答