Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/excel/26.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Excel 按带数字的行排列的范围变量_Excel_Vba - Fatal编程技术网

Excel 按带数字的行排列的范围变量

Excel 按带数字的行排列的范围变量,excel,vba,Excel,Vba,是否有可能创建一段代码,其中的范围由设置,其中有数字? 我会尽力解释我的意思 通常我的范围是fra A1到W14,这是从另一张图纸复制的。 如果第7-14行为空,我将改为在fra A1:W6范围内创建 Sub FindTomogindsætdata() Workbooks("bæreevneberegning_pælefundering_optimeret").Worksheets("Rammeliste").Select Worksheets("Rammeliste").Range("O13:

是否有可能创建一段代码,其中的范围由设置,其中有数字? 我会尽力解释我的意思

通常我的范围是fra A1到W14,这是从另一张图纸复制的。 如果第7-14行为空,我将改为在fra A1:W6范围内创建

Sub FindTomogindsætdata()
Workbooks("bæreevneberegning_pælefundering_optimeret").Worksheets("Rammeliste").Select
Worksheets("Rammeliste").Range("O13:W25").Copy
Worksheets("Bæreevneberegning").Select
Range("B10000").Select
Selection.End(xlUp).Offset(1, 0).Select
ActiveCell.PasteSpecial xlPasteValues
Workbooks("bæreevneberegning_pælefundering_optimeret").Worksheets("Rammeliste").Select
Worksheets("Rammeliste").Range("AB13:AB25").Copy
Worksheets("Bæreevneberegning").Select
Range("O10000").Select
Selection.End(xlUp).Offset(1, 0).Select
ActiveCell.PasteSpecial xlPasteValues
End Sub
我的问题来自于,当我第二次插入我的范围i表“Bæreevneberegning”时,它将占用“空”单元格。 因此,如果第7-14行为空,它将留下一个间隙


希望有人能帮忙

看起来你想要一种在一定范围内的方法。旁注:你真的很想在你的代码中加入选择。很高兴知道如何避免选择-我是这篇文章中的新手,试图学习做什么和不做什么