带格式复制黏贴

bgt1982

上次求助问题没有说清，重新求助，请老师们赐教，谢谢！

excel玉米

1. 将b=chr(34) & trim 略  & chr(34)  ,这两个chr(34)去掉及相应的&符号
2. 标黄色的那行,改成这样  sheet9.Rows(b).PasteSpecial Paste:=xlPasteFormats   ‘仅粘贴格式

咔咔乱坠

其实，行高、列宽还有其他相关格式可以选中整行整列去复制，这样复制所带有的属性含有行高、列宽等属性，或者使用格式刷也是同理
365函数+格式刷，参与一下

1. =DROP(REDUCE(Sheet1!A1:C1,OFFSET(Sheet1!A2:C6,ROW(1:3)*5-5,),LAMBDA(x,y,VSTACK(x,Sheet1!A1:C1,y,Sheet1!D1:F3)))&"",1)

复制代码

bgt1982

excel玉米 发表于 2024-3-15 19:42
1. 将b=chr(34) & trim 略  & chr(34)  ,这两个chr(34)去掉及相应的&符号
2. 标黄色的那行,改成这样  shee ...

问题是解决，但是还不能理解，有以下问题请教下老师
1、Rows(b)，括号里面不是要加双引号吗？为什么这里没有双引号也行？
2、PasteSpecial Paste:=，PasteSpecial后面不是可以直接跟格式吗，为什么这里一定要加上Paste:=

bgt1982

咔咔乱坠 发表于 2024-3-15 19:42
其实，行高、列宽还有其他相关格式可以选中整行整列去复制，这样复制所带有的属性含有行高、列宽等属性，或 ...

温习了下365函数，这个可以用在隔固定行添加表头，老师思路很好，受教了。