我有一个excel文档,其中包含一些纯文本.A1:A5包含文本,然后是几个houndred行,还有几行文本.之间的单元格是空的.我已经设置了一个Do Until循环,它应该用文本复制单元格,然后在出现空单元格时停止.我的循环计数和复制136个单元格,包括5个文本.所以我的问题是为什么?底线:Hello在第136 行结束,然后在下一个带有文本的区域之前有一个巨大的空单元格间隙.131个白色细胞是否含有任何隐藏的形成物?我尝试过"Clear Formats"和"Clear All"代码片段,如下所示:
Sub CopyTags_Click()
Dim assets As Workbook, test As Workbook
Dim x As Integer, y As Integer
Set assets = Workbooks.Open("file-path.xlsx")
Set test = Workbooks.Open("File-path.xlsx")
x = 1
y = 1
Do Until assets.Worksheets(1).Range("A" & x) = ""
test.Worksheets(1).Range("A" & y) = assets.Worksheets(1).Range("A" & x)
x = x + 1
y = y + 1
Loop
test.Worksheets(1).Range("A" & x).Value = "Hello"
End Sub
Run Code Online (Sandbox Code Playgroud)
我也尝试使用vbNullString而不是""
我有以下代码示例,我无法弄清楚为什么它显示123.由于这些是整数,我理解不显示小数.但我预期它显示3,2(0.3),1(0.23)(以相反的顺序).当n低于10时,一切都会在最后一次cout后停止......对吗?
#include <iostream>
using namespace std;
void recursion(int n) {
if (n < 10) cout << n;
else {
recursion(n / 10);
cout << n % 10;
}
}
int main() {
recursion(123);
return 0;
}
Run Code Online (Sandbox Code Playgroud)