Question

我试图比较n个数字，看看哪个是最小值。 n是来自单元格的值

n = Sheet1.Range("C6").Value

因此，如果n等于2，那么我必须声明两个变量并使用min函数。数据将排列在两个不同的列中，如下所示。我不知道数据在哪里结束。

我想使用数组来声明基于n和循环的变量，但我不知道如何以及我对VBA中的数组不熟悉。我对所有解决方案持开放态度。你不必使用数组，但这是我想到的方式之一。目前，我只是通过获取我已经声明的两个值来完成它。我需要使用循环为每一行获取两个不同的值来进行比较并找到最小值。我的代码没有错误。

x = 1
Do Until IsEmpty(Sheet9.Cells(x, 30).Value)
    no2 = Sheet9.Cells(x, 30).Value
    no1 = Sheet9.Cells(x, 31).Value
    result = WorksheetFunction.Min(no1, no2)
    Sheet9.Cells(x, 30).Value = result
    x = x + 1
Loop

Answer 1

如果我理解你的问题，你只需要在Do Until循环中再添加一个条件，就像这样......

import android.util.Log;

import com.google.firebase.messaging.FirebaseMessagingService;
import com.google.firebase.messaging.RemoteMessage;

public class MyFirebaseMessagingService extends FirebaseMessagingService {
    private static final String TAG = "FCM Service";
    @Override
    public void onMessageReceived(RemoteMessage remoteMessage) {
        // TODO: Handle FCM messages here.
        // If the application is in the foreground handle both data and notification messages here.
        // Also if you intend on generating your own notifications as a result of a received FCM
        // message, here is where that should be initiated.
        Log.d(TAG, "From: " + remoteMessage.getFrom());
        Log.d(TAG, "Notification Message Body: " + remoteMessage.getNotification().getBody());
    }
}

Answer 2

让包含值数的单元格考虑为“C6”。

如果你在'C6'中的值为3，那么你已经找到了最小的单元格'A30：A32'并将值粘贴在'A30'中这是我从你的问题中理解的。

Sub Minarr()
dim nos() as integer

n=int(sheet1.range('C6').value)
set cell=Sheet9.cells(1,30)
if not isempty(cell) then
for i=0 to n
nos[i]=cell.offset(i,0).value
next i
result=Application.worksheetfunction.min(nos)
cell.value=result
end if
end sub

根据变量的值声明变量的数量

2 个答案: