Tạo số ngẫu nhiên

[PacificPR]

Em xin kính chào các Anh, Chị. Chúc các Anh, Chị 1 ngày cuối tuồn vui vẻ ạ. Kính mong được các Anh chị giúp đỡ tạo ra 1 dãy số ngẫu nhiên thỏa mãn điều kiện cho trước (như File đính kèm)
Em xin chân thành cám ơn

 

[Nhattanktnn]

Em xin kính chào các Anh, Chị. Chúc các Anh, Chị 1 ngày cuối tuồn vui vẻ ạ. Kính mong được các Anh chị giúp đỡ tạo ra 1 dãy số ngẫu nhiên thỏa mãn điều kiện cho trước (như File đính kèm)
Em xin chân thành cám ơn

Bài này mình nghĩ là nên lấy trung bình của điều kiện 1 và điều kiện 2 làm trục chuẩn để tính lũy kế. Sau đó tăng giảm của lũy kế căn cứ theo trục đó, sao cho tổng tăng bằng tổng giảm, nhưng phải tăng giảm trong phạm vi của điều kiện. Cuối cùng số cần tạo của từng dòng là số lũy kế dưới trừ số trên.
Viết ra không biết nhọc công không nữa

 

[PacificPR]

Bài này mình nghĩ là nên lấy trung bình của điều kiện 1 và điều kiện 2 làm trục chuẩn để tính lũy kế. Sau đó tăng giảm của lũy kế căn cứ theo trục đó, sao cho tổng tăng bằng tổng giảm, nhưng phải tăng giảm trong phạm vi của điều kiện. Cuối cùng số cần tạo của từng dòng là số lũy kế dưới trừ số trên.
Viết ra không biết nhọc công không nữa

Em cám ơn Anh đã quan tâm. Anh giúp em với ạ. Em làm mãi mà không được

 

[snow25]

Em xin kính chào các Anh, Chị. Chúc các Anh, Chị 1 ngày cuối tuồn vui vẻ ạ. Kính mong được các Anh chị giúp đỡ tạo ra 1 dãy số ngẫu nhiên thỏa mãn điều kiện cho trước (như File đính kèm)
Em xin chân thành cám ơn

Không biết bạn muốn cái gì.Ít ra cũng phải giải thích rõ ràng có cái gì rồi cần cái gì.Và điều kiện như thế nào vứt lên cái file như vậy.Lại chơi chò chơi đoán chữ à.

 

[befaint]

Không biết bạn muốn cái gì

Cho các số điều kiện ở cột D và E
Cần tìm dãy số ở cột B sao cho:
* Lũy kế ở cột C (có công thức sẵn) thỏa mãn nằm trong khoảng ở cột D và E (thuộc dòng tương ứng).
* Tổng dãy số B = 100.

Rõ ràng thế còn gì nữa.



------
@Thớt: Bài này có thể thử Solver xem.

 

[Phuocam]

Em xin kính chào các Anh, Chị. Chúc các Anh, Chị 1 ngày cuối tuồn vui vẻ ạ. Kính mong được các Anh chị giúp đỡ tạo ra 1 dãy số ngẫu nhiên thỏa mãn điều kiện cho trước (như File đính kèm)
Em xin chân thành cám ơn

Thử công thức này trong B2:

=RANDBETWEEN(MAX(C1,E2)*100,D2*100)/100-N(C1)

.

 

[Nhattanktnn]

Bạn xem file (công thức)

 

[PacificPR]

Em xin lỗi Anh snow25 nha. Em cám ơn Anh befaint; Phuocam; Nhattanktnn rất nhiều ạ. Lâu ngày em mới vào lại Diễn đàn Có gì các Anh chị bỏ qua cho em nhé

 

[VetMini]

Em xin lỗi Anh snow25 nha. Em cám ơn Anh befaint; Phuocam; Nhattanktnn rất nhiều ạ. Lâu ngày em mới vào lại Diễn đàn Có gì các Anh chị bỏ qua cho em nhé

Chắc hôn? Tôi từ đầu cứ ngỡ là bạn mượn tài khoản cái gã kia.

Thử công thức này trong B2:

=RANDBETWEEN(MAX(C1,E2)*100,D2*100)/100-N(C1)

.

Nếu theo điều kiện thì phải random ở cột luỹ kế (C) rồi mới tính ra từng đoạn ở cột số cần tạo (B)

 

[PacificPR]

Chắc hôn? Tôi từ đầu cứ ngỡ là bạn mượn tài khoản cái gã kia.


Nếu theo điều kiện thì phải random ở cột luỹ kế (C) rồi mới tính ra từng đoạn ở cột số cần tạo (B)

View attachment 275208

View attachment 275209

Cháu đấy Chú ạ. Nghỉ một thời gian bây giờ quên hết rồi ạ

 

[SA_DQ]

Cho các số điều kiện ở cột D và E
Cần tìm dãy số ở cột B sao cho:
* Lũy kế ở cột C (có công thức sẵn) thỏa mãn nằm trong khoảng ở cột D và E (thuộc dòng tương ứng).
* Tổng dãy số B = 100.
Rõ ràng thế còn gì nữa.

Sub Tao9SoNgau()
 Dim J As Integer, TF As Double, SG As Integer, Tong As Double

 Randomize
 For J = 2 To 10
    SG = Cells(J + 1, "E").Value - Cells(J, "E").Value - 1
    If J Mod 2 = 0 Then
        TF = Format(Rnd(), "#.#0")
        Cells(J, "B").Value = SG + TF
    Else
        Cells(J, "B").Value = SG - TF
    End If
 Next J
End Sub

 

[PacificPR]

Sub Tao9SoNgau()
 Dim J As Integer, TF As Double, SG As Integer, Tong As Double

 Randomize
 For J = 2 To 10
    SG = Cells(J + 1, "E").Value - Cells(J, "E").Value - 1
    If J Mod 2 = 0 Then
        TF = Format(Rnd(), "#.#0")
        Cells(J, "B").Value = SG + TF
    Else
        Cells(J, "B").Value = SG - TF
    End If
 Next J
End Sub

Dạ. Cháu cám ơn Bác nhiều ạ

 

[Gà Công Nghệ]

Cháu đấy Chú ạ. Nghỉ một thời gian bây giờ quên hết rồi ạ

Lâu quá không thấy bạn online.

 

[Maika8008]

Lâu quá không thấy bạn online.

Mới tháng rưỡi chứ mấy.