excel怎么复制多行数字不变,行数,复制

1.如何把excel中指定列数字是几就复制成几行,且数字变为1,顺序不变

假设起始位置如上图所示， 原始人名少于97个， 如果更多，把第一个循环的100改成更大的数字即可。

Sub Button1_Click()

'

' Button1_Click Macro

'

'

thisposition = 3

For i = 3 To 100

thisname = Range("B" & i).Value

thisquantity = Range("C" & i).Value

For j = 1 To thisquantity

thisposition = thisposition + 1

Range("F" & thisposition).Value = thisname

Range("G" & thisposition).Value = 1

Next j

Next i

End Sub

2.excel表格复制怎么保留行标和列标不变

1、以下是一张学生成绩表，我们可以从中看出该表格一共由两列十行组成，按照以前的老办法，我们选中整个单元格复制，如下；

2、粘贴到其他空白单元格的时候，会有多种粘贴选项，但是无论哪一种最后的粘贴效果都是不带有行标和列标的，下图是普通粘贴和保留源列宽后的效果。

3、如果想要粘贴以后保留源单元格的行标和列标那么我们首先就要点击"页面布局"，然后将标题下的"打印"选中，如图；

4、然后再复制刚才的单元格，复制以后再开始菜单下"复制"图标右侧会看到一个下拉按钮，点击之后可看到"复制为图片"，此时会弹出复制图片的对话框，如下图所示；

5、在该对话框，我们选择"如打印效果"，最后依旧在空白的单元格粘贴，这时我们会发现粘贴以后的表格带有1、2、3以及A/B/C这些行标和列标了。