Question

我的问题数据如下：

SET pathToFile1="C:\Program Files\file1ToCompare"
SET pathToFile2="C:\Users\file2ToCompare"

FOR /F "usebackq" %%A ('%pathToFile1%') DO SET file1Size=%%~zA
FOR /F "usebackq" %%B ('%pathToFile2%') DO SET file2Size=%%~zB

IF %file1Size% LSS %file2Size% (
    :: do things
)

#define的字符串设置为颜色索引= 50，其余的设置为颜色指数= 23

我想要做的是我想找到“动物”这个词，我希望它能看到下一栏，直到下一栏有#define。如果下一列没有#define，则将其编号为“0”，下一列为“1”，依此类推，因此结果如下：

#define apple
#define mango
#define banana
animals{
dog,
cat,
bird
#define guava
#define avocado

我的代码如下，但它没有按计划移动到下一列。

#define apple
#define mango
#define banana
animals{
dog, 0
cat, 1
bird 2
#define guava
#define avocado

由于

Answer 1

通常，代码中的错误是您没有选择要循环的单元格。这可能是了解循环如何工作的一个很好的例子。

我不想成为编写此代码的人，但请尝试：

Render(){
  const {isAuthenticated} = this.props.auth;
}

如果有效，请在阅读之后尝试重构它： How to avoid using Select in Excel VBA

尝试通过将For Each cell In DataRange.Cells cell.Select If InStr(cell.Value, "animals") <> 0 Then Do Until ActiveCell.Font.ColorIndex = 50 cell.Value = cell.Value & o o = o + 1 cell.Offset(0, 1).Select Loop End If Next设置为ActiveCell而不使用Range Select来避免选择。您可以考虑水平循环的第二个ActiveCell变量。试试看！

这样的事可能会好的：

Range

在VBA中循环数据

1 个答案: